Whamcloud - gitweb
6eb542159d0067c2928d87d4d581e813682e5ca6
[fs/lustre-release.git] / lustre / tests / test-framework.sh
1 #!/bin/bash
2
3 trap 'print_summary && print_stack_trace | tee $TF_FAIL && \
4     echo "$TESTSUITE: FAIL: test-framework exiting on error"' ERR
5 set -e
6
7 export LANG=en_US
8 export REFORMAT=${REFORMAT:-""}
9 export WRITECONF=${WRITECONF:-""}
10 export VERBOSE=${VERBOSE:-false}
11 export GSS=${GSS:-false}
12 export GSS_SK=${GSS_SK:-false}
13 export GSS_KRB5=false
14 export GSS_PIPEFS=false
15 export SHARED_KEY=${SHARED_KEY:-false}
16 export SK_PATH=${SK_PATH:-/tmp/test-framework-keys}
17 export SK_OM_PATH=$SK_PATH'/tmp-request-mount'
18 export SK_MOUNTED=${SK_MOUNTED:-false}
19 export SK_FLAVOR=${SK_FLAVOR:-ski}
20 export SK_NO_KEY=${SK_NO_KEY:-true}
21 export SK_UNIQUE_NM=${SK_UNIQUE_NM:-false}
22 export SK_S2S=${SK_S2S:-false}
23 export SK_S2SNM=${SK_S2SNM:-TestFrameNM}
24 export SK_S2SNMCLI=${SK_S2SNMCLI:-TestFrameNMCli}
25 export SK_SKIPFIRST=${SK_SKIPFIRST:-true}
26 export IDENTITY_UPCALL=default
27 export QUOTA_AUTO=1
28 export FLAKEY=${FLAKEY:-true}
29 # specify environment variable containing batch job name for server statistics
30 export JOBID_VAR=${JOBID_VAR:-"procname_uid"}  # or "existing" or "disable"
31
32 #export PDSH="pdsh -S -Rssh -w"
33 export MOUNT_CMD=${MOUNT_CMD:-"mount -t lustre"}
34 export UMOUNT=${UMOUNT:-"umount -d"}
35
36 export LSNAPSHOT_CONF="/etc/ldev.conf"
37 export LSNAPSHOT_LOG="/var/log/lsnapshot.log"
38
39 # sles12 umount has a issue with -d option
40 [ -e /etc/SuSE-release ] && grep -w VERSION /etc/SuSE-release | grep -wq 12 && {
41         export UMOUNT="umount"
42 }
43
44 # function used by scripts run on remote nodes
45 LUSTRE=${LUSTRE:-$(cd $(dirname $0)/..; echo $PWD)}
46 . $LUSTRE/tests/functions.sh
47 . $LUSTRE/tests/yaml.sh
48
49 export LD_LIBRARY_PATH=${LUSTRE}/utils/.libs:${LUSTRE}/utils:${LD_LIBRARY_PATH}
50
51 LUSTRE_TESTS_CFG_DIR=${LUSTRE_TESTS_CFG_DIR:-${LUSTRE}/tests/cfg}
52
53 EXCEPT_LIST_FILE=${EXCEPT_LIST_FILE:-${LUSTRE_TESTS_CFG_DIR}/tests-to-skip.sh}
54
55 if [ -f "$EXCEPT_LIST_FILE" ]; then
56     echo "Reading test skip list from $EXCEPT_LIST_FILE"
57     cat $EXCEPT_LIST_FILE
58     . $EXCEPT_LIST_FILE
59 fi
60
61 # check config files for options in decreasing order of preference
62 [ -z "$MODPROBECONF" -a -f /etc/modprobe.d/lustre.conf ] &&
63     MODPROBECONF=/etc/modprobe.d/lustre.conf
64 [ -z "$MODPROBECONF" -a -f /etc/modprobe.d/Lustre ] &&
65     MODPROBECONF=/etc/modprobe.d/Lustre
66 [ -z "$MODPROBECONF" -a -f /etc/modprobe.conf ] &&
67     MODPROBECONF=/etc/modprobe.conf
68
69 sanitize_parameters() {
70         for i in DIR DIR1 DIR2 MOUNT MOUNT1 MOUNT2
71         do
72                 local path=${!i}
73                 if [ -d "$path" ]; then
74                         eval export $i=$(echo $path | sed -r 's/\/+$//g')
75                 fi
76         done
77 }
78 assert_DIR () {
79         local failed=""
80         [[ $DIR/ = $MOUNT/* ]] ||
81                 { failed=1 && echo "DIR=$DIR not in $MOUNT. Aborting."; }
82         [[ $DIR1/ = $MOUNT1/* ]] ||
83                 { failed=1 && echo "DIR1=$DIR1 not in $MOUNT1. Aborting."; }
84         [[ $DIR2/ = $MOUNT2/* ]] ||
85                 { failed=1 && echo "DIR2=$DIR2 not in $MOUNT2. Aborting"; }
86
87         [ -n "$failed" ] && exit 99 || true
88 }
89
90 usage() {
91     echo "usage: $0 [-r] [-f cfgfile]"
92     echo "       -r: reformat"
93
94     exit
95 }
96
97 print_summary () {
98     trap 0
99         [ -z "$DEFAULT_SUITES"] && return 0
100     [ -n "$ONLY" ] && echo "WARNING: ONLY is set to $(echo $ONLY)"
101     local details
102     local form="%-13s %-17s %-9s %s %s\n"
103     printf "$form" "status" "script" "Total(sec)" "E(xcluded) S(low)"
104     echo "------------------------------------------------------------------------------------"
105     for O in $DEFAULT_SUITES; do
106         O=$(echo $O  | tr "-" "_" | tr "[:lower:]" "[:upper:]")
107         [ "${!O}" = "no" ] && continue || true
108         local o=$(echo $O  | tr "[:upper:]_" "[:lower:]-")
109         local log=${TMP}/${o}.log
110         if is_sanity_benchmark $o; then
111             log=${TMP}/sanity-benchmark.log
112         fi
113         local slow=
114         local skipped=
115         local total=
116         local status=Unfinished
117         if [ -f $log ]; then
118                 skipped=$(grep excluded $log | awk '{ printf " %s", $3 }' |
119                         sed 's/test_//g')
120                 slow=$(egrep "^PASS|^FAIL" $log | tr -d "("| sed s/s\)$//g |
121                         sort -nr -k 3  | head -n5 |  awk '{ print $2":"$3"s" }')
122                 total=$(grep duration $log | awk '{ print $2 }')
123                 if [ "${!O}" = "done" ]; then
124                         status=Done
125                 fi
126                 if $DDETAILS; then
127                         local durations=$(egrep "^PASS|^FAIL" $log |
128                                 tr -d "("| sed s/s\)$//g |
129                                 awk '{ print $2":"$3"|" }')
130                         details=$(printf "%s\n%s %s %s\n" "$details" \
131                                 "DDETAILS" "$O" "$(echo $durations)")
132                 fi
133         fi
134         printf "$form" $status "$O" "${total}" "E=$skipped"
135         printf "$form" "-" "-" "-" "S=$(echo $slow)"
136     done
137
138     for O in $DEFAULT_SUITES; do
139         O=$(echo $O  | tr "-" "_" | tr "[:lower:]" "[:upper:]")
140         if [ "${!O}" = "no" ]; then
141             printf "$form" "Skipped" "$O" ""
142         fi
143     done
144
145     # print the detailed tests durations if DDETAILS=true
146     if $DDETAILS; then
147         echo "$details"
148     fi
149 }
150
151 init_test_env() {
152         export LUSTRE=$(absolute_path $LUSTRE)
153         export TESTSUITE=$(basename $0 .sh)
154         export TEST_FAILED=false
155         export FAIL_ON_SKIP_ENV=${FAIL_ON_SKIP_ENV:-false}
156         export RPC_MODE=${RPC_MODE:-false}
157         export DO_CLEANUP=${DO_CLEANUP:-true}
158         export KEEP_ZPOOL=${KEEP_ZPOOL:-false}
159         export CLEANUP_DM_DEV=false
160         export PAGE_SIZE=$(get_page_size client)
161
162         export MKE2FS=$MKE2FS
163         if [ -z "$MKE2FS" ]; then
164                 if which mkfs.ldiskfs >/dev/null 2>&1; then
165                         export MKE2FS=mkfs.ldiskfs
166                 else
167                         export MKE2FS=mke2fs
168                 fi
169         fi
170
171         export DEBUGFS=$DEBUGFS
172         if [ -z "$DEBUGFS" ]; then
173                 if which debugfs.ldiskfs >/dev/null 2>&1; then
174                         export DEBUGFS=debugfs.ldiskfs
175                 else
176                         export DEBUGFS=debugfs
177                 fi
178         fi
179
180         export TUNE2FS=$TUNE2FS
181         if [ -z "$TUNE2FS" ]; then
182                 if which tunefs.ldiskfs >/dev/null 2>&1; then
183                         export TUNE2FS=tunefs.ldiskfs
184                 else
185                         export TUNE2FS=tune2fs
186                 fi
187         fi
188
189         export E2LABEL=$E2LABEL
190         if [ -z "$E2LABEL" ]; then
191                 if which label.ldiskfs >/dev/null 2>&1; then
192                         export E2LABEL=label.ldiskfs
193                 else
194                         export E2LABEL=e2label
195                 fi
196         fi
197
198         export DUMPE2FS=$DUMPE2FS
199         if [ -z "$DUMPE2FS" ]; then
200                 if which dumpfs.ldiskfs >/dev/null 2>&1; then
201                         export DUMPE2FS=dumpfs.ldiskfs
202                 else
203                         export DUMPE2FS=dumpe2fs
204                 fi
205         fi
206
207         export E2FSCK=$E2FSCK
208         if [ -z "$E2FSCK" ]; then
209                 if which fsck.ldiskfs >/dev/null 2>&1; then
210                         export E2FSCK=fsck.ldiskfs
211                 else
212                          export E2FSCK=e2fsck
213                 fi
214         fi
215
216         export RESIZE2FS=$RESIZE2FS
217         if [ -z "$RESIZE2FS" ]; then
218                 if which resizefs.ldiskfs >/dev/null 2>&1; then
219                         export RESIZE2FS=resizefs.ldiskfs
220                 else
221                         export RESIZE2FS=resize2fs
222                 fi
223         fi
224
225         export LFSCK_ALWAYS=${LFSCK_ALWAYS:-"no"} # check fs after test suite
226         export FSCK_MAX_ERR=4   # File system errors left uncorrected
227
228         export ZFS=${ZFS:-zfs}
229         export ZPOOL=${ZPOOL:-zpool}
230         export ZDB=${ZDB:-zdb}
231         export PARTPROBE=${PARTPROBE:-partprobe}
232
233         #[ -d /r ] && export ROOT=${ROOT:-/r}
234         export TMP=${TMP:-$ROOT/tmp}
235         export TESTSUITELOG=${TMP}/${TESTSUITE}.log
236         export LOGDIR=${LOGDIR:-${TMP}/test_logs/$(date +%s)}
237         export TESTLOG_PREFIX=$LOGDIR/$TESTSUITE
238
239         export HOSTNAME=${HOSTNAME:-$(hostname -s)}
240         if ! echo $PATH | grep -q $LUSTRE/utils; then
241                 export PATH=$LUSTRE/utils:$PATH
242         fi
243         if ! echo $PATH | grep -q $LUSTRE/utils/gss; then
244                 export PATH=$LUSTRE/utils/gss:$PATH
245         fi
246         if ! echo $PATH | grep -q $LUSTRE/tests; then
247                 export PATH=$LUSTRE/tests:$PATH
248         fi
249         if ! echo $PATH | grep -q $LUSTRE/../lustre-iokit/sgpdd-survey; then
250                 export PATH=$LUSTRE/../lustre-iokit/sgpdd-survey:$PATH
251         fi
252         export LST=${LST:-"$LUSTRE/../lnet/utils/lst"}
253         [ ! -f "$LST" ] && export LST=$(which lst)
254         export SGPDDSURVEY=${SGPDDSURVEY:-"$LUSTRE/../lustre-iokit/sgpdd-survey/sgpdd-survey")}
255         [ ! -f "$SGPDDSURVEY" ] && export SGPDDSURVEY=$(which sgpdd-survey)
256         export MCREATE=${MCREATE:-mcreate}
257         export MULTIOP=${MULTIOP:-multiop}
258         # Ubuntu, at least, has a truncate command in /usr/bin
259         # so fully path our truncate command.
260         export TRUNCATE=${TRUNCATE:-$LUSTRE/tests/truncate}
261         export FSX=${FSX:-$LUSTRE/tests/fsx}
262         export MDSRATE=${MDSRATE:-"$LUSTRE/tests/mpi/mdsrate"}
263         [ ! -f "$MDSRATE" ] && export MDSRATE=$(which mdsrate 2> /dev/null)
264         if ! echo $PATH | grep -q $LUSTRE/tests/racer; then
265                 export PATH=$LUSTRE/tests/racer:$PATH:
266         fi
267         if ! echo $PATH | grep -q $LUSTRE/tests/mpi; then
268                 export PATH=$LUSTRE/tests/mpi:$PATH
269         fi
270         export RSYNC_RSH=${RSYNC_RSH:-rsh}
271
272         export LCTL=${LCTL:-"$LUSTRE/utils/lctl"}
273         [ ! -f "$LCTL" ] && export LCTL=$(which lctl)
274         export LFS=${LFS:-"$LUSTRE/utils/lfs"}
275         [ ! -f "$LFS" ] && export LFS=$(which lfs)
276         SETSTRIPE=${SETSTRIPE:-"$LFS setstripe"}
277         GETSTRIPE=${GETSTRIPE:-"$LFS getstripe"}
278
279         export PERM_CMD=${PERM_CMD:-"$LCTL conf_param"}
280
281         export L_GETIDENTITY=${L_GETIDENTITY:-"$LUSTRE/utils/l_getidentity"}
282         if [ ! -f "$L_GETIDENTITY" ]; then
283                 if `which l_getidentity > /dev/null 2>&1`; then
284                         export L_GETIDENTITY=$(which l_getidentity)
285                 else
286                         export L_GETIDENTITY=NONE
287                 fi
288         fi
289         export LL_DECODE_FILTER_FID=${LL_DECODE_FILTER_FID:-"$LUSTRE/utils/ll_decode_filter_fid"}
290         [ ! -f "$LL_DECODE_FILTER_FID" ] && export LL_DECODE_FILTER_FID="ll_decode_filter_fid"
291         export LL_DECODE_LINKEA=${LL_DECODE_LINKEA:-"$LUSTRE/utils/ll_decode_linkea"}
292         [ ! -f "$LL_DECODE_LINKEA" ] && export LL_DECODE_LINKEA="ll_decode_linkea"
293         export MKFS=${MKFS:-"$LUSTRE/utils/mkfs.lustre"}
294         [ ! -f "$MKFS" ] && export MKFS="mkfs.lustre"
295         export TUNEFS=${TUNEFS:-"$LUSTRE/utils/tunefs.lustre"}
296         [ ! -f "$TUNEFS" ] && export TUNEFS="tunefs.lustre"
297         export CHECKSTAT="${CHECKSTAT:-"checkstat -v"} "
298         export LUSTRE_RMMOD=${LUSTRE_RMMOD:-$LUSTRE/scripts/lustre_rmmod}
299         [ ! -f "$LUSTRE_RMMOD" ] &&
300                 export LUSTRE_RMMOD=$(which lustre_rmmod 2> /dev/null)
301         export LUSTRE_ROUTES_CONVERSION=${LUSTRE_ROUTES_CONVERSION:-$LUSTRE/scripts/lustre_routes_conversion}
302         [ ! -f "$LUSTRE_ROUTES_CONVERSION" ] &&
303                 export LUSTRE_ROUTES_CONVERSION=$(which lustre_routes_conversion 2> /dev/null)
304         export LFS_MIGRATE=${LFS_MIGRATE:-$LUSTRE/scripts/lfs_migrate}
305         [ ! -f "$LFS_MIGRATE" ] &&
306                 export LFS_MIGRATE=$(which lfs_migrate 2> /dev/null)
307         export LR_READER=${LR_READER:-"$LUSTRE/utils/lr_reader"}
308         [ ! -f "$LR_READER" ] &&
309                 export LR_READER=$(which lr_reader 2> /dev/null)
310         [ -z "$LR_READER" ] && export LR_READER="/usr/sbin/lr_reader"
311         export LSOM_SYNC=${LSOM_SYNC:-"$LUSTRE/utils/llsom_sync"}
312         [ ! -f "$LSOM_SYNC" ] &&
313                 export LSOM_SYNC=$(which llsom_sync 2> /dev/null)
314         [ -z "$LSOM_SYNC" ] && export LSOM_SYNC="/usr/sbin/llsom_sync"
315         export NAME=${NAME:-local}
316         export LGSSD=${LGSSD:-"$LUSTRE/utils/gss/lgssd"}
317         [ "$GSS_PIPEFS" = "true" ] && [ ! -f "$LGSSD" ] &&
318                 export LGSSD=$(which lgssd)
319         export LSVCGSSD=${LSVCGSSD:-"$LUSTRE/utils/gss/lsvcgssd"}
320         [ ! -f "$LSVCGSSD" ] && export LSVCGSSD=$(which lsvcgssd 2> /dev/null)
321         export KRB5DIR=${KRB5DIR:-"/usr/kerberos"}
322         export DIR2
323         export SAVE_PWD=${SAVE_PWD:-$LUSTRE/tests}
324         export AT_MAX_PATH
325         export LDEV=${LDEV:-"$LUSTRE/scripts/ldev"}
326         [ ! -f "$LDEV" ] && export LDEV=$(which ldev 2> /dev/null)
327
328         export DMSETUP=${DMSETUP:-dmsetup}
329         export DM_DEV_PATH=${DM_DEV_PATH:-/dev/mapper}
330         export LOSETUP=${LOSETUP:-losetup}
331
332         if [ "$ACCEPTOR_PORT" ]; then
333                 export PORT_OPT="--port $ACCEPTOR_PORT"
334         fi
335
336         if $SHARED_KEY; then
337                 $RPC_MODE || echo "Using GSS shared-key feature"
338                 which lgss_sk > /dev/null 2>&1 ||
339                         error_exit "built with lgss_sk disabled! SEC=$SEC"
340                 GSS=true
341                 GSS_SK=true
342                 SEC=$SK_FLAVOR
343         fi
344
345         case "x$SEC" in
346                 xkrb5*)
347                 $RPC_MODE || echo "Using GSS/krb5 ptlrpc security flavor"
348                 which lgss_keyring > /dev/null 2>&1 ||
349                         error_exit "built with gss disabled! SEC=$SEC"
350                 GSS=true
351                 GSS_KRB5=true
352                 ;;
353         esac
354
355         case "x$IDUP" in
356                 xtrue)
357                         IDENTITY_UPCALL=true
358                         ;;
359                 xfalse)
360                         IDENTITY_UPCALL=false
361                         ;;
362         esac
363
364         export LOAD_MODULES_REMOTE=${LOAD_MODULES_REMOTE:-false}
365
366         # Paths on remote nodes, if different
367         export RLUSTRE=${RLUSTRE:-$LUSTRE}
368         export RPWD=${RPWD:-$PWD}
369         export I_MOUNTED=${I_MOUNTED:-"no"}
370         export AUSTER_CLEANUP=${AUSTER_CLEANUP:-false}
371         if [ ! -f /lib/modules/$(uname -r)/kernel/fs/lustre/mdt.ko -a \
372              ! -f /lib/modules/$(uname -r)/updates/kernel/fs/lustre/mdt.ko -a \
373              ! -f /lib/modules/$(uname -r)/extra/kernel/fs/lustre/mdt.ko -a \
374              ! -f $LUSTRE/mdt/mdt.ko ]; then
375             export CLIENTMODSONLY=yes
376         fi
377
378         export SHUTDOWN_ATTEMPTS=${SHUTDOWN_ATTEMPTS:-3}
379         export OSD_TRACK_DECLARES_LBUG=${OSD_TRACK_DECLARES_LBUG:-"yes"}
380
381         # command line
382
383         while getopts "rvwf:" opt $*; do
384                 case $opt in
385                         f) CONFIG=$OPTARG;;
386                         r) REFORMAT=yes;;
387                         v) VERBOSE=true;;
388                         w) WRITECONF=writeconf;;
389                         \?) usage;;
390                 esac
391         done
392
393         shift $((OPTIND - 1))
394         ONLY=${ONLY:-$*}
395
396         # print the durations of each test if "true"
397         DDETAILS=${DDETAILS:-false}
398         [ "$TESTSUITELOG" ] && rm -f $TESTSUITELOG || true
399         if ! $RPC_MODE; then
400                 rm -f $TMP/*active
401         fi
402
403         export TF_FAIL=${TF_FAIL:-$TMP/tf.fail}
404 }
405
406 check_cpt_number() {
407         local facet=$1
408         local ncpts
409
410         ncpts=$(do_facet $facet "lctl get_param -n " \
411                 "cpu_partition_table 2>/dev/null| wc -l" || echo 1)
412
413         if [ $ncpts -eq 0 ]; then
414                 echo "1"
415         else
416                 echo $ncpts
417         fi
418 }
419
420 # Return a numeric version code based on a version string.  The version
421 # code is useful for comparison two version strings to see which is newer.
422 version_code() {
423         # split arguments like "1.8.6-wc3" into "1", "8", "6", "wc3"
424         eval set -- $(tr "[:punct:]" " " <<< $*)
425
426         echo -n "$((($1 << 16) | ($2 << 8) | $3))"
427 }
428
429 export LINUX_VERSION=$(uname -r | sed -e "s/\([0-9]*\.[0-9]*\.[0-9]*\).*/\1/")
430 export LINUX_VERSION_CODE=$(version_code ${LINUX_VERSION//\./ })
431
432 # Report the Lustre build version string (e.g. 1.8.7.3 or 2.4.1).
433 #
434 # usage: lustre_build_version
435 #
436 # All Lustre versions support "lctl get_param" to report the version of the
437 # code running in the kernel (what our tests are interested in), but it
438 # doesn't work without modules loaded.  After 2.9.53 and in upstream kernels
439 # the "version" parameter doesn't include "lustre: " at the beginning.
440 # If that fails, call "lctl lustre_build_version" which prints either (or both)
441 # the userspace and kernel build versions, but until 2.8.55 required root
442 # access to get the Lustre kernel version.  If that also fails, fall back to
443 # using "lctl --version", which is easy to parse and works without the kernel
444 # modules, but was only added in 2.6.50 and only prints the lctl tool version,
445 # not the module version, though they are usually the same.
446 #
447 # Various commands and their output format for different Lustre versions:
448 # lctl get_param version:       2.9.55
449 # lctl get_param version:       lustre: 2.8.53
450 # lctl get_param version:       lustre: 2.6.52
451 #                               kernel: patchless_client
452 #                               build: v2_6_92_0-2.6.32-431.el6_lustre.x86_64
453 # lctl lustre_build_version:    Lustre version: 2.8.53_27_gae67fc01
454 # lctl lustre_build_version:    error: lustre_build_version: Permission denied
455 #       (as non-root user)      lctl   version: v2_6_92_0-2.6.32-431.el6.x86_64
456 # lctl lustre_build_version:    Lustre version: 2.5.3-2.6.32.26-175.fc12.x86_64
457 #                               lctl   version: 2.5.3-2.6.32..26-175fc12.x86_64
458 # lctl --version:               lctl 2.6.50
459 #
460 # output: prints version string to stdout in (up to 4) dotted-decimal values
461 lustre_build_version() {
462         local facet=${1:-client}
463         local ver=$(do_facet $facet "$LCTL get_param -n version 2>/dev/null ||
464                                 $LCTL lustre_build_version 2>/dev/null ||
465                                 $LCTL --version 2>/dev/null | cut -d' ' -f2")
466         local lver=$(egrep -i "lustre: |version: " <<<"$ver" | head -n 1)
467         [ -n "$lver" ] && ver="$lver"
468
469         sed -e 's/[^:]*: //' -e 's/^v//' -e 's/[ -].*//' -e 's/_/./g' <<<$ver |
470                 cut -d. -f1-4
471 }
472
473 # Report the Lustre numeric build version code for the supplied facet.
474 lustre_version_code() {
475         version_code $(lustre_build_version $1)
476 }
477
478 module_loaded () {
479         /sbin/lsmod | grep -q "^\<$1\>"
480 }
481
482 PRLFS=false
483 lustre_insmod() {
484         local module=$1
485         shift
486         local args="$@"
487         local msg
488         local rc=0
489
490         if ! $PRLFS; then
491                 msg="$(insmod $module $args 2>&1)" && return 0 || rc=$?
492         fi
493
494         # parallels can't load modules directly from prlfs, use /tmp instead
495         if $PRLFS || [[ "$(stat -f -c%t $module)" == "7c7c6673" ]]; then
496                 local target="$(mktemp)"
497
498                 cp "$module" "$target"
499                 insmod $target $args
500                 rc=$?
501                 [[ $rc == 0 ]] && PRLFS=true
502                 rm -f $target
503         else
504                 echo "$msg"
505         fi
506         return $rc
507 }
508
509 # Load a module on the system where this is running.
510 #
511 # usage: load_module module_name [module arguments for insmod/modprobe]
512 #
513 # If module arguments are not given but MODOPTS_<MODULE> is set, then its value
514 # will be used as the arguments.  Otherwise arguments will be obtained from
515 # /etc/modprobe.conf, from /etc/modprobe.d/Lustre, or else none will be used.
516 #
517 load_module() {
518         local module=$1 # '../libcfs/libcfs/libcfs', 'obdclass/obdclass', ...
519         shift
520         local ext=".ko"
521         local base=$(basename $module $ext)
522         local path
523         local -A module_is_loaded_aa
524         local optvar
525         local mod
526
527         for mod in $(lsmod | awk '{ print $1; }'); do
528                 module_is_loaded_aa[${mod//-/_}]=true
529         done
530
531         module_is_loaded() {
532                 ${module_is_loaded_aa[${1//-/_}]:-false}
533         }
534
535         if module_is_loaded $base; then
536                 return
537         fi
538
539         if [[ -f $LUSTRE/$module$ext ]]; then
540                 path=$LUSTRE/$module$ext
541         elif [[ "$base" == lnet_selftest ]] &&
542              [[ -f $LUSTRE/../lnet/selftest/$base$ext ]]; then
543                 path=$LUSTRE/../lnet/selftest/$base$ext
544         else
545                 path=''
546         fi
547
548         if [[ -n "$path" ]]; then
549                 # Try to load any non-Lustre modules that $module depends on.
550                 for mod in $(modinfo --field=depends $path | tr ',' ' '); do
551                         if ! module_is_loaded $mod; then
552                                 modprobe $mod
553                         fi
554                 done
555         fi
556
557         # If no module arguments were passed then get them from
558         # $MODOPTS_<MODULE>, otherwise from modprobe.conf.
559         if [ $# -eq 0 ]; then
560                 # $MODOPTS_<MODULE>; we could use associative arrays, but that's
561                 # not in Bash until 4.x, so we resort to eval.
562                 optvar="MODOPTS_$(basename $module | tr a-z A-Z)"
563                 eval set -- \$$optvar
564                 if [ $# -eq 0 -a -n "$MODPROBECONF" ]; then
565                         # Nothing in $MODOPTS_<MODULE>; try modprobe.conf
566                         local opt
567                         opt=$(awk -v var="^options $base" '$0 ~ var \
568                               {gsub("'"options $base"'",""); print}' \
569                                 $MODPROBECONF)
570                         set -- $(echo -n $opt)
571
572                         # Ensure we have accept=all for lnet
573                         if [[ "$base" == lnet ]]; then
574                                 # OK, this is a bit wordy...
575                                 local arg accept_all_present=false
576
577                                 for arg in "$@"; do
578                                         [[ "$arg" == accept=all ]] &&
579                                                 accept_all_present=true
580                                 done
581
582                                 $accept_all_present || set -- "$@" accept=all
583                         fi
584
585                         export $optvar="$*"
586                 fi
587         fi
588
589         [ $# -gt 0 ] && echo "${module} options: '$*'"
590
591         # Note that insmod will ignore anything in modprobe.conf, which is why
592         # we're passing options on the command-line. If $path does not exist
593         # then we must be testing a "make install" or"rpm" installation. Also
594         # note that failing to load ptlrpc_gss is not considered fatal.
595         if [[ -n "$path" ]]; then
596                 lustre_insmod $path "$@"
597         elif [[ "$base" == ptlrpc_gss ]]; then
598                 if ! modprobe $base "$@" 2>/dev/null; then
599                         echo "gss/krb5 is not supported"
600                 fi
601         else
602                 modprobe $base "$@"
603         fi
604 }
605
606 load_modules_local() {
607         if [ -n "$MODPROBE" ]; then
608                 # use modprobe
609                 echo "Using modprobe to load modules"
610                 return 0
611         fi
612
613         echo Loading modules from $LUSTRE
614
615         local ncpus
616
617         if [ -f /sys/devices/system/cpu/online ]; then
618                 ncpus=$(($(cut -d "-" -f 2 /sys/devices/system/cpu/online) + 1))
619                 echo "detected $ncpus online CPUs by sysfs"
620         else
621                 ncpus=$(getconf _NPROCESSORS_CONF 2>/dev/null)
622                 local rc=$?
623                 if [ $rc -eq 0 ]; then
624                         echo "detected $ncpus online CPUs by getconf"
625                 else
626                         echo "Can't detect number of CPUs"
627                         ncpus=1
628                 fi
629         fi
630
631         # if there is only one CPU core, libcfs can only create one partition
632         # if there is more than 4 CPU cores, libcfs should create multiple CPU
633         # partitions. So we just force libcfs to create 2 partitions for
634         # system with 2 or 4 cores
635         if [ $ncpus -le 4 ] && [ $ncpus -gt 1 ]; then
636                 # force to enable multiple CPU partitions
637                 echo "Force libcfs to create 2 CPU partitions"
638                 MODOPTS_LIBCFS="cpu_npartitions=2 $MODOPTS_LIBCFS"
639         else
640                 echo "libcfs will create CPU partition based on online CPUs"
641         fi
642
643         load_module ../libcfs/libcfs/libcfs
644         # Prevent local MODOPTS_LIBCFS being passed as part of environment
645         # variable to remote nodes
646         unset MODOPTS_LIBCFS
647
648         set_default_debug
649         load_module ../lnet/lnet/lnet
650
651         LNDPATH=${LNDPATH:-"../lnet/klnds"}
652         if [ -z "$LNETLND" ]; then
653                 case $NETTYPE in
654                 o2ib*)  LNETLND="o2iblnd/ko2iblnd" ;;
655                 tcp*)   LNETLND="socklnd/ksocklnd" ;;
656                 *)      local lnd="${NETTYPE%%[0-9]}lnd"
657                         [ -f "$LNDPATH/$lnd/k$lnd.ko" ] &&
658                                 LNETLND="$lnd/k$lnd" ||
659                                 LNETLND="socklnd/ksocklnd"
660                 esac
661         fi
662         load_module ../lnet/klnds/$LNETLND
663         load_module obdclass/obdclass
664         load_module ptlrpc/ptlrpc
665         load_module ptlrpc/gss/ptlrpc_gss
666         load_module fld/fld
667         load_module fid/fid
668         load_module lmv/lmv
669         load_module osc/osc
670         load_module mdc/mdc
671         load_module lov/lov
672         load_module mgc/mgc
673         load_module obdecho/obdecho
674         if ! client_only; then
675                 load_module lfsck/lfsck
676                 [ "$LQUOTA" != "no" ] &&
677                         load_module quota/lquota $LQUOTAOPTS
678                 if [[ $(node_fstypes $HOSTNAME) == *zfs* ]]; then
679                         load_module osd-zfs/osd_zfs
680                 elif [[ $(node_fstypes $HOSTNAME) == *ldiskfs* ]]; then
681                         load_module ../ldiskfs/ldiskfs
682                         load_module osd-ldiskfs/osd_ldiskfs
683                 fi
684                 load_module mgs/mgs
685                 load_module mdd/mdd
686                 load_module mdt/mdt
687                 load_module ost/ost
688                 load_module lod/lod
689                 load_module osp/osp
690                 load_module ofd/ofd
691                 load_module osp/osp
692         fi
693
694         load_module llite/lustre
695         [ -d /r ] && OGDB=${OGDB:-"/r/tmp"}
696         OGDB=${OGDB:-$TMP}
697         rm -f $OGDB/ogdb-$HOSTNAME
698         $LCTL modules > $OGDB/ogdb-$HOSTNAME
699
700         # 'mount' doesn't look in $PATH, just sbin
701         local mount_lustre=$LUSTRE/utils/mount.lustre
702         if [ -f $mount_lustre ]; then
703                 local sbin_mount=$(readlink -f /sbin)/mount.lustre
704                 if grep -qw "$sbin_mount" /proc/mounts; then
705                         cmp -s $mount_lustre $sbin_mount || umount $sbin_mount
706                 fi
707                 if ! grep -qw "$sbin_mount" /proc/mounts; then
708                         [ ! -f "$sbin_mount" ] && touch "$sbin_mount"
709                         if [ ! -s "$sbin_mount" -a -w "$sbin_mount" ]; then
710                                 cat <<- EOF > "$sbin_mount"
711                                 #!/bin/sh
712                                 #STUB MARK
713                                 echo "This $sbin_mount just a mountpoint." 1>&2
714                                 echo "It is never supposed to be run." 1>&2
715                                 logger -p emerg -- "using stub $sbin_mount $@"
716                                 exit 1
717                                 EOF
718                                 chmod a+x $sbin_mount
719                         fi
720                         mount --bind $mount_lustre $sbin_mount ||
721                                 error "can't bind $mount_lustre to $sbin_mount"
722                 fi
723         fi
724 }
725
726 load_modules () {
727         load_modules_local
728         # bug 19124
729         # load modules on remote nodes optionally
730         # lustre-tests have to be installed on these nodes
731         if $LOAD_MODULES_REMOTE; then
732                 local list=$(comma_list $(remote_nodes_list))
733                 if [ -n "$list" ]; then
734                         echo "loading modules on: '$list'"
735                         do_rpc_nodes "$list" load_modules_local
736                 fi
737         fi
738 }
739
740 check_mem_leak () {
741     LEAK_LUSTRE=$(dmesg | tail -n 30 | grep "obd_memory.*leaked" || true)
742     LEAK_PORTALS=$(dmesg | tail -n 20 | grep "Portals memory leaked" || true)
743     if [ "$LEAK_LUSTRE" -o "$LEAK_PORTALS" ]; then
744         echo "$LEAK_LUSTRE" 1>&2
745         echo "$LEAK_PORTALS" 1>&2
746         mv $TMP/debug $TMP/debug-leak.`date +%s` || true
747         echo "Memory leaks detected"
748         [ -n "$IGNORE_LEAK" ] && { echo "ignoring leaks" && return 0; } || true
749         return 1
750     fi
751 }
752
753 unload_modules() {
754         wait_exit_ST client # bug 12845
755
756         $LUSTRE_RMMOD ldiskfs || return 2
757
758         if $LOAD_MODULES_REMOTE; then
759                 local list=$(comma_list $(remote_nodes_list))
760                 if [ -n "$list" ]; then
761                         echo "unloading modules on: '$list'"
762                         do_rpc_nodes "$list" $LUSTRE_RMMOD ldiskfs
763                         do_rpc_nodes "$list" check_mem_leak
764                 fi
765         fi
766
767         local sbin_mount=$(readlink -f /sbin)/mount.lustre
768         if grep -qe "$sbin_mount " /proc/mounts; then
769                 umount $sbin_mount || true
770                 [ -s $sbin_mount ] && ! grep -q "STUB MARK" $sbin_mount ||
771                         rm -f $sbin_mount
772         fi
773
774         check_mem_leak || return 254
775
776         echo "modules unloaded."
777         return 0
778 }
779
780 fs_log_size() {
781         local facet=${1:-$SINGLEMDS}
782         local size=0
783
784         case $(facet_fstype $facet) in
785                 ldiskfs) size=50;; # largest seen is 44, leave some headroom
786                 # grant_block_size is in bytes, allow at least 2x max blocksize
787                 zfs)     size=$(lctl get_param osc.$FSNAME*.import |
788                                 awk '/grant_block_size:/ {print $2/512; exit;}')
789                           ;;
790         esac
791
792         echo -n $((size * MDSCOUNT))
793 }
794
795 fs_inode_ksize() {
796         local facet=${1:-$SINGLEMDS}
797         local fstype=$(facet_fstype $facet)
798         local size=0
799         case $fstype in
800                 ldiskfs) size=4;;  # ~4KB per inode
801                 zfs)     size=11;; # 10 to 11KB per inode
802         esac
803
804         echo -n $size
805 }
806
807 check_gss_daemon_nodes() {
808     local list=$1
809     dname=$2
810
811     do_nodesv $list "num=\\\$(ps -o cmd -C $dname | grep $dname | wc -l);
812 if [ \\\"\\\$num\\\" -ne 1 ]; then
813     echo \\\$num instance of $dname;
814     exit 1;
815 fi; "
816 }
817
818 check_gss_daemon_facet() {
819     facet=$1
820     dname=$2
821
822     num=`do_facet $facet ps -o cmd -C $dname | grep $dname | wc -l`
823     if [ $num -ne 1 ]; then
824         echo "$num instance of $dname on $facet"
825         return 1
826     fi
827     return 0
828 }
829
830 send_sigint() {
831     local list=$1
832     shift
833     echo Stopping $@ on $list
834     do_nodes $list "killall -2 $@ 2>/dev/null || true"
835 }
836
837 # start gss daemons on all nodes, or "daemon" on "nodes" if set
838 start_gss_daemons() {
839         local nodes=$1
840         local daemon=$2
841
842         if [ "$nodes" ] && [ "$daemon" ] ; then
843                 echo "Starting gss daemon on nodes: $nodes"
844                 do_nodes $nodes "$daemon" || return 8
845                 return 0
846         fi
847
848         nodes=$(comma_list $(mdts_nodes))
849         echo "Starting gss daemon on mds: $nodes"
850         if $GSS_SK; then
851                 # Start all versions, in case of switching
852                 do_nodes $nodes "$LSVCGSSD -vvv -s -m -o -z" || return 1
853         else
854                 do_nodes $nodes "$LSVCGSSD -v" || return 1
855         fi
856         if $GSS_PIPEFS; then
857                 do_nodes $nodes "$LGSSD -v" || return 2
858         fi
859
860         nodes=$(comma_list $(osts_nodes))
861         echo "Starting gss daemon on ost: $nodes"
862         if $GSS_SK; then
863                 # Start all versions, in case of switching
864                 do_nodes $nodes "$LSVCGSSD -vvv -s -m -o -z" || return 3
865         else
866                 do_nodes $nodes "$LSVCGSSD -v" || return 3
867         fi
868         # starting on clients
869
870         local clients=${CLIENTS:-$HOSTNAME}
871         if $GSS_PIPEFS; then
872                 echo "Starting $LGSSD on clients $clients "
873                 do_nodes $clients  "$LGSSD -v" || return 4
874         fi
875
876         # wait daemons entering "stable" status
877         sleep 5
878
879         #
880         # check daemons are running
881         #
882         nodes=$(comma_list $(mdts_nodes) $(osts_nodes))
883         check_gss_daemon_nodes $nodes lsvcgssd || return 5
884         if $GSS_PIPEFS; then
885                 nodes=$(comma_list $(mdts_nodes))
886                 check_gss_daemon_nodes $nodes lgssd || return 6
887         fi
888         if $GSS_PIPEFS; then
889                 check_gss_daemon_nodes $clients lgssd || return 7
890         fi
891 }
892
893 stop_gss_daemons() {
894         local nodes=$(comma_list $(mdts_nodes))
895
896         send_sigint $nodes lsvcgssd lgssd
897
898         nodes=$(comma_list $(osts_nodes))
899         send_sigint $nodes lsvcgssd
900
901         nodes=${CLIENTS:-$HOSTNAME}
902         send_sigint $nodes lgssd
903 }
904
905 add_sk_mntflag() {
906         # Add mount flags for shared key
907         local mt_opts=$@
908         if grep -q skpath <<< "$mt_opts" ; then
909                 mt_opts=$(echo $mt_opts |
910                         sed -e "s#skpath=[^ ,]*#skpath=$SK_PATH#")
911         else
912                 if [ -z "$mt_opts" ]; then
913                         mt_opts="-o skpath=$SK_PATH"
914                 else
915                         mt_opts="$mt_opts,skpath=$SK_PATH"
916                 fi
917         fi
918         echo -n $mt_opts
919 }
920
921 init_gss() {
922         if $SHARED_KEY; then
923                 GSS=true
924                 GSS_SK=true
925         fi
926
927         if ! $GSS; then
928                 return
929         fi
930
931         if ! module_loaded ptlrpc_gss; then
932                 load_module ptlrpc/gss/ptlrpc_gss
933                 module_loaded ptlrpc_gss ||
934                         error_exit "init_gss: GSS=$GSS, but gss/krb5 missing"
935         fi
936
937         if $GSS_KRB5 || $GSS_SK; then
938                 start_gss_daemons || error_exit "start gss daemon failed! rc=$?"
939         fi
940
941         if $GSS_SK && $SK_NO_KEY; then
942                 local numclients=${1:-$CLIENTCOUNT}
943                 local clients=${CLIENTS:-$HOSTNAME}
944
945                 # security ctx config for keyring
946                 SK_NO_KEY=false
947                 mkdir -p $SK_OM_PATH
948                 if grep -q request-key /proc/mounts > /dev/null; then
949                         echo "SSK: Request key already mounted."
950                 else
951                         mount -o bind $SK_OM_PATH /etc/request-key.d/
952                 fi
953                 local lgssc_conf_line='create lgssc * * '
954                 lgssc_conf_line+=$(which lgss_keyring)
955                 lgssc_conf_line+=' %o %k %t %d %c %u %g %T %P %S'
956
957                 local lgssc_conf_file="/etc/request-key.d/lgssc.conf"
958                 echo "$lgssc_conf_line" > $lgssc_conf_file
959                 [ -e $lgssc_conf_file ] ||
960                         error_exit "Could not find key options in $lgssc_conf_file"
961
962                 if ! local_mode; then
963                         do_nodes $(comma_list $(all_nodes)) "mkdir -p \
964                                 $SK_OM_PATH"
965                         do_nodes $(comma_list $(all_nodes)) "mount \
966                                 -o bind $SK_OM_PATH \
967                                 /etc/request-key.d/"
968                         do_nodes $(comma_list $(all_nodes)) "rsync -aqv \
969                                 $HOSTNAME:$lgssc_conf_file \
970                                 $lgssc_conf_file >/dev/null 2>&1"
971                 fi
972
973                 # create shared key on all nodes
974                 mkdir -p $SK_PATH/nodemap
975                 rm -f $SK_PATH/$FSNAME.key $SK_PATH/nodemap/c*.key \
976                         $SK_PATH/$FSNAME-*.key
977                 # for nodemap testing each client may need own key,
978                 # and S2S now requires keys as well, both for "client"
979                 # and for "server"
980                 if $SK_S2S; then
981                         lgss_sk -t server -f$FSNAME -n $SK_S2SNMCLI \
982                                 -w $SK_PATH/$FSNAME-nmclient.key \
983                                 -d /dev/urandom >/dev/null 2>&1
984                         lgss_sk -t mgs,server -f$FSNAME -n $SK_S2SNM \
985                                 -w $SK_PATH/$FSNAME-s2s-server.key \
986                                 -d /dev/urandom >/dev/null 2>&1
987                 fi
988                 # basic key create
989                 lgss_sk -t server -f$FSNAME -w $SK_PATH/$FSNAME.key \
990                         -d /dev/urandom >/dev/null 2>&1
991                 # per-nodemap keys
992                 for i in $(seq 0 $((numclients - 1))); do
993                         lgss_sk -t server -f$FSNAME -n c$i \
994                                 -w $SK_PATH/nodemap/c$i.key -d /dev/urandom \
995                                 >/dev/null 2>&1
996                 done
997                 # Distribute keys
998                 if ! local_mode; then
999                         do_nodes $(comma_list $(all_nodes)) "rsync -av \
1000                                 $HOSTNAME:$SK_PATH/ $SK_PATH >/dev/null 2>&1"
1001                 fi
1002                 # Set client keys to client type to generate prime P
1003                 if local_mode; then
1004                         do_nodes $(all_nodes) "lgss_sk -t client,server -m \
1005                                 $SK_PATH/$FSNAME.key >/dev/null 2>&1"
1006                 else
1007                         do_nodes $clients "lgss_sk -t client -m \
1008                                 $SK_PATH/$FSNAME.key >/dev/null 2>&1"
1009                         do_nodes $clients "find $SK_PATH/nodemap -name \*.key | \
1010                                 xargs -IX lgss_sk -t client -m X >/dev/null 2>&1"
1011                 fi
1012                 # This is required for servers as well, if S2S in use
1013                 if $SK_S2S; then
1014                         do_nodes $(comma_list $(mdts_nodes)) \
1015                                 "cp $SK_PATH/$FSNAME-s2s-server.key \
1016                                 $SK_PATH/$FSNAME-s2s-client.key; lgss_sk \
1017                                 -t client -m $SK_PATH/$FSNAME-s2s-client.key \
1018                                 >/dev/null 2>&1"
1019                         do_nodes $(comma_list $(osts_nodes)) \
1020                                 "cp $SK_PATH/$FSNAME-s2s-server.key \
1021                                 $SK_PATH/$FSNAME-s2s-client.key; lgss_sk \
1022                                 -t client -m $SK_PATH/$FSNAME-s2s-client.key \
1023                                 >/dev/null 2>&1"
1024                         do_nodes $clients "lgss_sk -t client \
1025                                 -m $SK_PATH/$FSNAME-nmclient.key \
1026                                  >/dev/null 2>&1"
1027                 fi
1028         fi
1029         if $GSS_SK; then
1030                 # mount options for servers and clients
1031                 MGS_MOUNT_OPTS=$(add_sk_mntflag $MGS_MOUNT_OPTS)
1032                 MDS_MOUNT_OPTS=$(add_sk_mntflag $MDS_MOUNT_OPTS)
1033                 OST_MOUNT_OPTS=$(add_sk_mntflag $OST_MOUNT_OPTS)
1034                 MOUNT_OPTS=$(add_sk_mntflag $MOUNT_OPTS)
1035                 SEC=$SK_FLAVOR
1036         fi
1037
1038         if [ -n "$LGSS_KEYRING_DEBUG" ]; then
1039                 lctl set_param -n \
1040                         sptlrpc.gss.lgss_keyring.debug_level=$LGSS_KEYRING_DEBUG
1041         fi
1042 }
1043
1044 cleanup_gss() {
1045         if $GSS; then
1046                 stop_gss_daemons
1047                 # maybe cleanup credential cache?
1048         fi
1049 }
1050
1051 cleanup_sk() {
1052         if $GSS_SK; then
1053                 if $SK_S2S; then
1054                         do_node $(mgs_node) "$LCTL nodemap_del $SK_S2SNM"
1055                         do_node $(mgs_node) "$LCTL nodemap_del $SK_S2SNMCLI"
1056                         $RPC_MODE || echo "Sleeping for 10 sec for Nodemap.."
1057                         sleep 10
1058                 fi
1059                 stop_gss_daemons
1060                 $RPC_MODE || echo "Cleaning up Shared Key.."
1061                 do_nodes $(comma_list $(all_nodes)) "rm -f \
1062                         $SK_PATH/$FSNAME*.key $SK_PATH/nodemap/$FSNAME*.key"
1063                 do_nodes $(comma_list $(all_nodes)) "keyctl show | \
1064                   awk '/lustre/ { print \\\$1 }' | xargs -IX keyctl unlink X"
1065                 # Remove the mount and clean up the files we added to SK_PATH
1066                 do_nodes $(comma_list $(all_nodes)) "while grep -q \
1067                         request-key.d /proc/mounts; do umount \
1068                         /etc/request-key.d/; done"
1069                 do_nodes $(comma_list $(all_nodes)) "rm -f \
1070                         $SK_OM_PATH/lgssc.conf"
1071                 do_nodes $(comma_list $(all_nodes)) "rmdir $SK_OM_PATH"
1072                 SK_NO_KEY=true
1073         fi
1074 }
1075
1076 facet_svc() {
1077         local facet=$1
1078         local var=${facet}_svc
1079
1080         echo -n ${!var}
1081 }
1082
1083 facet_type() {
1084         local facet=$1
1085
1086         echo -n $facet | sed -e 's/^fs[0-9]\+//' -e 's/[0-9_]\+//' |
1087                 tr '[:lower:]' '[:upper:]'
1088 }
1089
1090 facet_number() {
1091         local facet=$1
1092
1093         if [ $facet == mgs ] || [ $facet == client ]; then
1094                 return 1
1095         fi
1096
1097         echo -n $facet | sed -e 's/^fs[0-9]\+//' | sed -e 's/^[a-z]\+//'
1098 }
1099
1100 facet_fstype() {
1101         local facet=$1
1102         local var
1103
1104         var=${facet}_FSTYPE
1105         if [ -n "${!var}" ]; then
1106                 echo -n ${!var}
1107                 return
1108         fi
1109
1110         var=$(facet_type $facet)FSTYPE
1111         if [ -n "${!var}" ]; then
1112                 echo -n ${!var}
1113                 return
1114         fi
1115
1116         if [ -n "$FSTYPE" ]; then
1117                 echo -n $FSTYPE
1118                 return
1119         fi
1120
1121         if [[ $facet == mgs ]] && combined_mgs_mds; then
1122                 facet_fstype mds1
1123                 return
1124         fi
1125
1126         return 1
1127 }
1128
1129 node_fstypes() {
1130         local node=$1
1131         local fstypes
1132         local fstype
1133         local facets=$(get_facets)
1134         local facet
1135
1136         for facet in ${facets//,/ }; do
1137                 if [ $node == $(facet_host $facet) ] ||
1138                    [ $node == "$(facet_failover_host $facet)" ]; then
1139                         fstype=$(facet_fstype $facet)
1140                         if [[ $fstypes != *$fstype* ]]; then
1141                                 fstypes+="${fstypes:+,}$fstype"
1142                         fi
1143                 fi
1144         done
1145         echo -n $fstypes
1146 }
1147
1148 facet_index() {
1149         local facet=$1
1150         local num=$(facet_number $facet)
1151         local index
1152
1153         if [[ $(facet_type $facet) = OST ]]; then
1154                 index=OSTINDEX${num}
1155                 if [[ -n "${!index}" ]]; then
1156                         echo -n ${!index}
1157                         return
1158                 fi
1159
1160                 index=${OST_INDICES[num - 1]}
1161         fi
1162
1163         [[ -n "$index" ]] || index=$((num - 1))
1164         echo -n $index
1165 }
1166
1167 devicelabel() {
1168         local facet=$1
1169         local dev=$2
1170         local label
1171         local fstype=$(facet_fstype $facet)
1172
1173         case $fstype in
1174         ldiskfs)
1175                 label=$(do_facet ${facet} "$E2LABEL ${dev} 2>/dev/null");;
1176         zfs)
1177                 label=$(do_facet ${facet} "$ZFS get -H -o value lustre:svname \
1178                                            ${dev} 2>/dev/null");;
1179         *)
1180                 error "unknown fstype!";;
1181         esac
1182
1183         echo -n $label
1184 }
1185
1186 mdsdevlabel() {
1187         local num=$1
1188         local device=$(mdsdevname $num)
1189         local label=$(devicelabel mds$num ${device} | grep -v "CMD: ")
1190         echo -n $label
1191 }
1192
1193 ostdevlabel() {
1194         local num=$1
1195         local device=$(ostdevname $num)
1196         local label=$(devicelabel ost$num ${device} | grep -v "CMD: ")
1197         echo -n $label
1198 }
1199
1200 #
1201 # Get the device of a facet.
1202 #
1203 facet_device() {
1204         local facet=$1
1205         local device
1206
1207         case $facet in
1208                 mgs) device=$(mgsdevname) ;;
1209                 mds*) device=$(mdsdevname $(facet_number $facet)) ;;
1210                 ost*) device=$(ostdevname $(facet_number $facet)) ;;
1211                 fs2mds) device=$(mdsdevname 1_2) ;;
1212                 fs2ost) device=$(ostdevname 1_2) ;;
1213                 fs3ost) device=$(ostdevname 2_2) ;;
1214                 *) ;;
1215         esac
1216
1217         echo -n $device
1218 }
1219
1220 #
1221 # Get the virtual device of a facet.
1222 #
1223 facet_vdevice() {
1224         local facet=$1
1225         local device
1226
1227         case $facet in
1228                 mgs) device=$(mgsvdevname) ;;
1229                 mds*) device=$(mdsvdevname $(facet_number $facet)) ;;
1230                 ost*) device=$(ostvdevname $(facet_number $facet)) ;;
1231                 fs2mds) device=$(mdsvdevname 1_2) ;;
1232                 fs2ost) device=$(ostvdevname 1_2) ;;
1233                 fs3ost) device=$(ostvdevname 2_2) ;;
1234                 *) ;;
1235         esac
1236
1237         echo -n $device
1238 }
1239
1240 running_in_vm() {
1241         local virt=$(virt-what 2> /dev/null)
1242
1243         [ $? -eq 0 ] && [ -n "$virt" ] && { echo $virt; return; }
1244
1245         virt=$(dmidecode -s system-product-name | awk '{print $1}')
1246
1247         case $virt in
1248                 VMware|KVM|VirtualBox|Parallels)
1249                         echo $virt | tr '[A-Z]' '[a-z]' ;;
1250                 *) ;;
1251         esac
1252 }
1253
1254 #
1255 # Re-read the partition table on failover partner host.
1256 # After a ZFS storage pool is created on a shared device, the partition table
1257 # on the device may change. However, the operating system on the failover
1258 # host may not notice the change automatically. Without the up-to-date partition
1259 # block devices, 'zpool import ..' cannot find the labels, whose positions are
1260 # relative to partition rather than disk beginnings.
1261 #
1262 # This function performs partprobe on the failover host to make it re-read the
1263 # partition table.
1264 #
1265 refresh_partition_table() {
1266         local facet=$1
1267         local device=$2
1268         local host
1269
1270         host=$(facet_passive_host $facet)
1271         if [[ -n "$host" ]]; then
1272                 do_node $host "$PARTPROBE $device"
1273         fi
1274 }
1275
1276 #
1277 # Get ZFS storage pool name.
1278 #
1279 zpool_name() {
1280         local facet=$1
1281         local device
1282         local poolname
1283
1284         device=$(facet_device $facet)
1285         # poolname is string before "/"
1286         poolname="${device%%/*}"
1287
1288         echo -n $poolname
1289 }
1290
1291 #
1292 #
1293 # Get ZFS local fsname.
1294 #
1295 zfs_local_fsname() {
1296         local facet=$1
1297         local lfsname=$(basename $(facet_device $facet))
1298
1299         echo -n $lfsname
1300 }
1301
1302 #
1303 # Create ZFS storage pool.
1304 #
1305 create_zpool() {
1306         local facet=$1
1307         local poolname=$2
1308         local vdev=$3
1309         shift 3
1310         local opts=${@:-"-o cachefile=none"}
1311
1312         do_facet $facet "lsmod | grep zfs >&/dev/null || modprobe zfs;
1313                 $ZPOOL list -H $poolname >/dev/null 2>&1 ||
1314                 $ZPOOL create -f $opts $poolname $vdev"
1315 }
1316
1317 #
1318 # Create ZFS file system.
1319 #
1320 create_zfs() {
1321         local facet=$1
1322         local dataset=$2
1323         shift 2
1324         local opts=${@:-"-o mountpoint=legacy"}
1325
1326         do_facet $facet "$ZFS list -H $dataset >/dev/null 2>&1 ||
1327                 $ZFS create $opts $dataset"
1328 }
1329
1330 #
1331 # Export ZFS storage pool.
1332 # Before exporting the pool, all datasets within the pool should be unmounted.
1333 #
1334 export_zpool() {
1335         local facet=$1
1336         shift
1337         local opts="$@"
1338         local poolname
1339
1340         poolname=$(zpool_name $facet)
1341
1342         if [[ -n "$poolname" ]]; then
1343                 do_facet $facet "! $ZPOOL list -H $poolname >/dev/null 2>&1 ||
1344                         grep -q ^$poolname/ /proc/mounts ||
1345                         $ZPOOL export $opts $poolname"
1346         fi
1347 }
1348
1349 #
1350 # Destroy ZFS storage pool.
1351 # Destroy the given pool and free up any devices for other use. This command
1352 # tries to unmount any active datasets before destroying the pool.
1353 # -f    Force any active datasets contained within the pool to be unmounted.
1354 #
1355 destroy_zpool() {
1356         local facet=$1
1357         local poolname=${2:-$(zpool_name $facet)}
1358
1359         if [[ -n "$poolname" ]]; then
1360                 do_facet $facet "! $ZPOOL list -H $poolname >/dev/null 2>&1 ||
1361                         $ZPOOL destroy -f $poolname"
1362         fi
1363 }
1364
1365 #
1366 # Import ZFS storage pool.
1367 # Force importing, even if the pool appears to be potentially active.
1368 #
1369 import_zpool() {
1370         local facet=$1
1371         shift
1372         local opts=${@:-"-o cachefile=none -o failmode=panic"}
1373         local poolname
1374
1375         poolname=$(zpool_name $facet)
1376
1377         if [[ -n "$poolname" ]]; then
1378                 opts+=" -d $(dirname $(facet_vdevice $facet))"
1379                 do_facet $facet "lsmod | grep zfs >&/dev/null || modprobe zfs;
1380                         $ZPOOL list -H $poolname >/dev/null 2>&1 ||
1381                         $ZPOOL import -f $opts $poolname"
1382         fi
1383 }
1384
1385 #
1386 # Reimport ZFS storage pool with new name
1387 #
1388 reimport_zpool() {
1389         local facet=$1
1390         local newpool=$2
1391         local opts="-o cachefile=none"
1392         local poolname=$(zpool_name $facet)
1393
1394         opts+=" -d $(dirname $(facet_vdevice $facet))"
1395         do_facet $facet "$ZPOOL export $poolname;
1396                          $ZPOOL import $opts $poolname $newpool"
1397 }
1398
1399 #
1400 # Set the "cachefile=none" property on ZFS storage pool so that the pool
1401 # is not automatically imported on system startup.
1402 #
1403 # In a failover environment, this will provide resource level fencing which
1404 # will ensure that the same ZFS storage pool will not be imported concurrently
1405 # on different nodes.
1406 #
1407 disable_zpool_cache() {
1408         local facet=$1
1409         local poolname
1410
1411         poolname=$(zpool_name $facet)
1412
1413         if [[ -n "$poolname" ]]; then
1414                 do_facet $facet "$ZPOOL set cachefile=none $poolname"
1415         fi
1416 }
1417
1418 #
1419 # This and set_osd_param() shall be used to access OSD parameters
1420 # once existed under "obdfilter":
1421 #
1422 #   mntdev
1423 #   stats
1424 #   read_cache_enable
1425 #   writethrough_cache_enable
1426 #
1427 get_osd_param() {
1428         local nodes=$1
1429         local device=${2:-$FSNAME-OST*}
1430         local name=$3
1431
1432         do_nodes $nodes "$LCTL get_param -n obdfilter.$device.$name \
1433                 osd-*.$device.$name 2>&1" | grep -v 'error:'
1434 }
1435
1436 set_osd_param() {
1437         local nodes=$1
1438         local device=${2:-$FSNAME-OST*}
1439         local name=$3
1440         local value=$4
1441
1442         do_nodes $nodes "$LCTL set_param -n obdfilter.$device.$name=$value \
1443                 osd-*.$device.$name=$value 2>&1" | grep -v 'error:'
1444 }
1445
1446 set_debug_size () {
1447     local dz=${1:-$DEBUG_SIZE}
1448
1449     if [ -f /sys/devices/system/cpu/possible ]; then
1450         local cpus=$(($(cut -d "-" -f 2 /sys/devices/system/cpu/possible)+1))
1451     else
1452         local cpus=$(getconf _NPROCESSORS_CONF 2>/dev/null)
1453     fi
1454
1455     # bug 19944, adjust size to be -gt num_possible_cpus()
1456     # promise 2MB for every cpu at least
1457     if [ -n "$cpus" ] && [ $((cpus * 2)) -gt $dz ]; then
1458         dz=$((cpus * 2))
1459     fi
1460     lctl set_param debug_mb=$dz
1461 }
1462
1463 set_default_debug () {
1464     local debug=${1:-"$PTLDEBUG"}
1465     local subsys=${2:-"$SUBSYSTEM"}
1466     local debug_size=${3:-$DEBUG_SIZE}
1467
1468     [ -n "$debug" ] && lctl set_param debug="$debug" >/dev/null
1469     [ -n "$subsys" ] && lctl set_param subsystem_debug="${subsys# }" >/dev/null
1470
1471     [ -n "$debug_size" ] && set_debug_size $debug_size > /dev/null
1472 }
1473
1474 set_default_debug_nodes () {
1475         local nodes="$1"
1476
1477         if [[ ,$nodes, = *,$HOSTNAME,* ]]; then
1478                 nodes=$(exclude_items_from_list "$nodes" "$HOSTNAME")
1479                 set_default_debug
1480         fi
1481
1482         do_rpc_nodes "$nodes" set_default_debug \
1483                 \\\"$PTLDEBUG\\\" \\\"$SUBSYSTEM\\\" $DEBUG_SIZE || true
1484 }
1485
1486 set_default_debug_facet () {
1487     local facet=$1
1488     local node=$(facet_active_host $facet)
1489     [ -z "$node" ] && echo "No host defined for facet $facet" && exit 1
1490
1491     set_default_debug_nodes $node
1492 }
1493
1494 set_hostid () {
1495     local hostid=${1:-$(hostid)}
1496
1497     if [ ! -s /etc/hostid ]; then
1498         printf $(echo -n $hostid |
1499             sed 's/\(..\)\(..\)\(..\)\(..\)/\\x\4\\x\3\\x\2\\x\1/') >/etc/hostid
1500     fi
1501 }
1502
1503 # Facet functions
1504 mount_facets () {
1505         local facets=${1:-$(get_facets)}
1506         local facet
1507
1508         for facet in ${facets//,/ }; do
1509                 mount_facet $facet
1510                 local RC=$?
1511                 [ $RC -eq 0 ] && continue
1512
1513                 if [ "$TESTSUITE.$TESTNAME" = "replay-dual.test_0a" ]; then
1514                         skip_noexit "Restart of $facet failed!." &&
1515                                 touch $LU482_FAILED
1516                 else
1517                         error "Restart of $facet failed!"
1518                 fi
1519                 return $RC
1520         done
1521 }
1522
1523 #
1524 # Add argument "arg" (e.g., "loop") to the comma-separated list
1525 # of arguments for option "opt" (e.g., "-o") on command
1526 # line "opts" (e.g., "-o flock").
1527 #
1528 csa_add() {
1529         local opts=$1
1530         local opt=$2
1531         local arg=$3
1532         local opt_pattern="\([[:space:]]\+\|^\)$opt"
1533
1534         if echo "$opts" | grep -q $opt_pattern; then
1535                 opts=$(echo "$opts" | sed -e \
1536                         "s/$opt_pattern[[:space:]]*[^[:space:]]\+/&,$arg/")
1537         else
1538                 opts+="${opts:+ }$opt $arg"
1539         fi
1540         echo -n "$opts"
1541 }
1542
1543 #
1544 # Associate loop device with a given regular file.
1545 # Return the loop device.
1546 #
1547 setup_loop_device() {
1548         local facet=$1
1549         local file=$2
1550
1551         do_facet $facet "loop_dev=\\\$($LOSETUP -j $file | cut -d : -f 1);
1552                          if [[ -z \\\$loop_dev ]]; then
1553                                 loop_dev=\\\$($LOSETUP -f);
1554                                 $LOSETUP \\\$loop_dev $file || loop_dev=;
1555                          fi;
1556                          echo -n \\\$loop_dev"
1557 }
1558
1559 #
1560 # Detach a loop device.
1561 #
1562 cleanup_loop_device() {
1563         local facet=$1
1564         local loop_dev=$2
1565
1566         do_facet $facet "! $LOSETUP $loop_dev >/dev/null 2>&1 ||
1567                          $LOSETUP -d $loop_dev"
1568 }
1569
1570 #
1571 # Check if a given device is a block device.
1572 #
1573 is_blkdev() {
1574         local facet=$1
1575         local dev=$2
1576         local size=${3:-""}
1577
1578         [[ -n "$dev" ]] || return 1
1579         do_facet $facet "test -b $dev" || return 1
1580         if [[ -n "$size" ]]; then
1581                 local in=$(do_facet $facet "dd if=$dev of=/dev/null bs=1k \
1582                                             count=1 skip=$size 2>&1" |
1583                                             awk '($3 == "in") { print $1 }')
1584                 [[ "$in" = "1+0" ]] || return 1
1585         fi
1586 }
1587
1588 #
1589 # Check if a given device is a device-mapper device.
1590 #
1591 is_dm_dev() {
1592         local facet=$1
1593         local dev=$2
1594
1595         [[ -n "$dev" ]] || return 1
1596         do_facet $facet "$DMSETUP status $dev >/dev/null 2>&1"
1597 }
1598
1599 #
1600 # Check if a given device is a device-mapper flakey device.
1601 #
1602 is_dm_flakey_dev() {
1603         local facet=$1
1604         local dev=$2
1605         local type
1606
1607         [[ -n "$dev" ]] || return 1
1608
1609         type=$(do_facet $facet "$DMSETUP status $dev 2>&1" |
1610                awk '{print $3}')
1611         [[ $type = flakey ]] && return 0 || return 1
1612 }
1613
1614 #
1615 # Check if device-mapper flakey device is supported by the kernel
1616 # of $facet node or not.
1617 #
1618 dm_flakey_supported() {
1619         local facet=$1
1620
1621         $FLAKEY || return 1
1622         do_facet $facet "modprobe dm-flakey;
1623                          $DMSETUP targets | grep -q flakey" &> /dev/null
1624 }
1625
1626 #
1627 # Get the device-mapper flakey device name of a given facet.
1628 #
1629 dm_facet_devname() {
1630         local facet=$1
1631         [[ $facet = mgs ]] && combined_mgs_mds && facet=mds1
1632
1633         echo -n ${facet}_flakey
1634 }
1635
1636 #
1637 # Get the device-mapper flakey device of a given facet.
1638 # A device created by dmsetup will appear as /dev/mapper/<device-name>.
1639 #
1640 dm_facet_devpath() {
1641         local facet=$1
1642
1643         echo -n $DM_DEV_PATH/$(dm_facet_devname $facet)
1644 }
1645
1646 #
1647 # Set a device-mapper device with a new table.
1648 #
1649 # The table has the following format:
1650 # <logical_start_sector> <num_sectors> <target_type> <target_args>
1651 #
1652 # flakey <target_args> includes:
1653 # <destination_device> <offset> <up_interval> <down_interval> \
1654 # [<num_features> [<feature_arguments>]]
1655 #
1656 # linear <target_args> includes:
1657 # <destination_device> <start_sector>
1658 #
1659 dm_set_dev_table() {
1660         local facet=$1
1661         local dm_dev=$2
1662         local target_type=$3
1663         local num_sectors
1664         local real_dev
1665         local tmp
1666         local table
1667
1668         read tmp num_sectors tmp real_dev tmp \
1669                 <<< $(do_facet $facet "$DMSETUP table $dm_dev")
1670
1671         case $target_type in
1672         flakey)
1673                 table="0 $num_sectors flakey $real_dev 0 0 1800 1 drop_writes"
1674                 ;;
1675         linear)
1676                 table="0 $num_sectors linear $real_dev 0"
1677                 ;;
1678         *) error "invalid target type $target_type" ;;
1679         esac
1680
1681         do_facet $facet "$DMSETUP suspend --nolockfs --noflush $dm_dev" ||
1682                 error "failed to suspend $dm_dev"
1683         do_facet $facet "$DMSETUP load $dm_dev --table \\\"$table\\\"" ||
1684                 error "failed to load $target_type table into $dm_dev"
1685         do_facet $facet "$DMSETUP resume $dm_dev" ||
1686                 error "failed to resume $dm_dev"
1687 }
1688
1689 #
1690 # Set a device-mapper flakey device as "read-only" by using the "drop_writes"
1691 # feature parameter.
1692 #
1693 # drop_writes:
1694 #       All write I/O is silently ignored.
1695 #       Read I/O is handled correctly.
1696 #
1697 dm_set_dev_readonly() {
1698         local facet=$1
1699         local dm_dev=${2:-$(dm_facet_devpath $facet)}
1700
1701         dm_set_dev_table $facet $dm_dev flakey
1702 }
1703
1704 #
1705 # Set a device-mapper device to traditional linear mapping mode.
1706 #
1707 dm_clear_dev_readonly() {
1708         local facet=$1
1709         local dm_dev=${2:-$(dm_facet_devpath $facet)}
1710
1711         dm_set_dev_table $facet $dm_dev linear
1712 }
1713
1714 #
1715 # Set the device of a given facet as "read-only".
1716 #
1717 set_dev_readonly() {
1718         local facet=$1
1719         local svc=${facet}_svc
1720
1721         if [[ $(facet_fstype $facet) = zfs ]] ||
1722            ! dm_flakey_supported $facet; then
1723                 do_facet $facet $LCTL --device ${!svc} readonly
1724         else
1725                 dm_set_dev_readonly $facet
1726         fi
1727 }
1728
1729 #
1730 # Get size in 512-byte sectors (BLKGETSIZE64 / 512) of a given device.
1731 #
1732 get_num_sectors() {
1733         local facet=$1
1734         local dev=$2
1735         local num_sectors
1736
1737         num_sectors=$(do_facet $facet "blockdev --getsz $dev 2>/dev/null")
1738         [[ ${PIPESTATUS[0]} = 0 && -n "$num_sectors" ]] || num_sectors=0
1739         echo -n $num_sectors
1740 }
1741
1742 #
1743 # Create a device-mapper device with a given block device or regular file (will
1744 # be associated with loop device).
1745 # Return the full path of the device-mapper device.
1746 #
1747 dm_create_dev() {
1748         local facet=$1
1749         local real_dev=$2                                  # destination device
1750         local dm_dev_name=${3:-$(dm_facet_devname $facet)} # device name
1751         local dm_dev=$DM_DEV_PATH/$dm_dev_name            # device-mapper device
1752
1753         # check if the device-mapper device to be created already exists
1754         if is_dm_dev $facet $dm_dev; then
1755                 # if the existing device was set to "read-only", then clear it
1756                 ! is_dm_flakey_dev $facet $dm_dev ||
1757                         dm_clear_dev_readonly $facet $dm_dev
1758
1759                 echo -n $dm_dev
1760                 return 0
1761         fi
1762
1763         # check if the destination device is a block device, and if not,
1764         # associate it with a loop device
1765         is_blkdev $facet $real_dev ||
1766                 real_dev=$(setup_loop_device $facet $real_dev)
1767         [[ -n "$real_dev" ]] || { echo -n $real_dev; return 2; }
1768
1769         # now create the device-mapper device
1770         local num_sectors=$(get_num_sectors $facet $real_dev)
1771         local table="0 $num_sectors linear $real_dev 0"
1772         local rc=0
1773
1774         do_facet $facet "$DMSETUP create $dm_dev_name --table \\\"$table\\\"" ||
1775                 { rc=${PIPESTATUS[0]}; dm_dev=; }
1776         do_facet $facet "$DMSETUP mknodes >/dev/null 2>&1"
1777
1778         echo -n $dm_dev
1779         return $rc
1780 }
1781
1782 #
1783 # Map the facet name to its device variable name.
1784 #
1785 facet_device_alias() {
1786         local facet=$1
1787         local dev_alias=$facet
1788
1789         case $facet in
1790                 fs2mds) dev_alias=mds1_2 ;;
1791                 fs2ost) dev_alias=ost1_2 ;;
1792                 fs3ost) dev_alias=ost2_2 ;;
1793                 *) ;;
1794         esac
1795
1796         echo -n $dev_alias
1797 }
1798
1799 #
1800 # Save the original value of the facet device and export the new value.
1801 #
1802 export_dm_dev() {
1803         local facet=$1
1804         local dm_dev=$2
1805
1806         local active_facet=$(facet_active $facet)
1807         local dev_alias=$(facet_device_alias $active_facet)
1808         local dev_name=${dev_alias}_dev
1809         local dev=${!dev_name}
1810
1811         if [[ $active_facet = $facet ]]; then
1812                 local failover_dev=${dev_alias}failover_dev
1813                 if [[ ${!failover_dev} = $dev ]]; then
1814                         eval export ${failover_dev}_saved=$dev
1815                         eval export ${failover_dev}=$dm_dev
1816                 fi
1817         else
1818                 dev_alias=$(facet_device_alias $facet)
1819                 local facet_dev=${dev_alias}_dev
1820                 if [[ ${!facet_dev} = $dev ]]; then
1821                         eval export ${facet_dev}_saved=$dev
1822                         eval export ${facet_dev}=$dm_dev
1823                 fi
1824         fi
1825
1826         eval export ${dev_name}_saved=$dev
1827         eval export ${dev_name}=$dm_dev
1828 }
1829
1830 #
1831 # Restore the saved value of the facet device.
1832 #
1833 unexport_dm_dev() {
1834         local facet=$1
1835
1836         [[ $facet = mgs ]] && combined_mgs_mds && facet=mds1
1837         local dev_alias=$(facet_device_alias $facet)
1838
1839         local saved_dev=${dev_alias}_dev_saved
1840         [[ -z ${!saved_dev} ]] ||
1841                 eval export ${dev_alias}_dev=${!saved_dev}
1842
1843         saved_dev=${dev_alias}failover_dev_saved
1844         [[ -z ${!saved_dev} ]] ||
1845                 eval export ${dev_alias}failover_dev=${!saved_dev}
1846 }
1847
1848 #
1849 # Remove a device-mapper device.
1850 # If the destination device is a loop device, then also detach it.
1851 #
1852 dm_cleanup_dev() {
1853         local facet=$1
1854         local dm_dev=${2:-$(dm_facet_devpath $facet)}
1855         local major
1856         local minor
1857
1858         is_dm_dev $facet $dm_dev || return 0
1859
1860         read major minor <<< $(do_facet $facet "$DMSETUP table $dm_dev" |
1861                 awk '{ print $4 }' | awk -F: '{ print $1" "$2 }')
1862
1863         do_facet $facet "$DMSETUP remove $dm_dev"
1864         do_facet $facet "$DMSETUP mknodes >/dev/null 2>&1"
1865
1866         unexport_dm_dev $facet
1867
1868         # detach a loop device
1869         [[ $major -ne 7 ]] || cleanup_loop_device $facet /dev/loop$minor
1870
1871         # unload dm-flakey module
1872         do_facet $facet "modprobe -r dm-flakey" || true
1873 }
1874
1875 mount_facet() {
1876         local facet=$1
1877         shift
1878         local active_facet=$(facet_active $facet)
1879         local dev_alias=$(facet_device_alias $active_facet)
1880         local dev=${dev_alias}_dev
1881         local opt=${facet}_opt
1882         local mntpt=$(facet_mntpt $facet)
1883         local opts="${!opt} $@"
1884         local fstype=$(facet_fstype $facet)
1885         local devicelabel
1886         local dm_dev=${!dev}
1887
1888         module_loaded lustre || load_modules
1889
1890         case $fstype in
1891         ldiskfs)
1892                 if dm_flakey_supported $facet; then
1893                         dm_dev=$(dm_create_dev $facet ${!dev})
1894                         [[ -n "$dm_dev" ]] || dm_dev=${!dev}
1895                 fi
1896
1897                 is_blkdev $facet $dm_dev || opts=$(csa_add "$opts" -o loop)
1898
1899                 devicelabel=$(do_facet ${facet} "$E2LABEL $dm_dev");;
1900         zfs)
1901                 # import ZFS storage pool
1902                 import_zpool $facet || return ${PIPESTATUS[0]}
1903
1904                 devicelabel=$(do_facet ${facet} "$ZFS get -H -o value \
1905                                                 lustre:svname $dm_dev");;
1906         *)
1907                 error "unknown fstype!";;
1908         esac
1909
1910         echo "Starting ${facet}: $opts $dm_dev $mntpt"
1911         # for testing LU-482 error handling in mount_facets() and test_0a()
1912         if [ -f $TMP/test-lu482-trigger ]; then
1913                 RC=2
1914         else
1915                 do_facet ${facet} \
1916                         "mkdir -p $mntpt; $MOUNT_CMD $opts $dm_dev $mntpt"
1917                 RC=${PIPESTATUS[0]}
1918         fi
1919
1920         if [ $RC -ne 0 ]; then
1921                 echo "Start of $dm_dev on ${facet} failed ${RC}"
1922                 return $RC
1923         fi
1924
1925         health=$(do_facet ${facet} "$LCTL get_param -n health_check")
1926         if [[ "$health" != "healthy" ]]; then
1927                 error "$facet is in a unhealthy state"
1928         fi
1929
1930         set_default_debug_facet $facet
1931
1932         if [[ $facet == mds* ]]; then
1933                 do_facet $facet \
1934                 lctl set_param -n mdt.${FSNAME}*.enable_remote_dir=1 2>/dev/null
1935         fi
1936
1937         if [[ $opts =~ .*nosvc.* ]]; then
1938                 echo "Start $dm_dev without service"
1939         else
1940
1941                 case $fstype in
1942                 ldiskfs)
1943                         wait_update_facet ${facet} "$E2LABEL $dm_dev \
1944                                 2>/dev/null | grep -E ':[a-zA-Z]{3}[0-9]{4}'" \
1945                                 "" || error "$dm_dev failed to initialize!";;
1946                 zfs)
1947                         wait_update_facet ${facet} "$ZFS get -H -o value \
1948                                 lustre:svname $dm_dev 2>/dev/null | \
1949                                 grep -E ':[a-zA-Z]{3}[0-9]{4}'" "" ||
1950                                 error "$dm_dev failed to initialize!";;
1951
1952                 *)
1953                         error "unknown fstype!";;
1954                 esac
1955         fi
1956
1957         # commit the device label change to disk
1958         if [[ $devicelabel =~ (:[a-zA-Z]{3}[0-9]{4}) ]]; then
1959                 echo "Commit the device label on ${!dev}"
1960                 do_facet $facet "sync; sleep 1; sync"
1961         fi
1962
1963
1964         label=$(devicelabel ${facet} $dm_dev)
1965         [ -z "$label" ] && echo no label for $dm_dev && exit 1
1966         eval export ${facet}_svc=${label}
1967         echo Started ${label}
1968
1969         export_dm_dev $facet $dm_dev
1970
1971         return $RC
1972 }
1973
1974 # start facet device options
1975 start() {
1976         local facet=$1
1977         shift
1978         local device=$1
1979         shift
1980         local dev_alias=$(facet_device_alias $facet)
1981
1982         eval export ${dev_alias}_dev=${device}
1983         eval export ${facet}_opt=\"$@\"
1984
1985         local varname=${dev_alias}failover_dev
1986         if [ -n "${!varname}" ] ; then
1987                 eval export ${dev_alias}failover_dev=${!varname}
1988         else
1989                 eval export ${dev_alias}failover_dev=$device
1990         fi
1991
1992         local mntpt=$(facet_mntpt $facet)
1993         do_facet ${facet} mkdir -p $mntpt
1994         eval export ${facet}_MOUNT=$mntpt
1995         mount_facet ${facet}
1996         RC=$?
1997
1998         if [[ $facet == mds* ]]; then
1999                 do_facet $facet \
2000                         lctl set_param -n mdt.${FSNAME}*.enable_remote_dir=1 \
2001                                 2>/dev/null
2002         fi
2003
2004         return $RC
2005 }
2006
2007 stop() {
2008         local running
2009         local facet=$1
2010         shift
2011         local HOST=$(facet_active_host $facet)
2012         [[ -z $HOST ]] && echo stop: no host for $facet && return 0
2013
2014         local mntpt=$(facet_mntpt $facet)
2015         running=$(do_facet ${facet} "grep -c $mntpt' ' /proc/mounts || true")
2016         if [ ${running} -ne 0 ]; then
2017                 echo "Stopping $mntpt (opts:$@) on $HOST"
2018                 do_facet ${facet} $UMOUNT $@ $mntpt
2019         fi
2020
2021         # umount should block, but we should wait for unrelated obd's
2022         # like the MGS or MGC to also stop.
2023         wait_exit_ST ${facet} || return ${PIPESTATUS[0]}
2024
2025         if [[ $(facet_fstype $facet) == zfs ]]; then
2026                 # export ZFS storage pool
2027                 [ "$KEEP_ZPOOL" = "true" ] || export_zpool $facet
2028         elif dm_flakey_supported $facet; then
2029                 local host=${facet}_HOST
2030                 local failover_host=${facet}failover_HOST
2031                 if [[ -n ${!failover_host} && ${!failover_host} != ${!host} ]]||
2032                         $CLEANUP_DM_DEV || [[ $facet = fs* ]]; then
2033                         dm_cleanup_dev $facet
2034                 fi
2035         fi
2036 }
2037
2038 # get mdt quota type
2039 mdt_quota_type() {
2040         local varsvc=${SINGLEMDS}_svc
2041         do_facet $SINGLEMDS $LCTL get_param -n \
2042                 osd-$(facet_fstype $SINGLEMDS).${!varsvc}.quota_slave.enabled
2043 }
2044
2045 # get ost quota type
2046 ost_quota_type() {
2047         # All OSTs should have same quota type
2048         local varsvc=ost1_svc
2049         do_facet ost1 $LCTL get_param -n \
2050                 osd-$(facet_fstype ost1).${!varsvc}.quota_slave.enabled
2051 }
2052
2053 # restore old quota type settings
2054 restore_quota() {
2055         if [ "$old_MDT_QUOTA_TYPE" ]; then
2056                 if [[ $PERM_CMD = *"set_param -P"* ]]; then
2057                         do_facet mgs $PERM_CMD \
2058                                 osd-*.$FSNAME-MDT*.quota_slave.enable = \
2059                                 $old_MDT_QUOTA_TYPE
2060                 else
2061                         do_facet mgs $PERM_CMD \
2062                                 $FSNAME.quota.mdt=$old_MDT_QUOTA_TYPE
2063                 fi
2064         fi
2065         if [ "$old_OST_QUOTA_TYPE" ]; then
2066                 if [[ $PERM_CMD = *"set_param -P"* ]]; then
2067                         do_facet mgs $PERM_CMD \
2068                                 osd-*.$FSNAME-OST*.quota_slave.enable = \
2069                                 $old_OST_QUOTA_TYPE
2070                 else
2071                         do_facet mgs $LCTL conf_param \
2072                                 $FSNAME.quota.ost=$old_OST_QUOTA_TYPE
2073                 fi
2074         fi
2075 }
2076
2077 # Handle the case when there is a space in the lfs df
2078 # "filesystem summary" line the same as when there is no space.
2079 # This will allow fixing the "lfs df" summary line in the future.
2080 lfs_df() {
2081         $LFS df $* | sed -e 's/filesystem /filesystem_/'
2082 }
2083
2084 # Get free inodes on the MDT specified by mdt index, free indoes on
2085 # the whole filesystem will be returned when index == -1.
2086 mdt_free_inodes() {
2087         local index=$1
2088         local free_inodes
2089         local mdt_uuid
2090
2091         if [ $index -eq -1 ]; then
2092                 mdt_uuid="summary"
2093         else
2094                 mdt_uuid=$(mdtuuid_from_index $index)
2095         fi
2096
2097         free_inodes=$(lfs_df -i $MOUNT | grep $mdt_uuid | awk '{print $4}')
2098         echo $free_inodes
2099 }
2100
2101 #
2102 # Get the OST device status from 'lfs df' with a given OST index.
2103 #
2104 ost_dev_status() {
2105         local ost_idx=$1
2106         local mnt_pnt=${2:-$MOUNT}
2107         local ost_uuid
2108
2109         ost_uuid=$(ostuuid_from_index $ost_idx $mnt_pnt)
2110         lfs_df $mnt_pnt | awk '/'$ost_uuid'/ { print $7 }'
2111 }
2112
2113 setup_quota(){
2114         local mntpt=$1
2115
2116         # save old quota type & set new quota type
2117         local mdt_qtype=$(mdt_quota_type)
2118         local ost_qtype=$(ost_quota_type)
2119
2120         echo "[HOST:$HOSTNAME] [old_mdt_qtype:$mdt_qtype]" \
2121                 "[old_ost_qtype:$ost_qtype] [new_qtype:$QUOTA_TYPE]"
2122
2123         export old_MDT_QUOTA_TYPE=$mdt_qtype
2124         export old_OST_QUOTA_TYPE=$ost_qtype
2125
2126         if [[ $PERM_CMD = *"set_param -P"* ]]; then
2127                 do_facet mgs $PERM_CMD \
2128                         osd-*.$FSNAME-MDT*.quota_slave.enable=$QUOTA_TYPE
2129                 do_facet mgs $PERM_CMD \
2130                         osd-*.$FSNAME-OST*.quota_slave.enable=$QUOTA_TYPE
2131         else
2132                 do_facet mgs $PERM_CMD $FSNAME.quota.mdt=$QUOTA_TYPE ||
2133                         error "set mdt quota type failed"
2134                 do_facet mgs $PERM_CMD $FSNAME.quota.ost=$QUOTA_TYPE ||
2135                         error "set ost quota type failed"
2136         fi
2137
2138         local quota_usrs=$QUOTA_USERS
2139
2140         # get_filesystem_size
2141         local disksz=$(lfs_df $mntpt | grep "summary" | awk '{print $2}')
2142         local blk_soft=$((disksz + 1024))
2143         local blk_hard=$((blk_soft + blk_soft / 20)) # Go 5% over
2144
2145         local inodes=$(lfs_df -i $mntpt | grep "summary" | awk '{print $2}')
2146         local i_soft=$inodes
2147         local i_hard=$((i_soft + i_soft / 20))
2148
2149         echo "Total disk size: $disksz  block-softlimit: $blk_soft" \
2150                 "block-hardlimit: $blk_hard inode-softlimit: $i_soft" \
2151                 "inode-hardlimit: $i_hard"
2152
2153         local cmd
2154         for usr in $quota_usrs; do
2155                 echo "Setting up quota on $HOSTNAME:$mntpt for $usr..."
2156                 for type in u g; do
2157                         cmd="$LFS setquota -$type $usr -b $blk_soft"
2158                         cmd="$cmd -B $blk_hard -i $i_soft -I $i_hard $mntpt"
2159                         echo "+ $cmd"
2160                         eval $cmd || error "$cmd FAILED!"
2161                 done
2162                 # display the quota status
2163                 echo "Quota settings for $usr : "
2164                 $LFS quota -v -u $usr $mntpt || true
2165         done
2166 }
2167
2168 zconf_mount() {
2169         local client=$1
2170         local mnt=$2
2171         local opts=${3:-$MOUNT_OPTS}
2172         opts=${opts:+-o $opts}
2173         local flags=${4:-$MOUNT_FLAGS}
2174
2175         local device=$MGSNID:/$FSNAME$FILESET
2176         if [ -z "$mnt" -o -z "$FSNAME" ]; then
2177                 echo "Bad mount command: opt=$flags $opts dev=$device " \
2178                      "mnt=$mnt"
2179                 exit 1
2180         fi
2181
2182         echo "Starting client: $client: $flags $opts $device $mnt"
2183         do_node $client mkdir -p $mnt
2184         if [ -n "$FILESET" -a -z "$SKIP_FILESET" ];then
2185                 do_node $client $MOUNT_CMD $flags $opts $MGSNID:/$FSNAME \
2186                         $mnt || return 1
2187                 #disable FILESET if not supported
2188                 do_nodes $client lctl get_param -n \
2189                         mdc.$FSNAME-MDT0000*.import | grep -q subtree ||
2190                                 device=$MGSNID:/$FSNAME
2191                 do_node $client mkdir -p $mnt/$FILESET
2192                 do_node $client "! grep -q $mnt' ' /proc/mounts ||
2193                         umount $mnt"
2194         fi
2195         if $GSS_SK && ($SK_UNIQUE_NM || $SK_S2S); then
2196                 # Mount using nodemap key
2197                 local mountkey=$SK_PATH/$FSNAME-nmclient.key
2198                 if $SK_UNIQUE_NM; then
2199                         mountkey=$SK_PATH/nodemap/c0.key
2200                 fi
2201                 local prunedopts=$(echo $opts |
2202                                 sed -e "s#skpath=[^,^ ]*#skpath=$mountkey#g")
2203                 do_node $client $MOUNT_CMD $flags $prunedopts $device $mnt ||
2204                                 return 1
2205         else
2206                 do_node $client $MOUNT_CMD $flags $opts $device $mnt ||
2207                                 return 1
2208         fi
2209
2210         set_default_debug_nodes $client
2211
2212         return 0
2213 }
2214
2215 zconf_umount() {
2216     local client=$1
2217     local mnt=$2
2218     local force
2219     local busy
2220     local need_kill
2221
2222     [ "$3" ] && force=-f
2223     local running=$(do_node $client "grep -c $mnt' ' /proc/mounts") || true
2224     if [ $running -ne 0 ]; then
2225         echo "Stopping client $client $mnt (opts:$force)"
2226         do_node $client lsof -t $mnt || need_kill=no
2227         if [ "x$force" != "x" -a "x$need_kill" != "xno" ]; then
2228             pids=$(do_node $client lsof -t $mnt | sort -u);
2229             if [ -n $pids ]; then
2230                 do_node $client kill -9 $pids || true
2231             fi
2232         fi
2233
2234         busy=$(do_node $client "umount $force $mnt 2>&1" | grep -c "busy") || true
2235         if [ $busy -ne 0 ] ; then
2236             echo "$mnt is still busy, wait one second" && sleep 1
2237             do_node $client umount $force $mnt
2238         fi
2239     fi
2240 }
2241
2242 # Mount the file system on the MGS
2243 mount_mgs_client() {
2244         do_facet mgs "mkdir -p $MOUNT"
2245         zconf_mount $mgs_HOST $MOUNT $MOUNT_OPTS ||
2246                 error "unable to mount $MOUNT on MGS"
2247 }
2248
2249 # Unmount the file system on the MGS
2250 umount_mgs_client() {
2251         zconf_umount $mgs_HOST $MOUNT
2252         do_facet mgs "rm -rf $MOUNT"
2253 }
2254
2255 # nodes is comma list
2256 sanity_mount_check_nodes () {
2257     local nodes=$1
2258     shift
2259     local mnts="$@"
2260     local mnt
2261
2262     # FIXME: assume that all cluster nodes run the same os
2263     [ "$(uname)" = Linux ] || return 0
2264
2265     local rc=0
2266     for mnt in $mnts ; do
2267         do_nodes $nodes "running=\\\$(grep -c $mnt' ' /proc/mounts);
2268 mpts=\\\$(mount | grep -c $mnt' ');
2269 if [ \\\$running -ne \\\$mpts ]; then
2270     echo \\\$(hostname) env are INSANE!;
2271     exit 1;
2272 fi"
2273     [ $? -eq 0 ] || rc=1
2274     done
2275     return $rc
2276 }
2277
2278 sanity_mount_check_servers () {
2279     [ -n "$CLIENTONLY" ] &&
2280         { echo "CLIENTONLY mode, skip mount_check_servers"; return 0; } || true
2281     echo Checking servers environments
2282
2283     # FIXME: modify get_facets to display all facets wo params
2284     local facets="$(get_facets OST),$(get_facets MDS),mgs"
2285     local node
2286     local mntpt
2287     local facet
2288     for facet in ${facets//,/ }; do
2289         node=$(facet_host ${facet})
2290         mntpt=$(facet_mntpt $facet)
2291         sanity_mount_check_nodes $node $mntpt ||
2292             { error "server $node environments are insane!"; return 1; }
2293     done
2294 }
2295
2296 sanity_mount_check_clients () {
2297     local clients=${1:-$CLIENTS}
2298     local mntpt=${2:-$MOUNT}
2299     local mntpt2=${3:-$MOUNT2}
2300
2301     [ -z $clients ] && clients=$(hostname)
2302     echo Checking clients $clients environments
2303
2304     sanity_mount_check_nodes $clients $mntpt $mntpt2 ||
2305        error "clients environments are insane!"
2306 }
2307
2308 sanity_mount_check () {
2309     sanity_mount_check_servers || return 1
2310     sanity_mount_check_clients || return 2
2311 }
2312
2313 # mount clients if not mouted
2314 zconf_mount_clients() {
2315         local clients=$1
2316         local mnt=$2
2317         local opts=${3:-$MOUNT_OPTS}
2318         opts=${opts:+-o $opts}
2319         local flags=${4:-$MOUNT_FLAGS}
2320         local device=$MGSNID:/$FSNAME$FILESET
2321         if [ -z "$mnt" -o -z "$FSNAME" ]; then
2322                 echo "Bad conf mount command: opt=$flags $opts dev=$device " \
2323                      "mnt=$mnt"
2324                 exit 1
2325         fi
2326
2327         echo "Starting client $clients: $flags $opts $device $mnt"
2328         if [ -n "$FILESET" -a ! -n "$SKIP_FILESET" ]; then
2329                 if $GSS_SK && ($SK_UNIQUE_NM || $SK_S2S); then
2330                         # Mount with own nodemap key
2331                         local i=0
2332                         # Mount all server nodes first with per-NM keys
2333                         for nmclient in ${clients//,/ }; do
2334 #                               do_nodes $(comma_list $(all_server_nodes)) "lgss_sk -t server -l $SK_PATH/nodemap/c$i.key -n c$i"
2335                                 do_nodes $(comma_list $(all_server_nodes)) "lgss_sk -t server -l $SK_PATH/nodemap/c$i.key"
2336                                 i=$((i + 1))
2337                         done
2338                         # set perms for per-nodemap keys else permission denied
2339                         do_nodes $(comma_list $(all_nodes)) \
2340                                 "keyctl show | grep lustre | cut -c1-11 |
2341                                 sed -e 's/ //g;' |
2342                                 xargs -IX keyctl setperm X 0x3f3f3f3f"
2343                         local mountkey=$SK_PATH/$FSNAME-nmclient.key
2344                         i=0
2345                         for nmclient in ${clients//,/ }; do
2346                                 if $SK_UNIQUE_NM; then
2347                                         mountkey=$SK_PATH/nodemap/c$i.key
2348                                 fi
2349                                 do_node $nmclient "! grep -q $mnt' ' \
2350                                         /proc/mounts || umount $mnt"
2351                                 local prunedopts=$(add_sk_mntflag $prunedopts);
2352                                 prunedopts=$(echo $prunedopts | sed -e \
2353                                         "s#skpath=[^ ^,]*#skpath=$mountkey#g")
2354                                 set -x
2355                                 do_nodes $(comma_list $(all_server_nodes)) \
2356                                         "keyctl show"
2357                                 set +x
2358                                 do_node $nmclient $MOUNT_CMD $flags \
2359                                         $prunedopts $MGSNID:/$FSNAME $mnt ||
2360                                         return 1
2361                                 i=$((i + 1))
2362                         done
2363                 else
2364                         do_nodes $clients "! grep -q $mnt' ' /proc/mounts ||
2365                                         umount $mnt"
2366                         do_nodes $clients $MOUNT_CMD $flags $opts \
2367                                         $MGSNID:/$FSNAME $mnt || return 1
2368                 fi
2369                 #disable FILESET if not supported
2370                 do_nodes $clients lctl get_param -n \
2371                         mdc.$FSNAME-MDT0000*.import | grep -q subtree ||
2372                                 device=$MGSNID:/$FSNAME
2373                 do_nodes $clients mkdir -p $mnt/$FILESET
2374                 do_nodes $clients "! grep -q $mnt' ' /proc/mounts ||
2375                         umount $mnt"
2376         fi
2377
2378         if $GSS_SK && ($SK_UNIQUE_NM || $SK_S2S); then
2379                 # Mount with nodemap key
2380                 local i=0
2381                 local mountkey=$SK_PATH/$FSNAME-nmclient.key
2382                 for nmclient in ${clients//,/ }; do
2383                         if $SK_UNIQUE_NM; then
2384                                 mountkey=$SK_PATH/nodemap/c$i.key
2385                         fi
2386                         local prunedopts=$(echo $opts | sed -e \
2387                                 "s#skpath=[^ ^,]*#skpath=$mountkey#g");
2388                         do_node $nmclient "! grep -q $mnt' ' /proc/mounts ||
2389                                 umount $mnt"
2390                         do_node $nmclient "
2391                 running=\\\$(mount | grep -c $mnt' ');
2392                 rc=0;
2393                 if [ \\\$running -eq 0 ] ; then
2394                         mkdir -p $mnt;
2395                         $MOUNT_CMD $flags $prunedopts $device $mnt;
2396                         rc=\\\$?;
2397                 else
2398                         lustre_mnt_count=\\\$(mount | grep $mnt' ' | \
2399                                 grep 'type lustre' | wc -l);
2400                         if [ \\\$running -ne \\\$lustre_mnt_count ] ; then
2401                                 echo zconf_mount_clients FAILED: \
2402                                         mount count \\\$running, not matching \
2403                                         with mount count of 'type lustre' \
2404                                         \\\$lustre_mnt_count;
2405                                 rc=1;
2406                         fi;
2407                 fi;
2408         exit \\\$rc" || return ${PIPESTATUS[0]}
2409
2410                         i=$((i + 1))
2411                 done
2412         else
2413
2414                 local tmpopts=$opts
2415                 if $SHARED_KEY; then
2416                         tmpopts=$(add_sk_mntflag $opts)
2417                 fi
2418                 do_nodes $clients "
2419 running=\\\$(mount | grep -c $mnt' ');
2420 rc=0;
2421 if [ \\\$running -eq 0 ] ; then
2422         mkdir -p $mnt;
2423         $MOUNT_CMD $flags $tmpopts $device $mnt;
2424         rc=\\\$?;
2425 fi;
2426 exit \\\$rc" || return ${PIPESTATUS[0]}
2427         fi
2428
2429         echo "Started clients $clients: "
2430         do_nodes $clients "mount | grep $mnt' '"
2431
2432         set_default_debug_nodes $clients
2433
2434         return 0
2435 }
2436
2437 zconf_umount_clients() {
2438     local clients=$1
2439     local mnt=$2
2440     local force
2441
2442     [ "$3" ] && force=-f
2443
2444     echo "Stopping clients: $clients $mnt (opts:$force)"
2445     do_nodes $clients "running=\\\$(grep -c $mnt' ' /proc/mounts);
2446 if [ \\\$running -ne 0 ] ; then
2447 echo Stopping client \\\$(hostname) $mnt opts:$force;
2448 lsof $mnt || need_kill=no;
2449 if [ "x$force" != "x" -a "x\\\$need_kill" != "xno" ]; then
2450     pids=\\\$(lsof -t $mnt | sort -u);
2451     if [ -n \\\"\\\$pids\\\" ]; then
2452              kill -9 \\\$pids;
2453     fi
2454 fi;
2455 while umount $force $mnt 2>&1 | grep -q "busy"; do
2456     echo "$mnt is still busy, wait one second" && sleep 1;
2457 done;
2458 fi"
2459 }
2460
2461 shutdown_node () {
2462     local node=$1
2463     echo + $POWER_DOWN $node
2464     $POWER_DOWN $node
2465 }
2466
2467 shutdown_node_hard () {
2468     local host=$1
2469     local attempts=$SHUTDOWN_ATTEMPTS
2470
2471     for i in $(seq $attempts) ; do
2472         shutdown_node $host
2473         sleep 1
2474         wait_for_function --quiet "! ping -w 3 -c 1 $host" 5 1 && return 0
2475         echo "waiting for $host to fail attempts=$attempts"
2476         [ $i -lt $attempts ] || \
2477             { echo "$host still pingable after power down! attempts=$attempts" && return 1; }
2478     done
2479 }
2480
2481 shutdown_client() {
2482     local client=$1
2483     local mnt=${2:-$MOUNT}
2484     local attempts=3
2485
2486     if [ "$FAILURE_MODE" = HARD ]; then
2487         shutdown_node_hard $client
2488     else
2489        zconf_umount_clients $client $mnt -f
2490     fi
2491 }
2492
2493 facets_on_host () {
2494     local host=$1
2495     local facets="$(get_facets OST),$(get_facets MDS)"
2496     local affected
2497
2498     combined_mgs_mds || facets="$facets,mgs"
2499
2500     for facet in ${facets//,/ }; do
2501         if [ $(facet_active_host $facet) == $host ]; then
2502            affected="$affected $facet"
2503         fi
2504     done
2505
2506     echo $(comma_list $affected)
2507 }
2508
2509 facet_up() {
2510         local facet=$1
2511         local host=${2:-$(facet_host $facet)}
2512
2513         local label=$(convert_facet2label $facet)
2514         do_node $host $LCTL dl | awk '{ print $4 }' | grep -q "^$label\$"
2515 }
2516
2517 facets_up_on_host () {
2518     local host=$1
2519     local facets=$(facets_on_host $host)
2520     local affected_up
2521
2522     for facet in ${facets//,/ }; do
2523         if $(facet_up $facet $host); then
2524             affected_up="$affected_up $facet"
2525         fi
2526     done
2527
2528     echo $(comma_list $affected_up)
2529 }
2530
2531 shutdown_facet() {
2532         local facet=$1
2533         local affected_facet
2534         local affected_facets
2535
2536         if [[ "$FAILURE_MODE" = HARD ]]; then
2537                 if [[ $(facet_fstype $facet) = ldiskfs ]] &&
2538                         dm_flakey_supported $facet; then
2539                         affected_facets=$(affected_facets $facet)
2540                         for affected_facet in ${affected_facets//,/ }; do
2541                                 unexport_dm_dev $affected_facet
2542                         done
2543                 fi
2544
2545                 shutdown_node_hard $(facet_active_host $facet)
2546         else
2547                 stop $facet
2548         fi
2549 }
2550
2551 reboot_node() {
2552     local node=$1
2553     echo + $POWER_UP $node
2554     $POWER_UP $node
2555 }
2556
2557 remount_facet() {
2558     local facet=$1
2559
2560     stop $facet
2561     mount_facet $facet
2562 }
2563
2564 reboot_facet() {
2565         local facet=$1
2566         if [ "$FAILURE_MODE" = HARD ]; then
2567                 reboot_node $(facet_active_host $facet)
2568         else
2569                 sleep 10
2570         fi
2571 }
2572
2573 boot_node() {
2574     local node=$1
2575     if [ "$FAILURE_MODE" = HARD ]; then
2576        reboot_node $node
2577        wait_for_host $node
2578     fi
2579 }
2580
2581 facets_hosts () {
2582     local facets=$1
2583     local hosts
2584
2585     for facet in ${facets//,/ }; do
2586         hosts=$(expand_list $hosts $(facet_host $facet) )
2587     done
2588
2589     echo $hosts
2590 }
2591
2592 _check_progs_installed () {
2593     local progs=$@
2594     local rc=0
2595
2596     for prog in $progs; do
2597         if ! [ "$(which $prog)"  -o  "${!prog}" ]; then
2598            echo $prog missing on $(hostname)
2599            rc=1
2600         fi
2601     done
2602     return $rc
2603 }
2604
2605 check_progs_installed () {
2606         local nodes=$1
2607         shift
2608
2609         do_rpc_nodes "$nodes" _check_progs_installed $@
2610 }
2611
2612 # recovery-scale functions
2613 node_var_name() {
2614     echo __$(echo $1 | tr '-' '_' | tr '.' '_')
2615 }
2616
2617 start_client_load() {
2618         local client=$1
2619         local load=$2
2620         local var=$(node_var_name $client)_load
2621         eval export ${var}=$load
2622
2623         do_node $client "PATH=$PATH MOUNT=$MOUNT ERRORS_OK=$ERRORS_OK \
2624                         BREAK_ON_ERROR=$BREAK_ON_ERROR \
2625                         END_RUN_FILE=$END_RUN_FILE \
2626                         LOAD_PID_FILE=$LOAD_PID_FILE \
2627                         TESTLOG_PREFIX=$TESTLOG_PREFIX \
2628                         TESTNAME=$TESTNAME \
2629                         DBENCH_LIB=$DBENCH_LIB \
2630                         DBENCH_SRC=$DBENCH_SRC \
2631                         CLIENT_COUNT=$((CLIENTCOUNT - 1)) \
2632                         LFS=$LFS \
2633                         LCTL=$LCTL \
2634                         FSNAME=$FSNAME \
2635                         run_${load}.sh" &
2636         local ppid=$!
2637         log "Started client load: ${load} on $client"
2638
2639         # get the children process IDs
2640         local pids=$(ps --ppid $ppid -o pid= | xargs)
2641         CLIENT_LOAD_PIDS="$CLIENT_LOAD_PIDS $ppid $pids"
2642         return 0
2643 }
2644
2645 start_client_loads () {
2646     local -a clients=(${1//,/ })
2647     local numloads=${#CLIENT_LOADS[@]}
2648     local testnum
2649
2650     for ((nodenum=0; nodenum < ${#clients[@]}; nodenum++ )); do
2651         testnum=$((nodenum % numloads))
2652         start_client_load ${clients[nodenum]} ${CLIENT_LOADS[testnum]}
2653     done
2654     # bug 22169: wait the background threads to start
2655     sleep 2
2656 }
2657
2658 # only for remote client
2659 check_client_load () {
2660         local client=$1
2661         local var=$(node_var_name $client)_load
2662         local testload=run_${!var}.sh
2663
2664         ps auxww | grep -v grep | grep $client | grep -q $testload || return 1
2665
2666         # bug 18914: try to connect several times not only when
2667         # check ps, but  while check_node_health also
2668
2669         local tries=3
2670         local RC=254
2671         while [ $RC = 254 -a $tries -gt 0 ]; do
2672                 let tries=$tries-1
2673                 # assume success
2674                 RC=0
2675                 if ! check_node_health $client; then
2676                         RC=${PIPESTATUS[0]}
2677                         if [ $RC -eq 254 ]; then
2678                                 # FIXME: not sure how long we shuold sleep here
2679                                 sleep 10
2680                                 continue
2681                         fi
2682                         echo "check node health failed: RC=$RC "
2683                         return $RC
2684                 fi
2685         done
2686         # We can continue try to connect if RC=254
2687         # Just print the warning about this
2688         if [ $RC = 254 ]; then
2689                 echo "got a return status of $RC from do_node while checking " \
2690                 "node health on $client"
2691         fi
2692
2693         # see if the load is still on the client
2694         tries=3
2695         RC=254
2696         while [ $RC = 254 -a $tries -gt 0 ]; do
2697                 let tries=$tries-1
2698                 # assume success
2699                 RC=0
2700                 if ! do_node $client \
2701                         "ps auxwww | grep -v grep | grep -q $testload"; then
2702                         RC=${PIPESTATUS[0]}
2703                         sleep 30
2704                 fi
2705         done
2706         if [ $RC = 254 ]; then
2707                 echo "got a return status of $RC from do_node while checking " \
2708                 "(node health and 'ps') the client load on $client"
2709                 # see if we can diagnose a bit why this is
2710         fi
2711
2712         return $RC
2713 }
2714 check_client_loads () {
2715    local clients=${1//,/ }
2716    local client=
2717    local rc=0
2718
2719    for client in $clients; do
2720       check_client_load $client
2721       rc=${PIPESTATUS[0]}
2722       if [ "$rc" != 0 ]; then
2723         log "Client load failed on node $client, rc=$rc"
2724         return $rc
2725       fi
2726    done
2727 }
2728
2729 restart_client_loads () {
2730     local clients=${1//,/ }
2731     local expectedfail=${2:-""}
2732     local client=
2733     local rc=0
2734
2735     for client in $clients; do
2736         check_client_load $client
2737         rc=${PIPESTATUS[0]}
2738         if [ "$rc" != 0 -a "$expectedfail" ]; then
2739             local var=$(node_var_name $client)_load
2740             start_client_load $client ${!var}
2741             echo "Restarted client load ${!var}: on $client. Checking ..."
2742             check_client_load $client
2743             rc=${PIPESTATUS[0]}
2744             if [ "$rc" != 0 ]; then
2745                 log "Client load failed to restart on node $client, rc=$rc"
2746                 # failure one client load means test fail
2747                 # we do not need to check other
2748                 return $rc
2749             fi
2750         else
2751             return $rc
2752         fi
2753     done
2754 }
2755
2756 # Start vmstat and save its process ID in a file.
2757 start_vmstat() {
2758     local nodes=$1
2759     local pid_file=$2
2760
2761     [ -z "$nodes" -o -z "$pid_file" ] && return 0
2762
2763     do_nodes $nodes \
2764         "vmstat 1 > $TESTLOG_PREFIX.$TESTNAME.vmstat.\\\$(hostname -s).log \
2765         2>/dev/null </dev/null & echo \\\$! > $pid_file"
2766 }
2767
2768 # Display the nodes on which client loads failed.
2769 print_end_run_file() {
2770     local file=$1
2771     local node
2772
2773     [ -s $file ] || return 0
2774
2775     echo "Found the END_RUN_FILE file: $file"
2776     cat $file
2777
2778     # A client load will stop if it finds the END_RUN_FILE file.
2779     # That does not mean the client load actually failed though.
2780     # The first node in END_RUN_FILE is the one we are interested in.
2781     read node < $file
2782
2783     if [ -n "$node" ]; then
2784         local var=$(node_var_name $node)_load
2785
2786         local prefix=$TESTLOG_PREFIX
2787         [ -n "$TESTNAME" ] && prefix=$prefix.$TESTNAME
2788         local stdout_log=$prefix.run_${!var}_stdout.$node.log
2789         local debug_log=$(echo $stdout_log | sed 's/\(.*\)stdout/\1debug/')
2790
2791         echo "Client load ${!var} failed on node $node:"
2792         echo "$stdout_log"
2793         echo "$debug_log"
2794     fi
2795 }
2796
2797 # Stop the process which had its PID saved in a file.
2798 stop_process() {
2799     local nodes=$1
2800     local pid_file=$2
2801
2802     [ -z "$nodes" -o -z "$pid_file" ] && return 0
2803
2804     do_nodes $nodes "test -f $pid_file &&
2805         { kill -s TERM \\\$(cat $pid_file); rm -f $pid_file; }" || true
2806 }
2807
2808 # Stop all client loads.
2809 stop_client_loads() {
2810     local nodes=${1:-$CLIENTS}
2811     local pid_file=$2
2812
2813     # stop the client loads
2814     stop_process $nodes $pid_file
2815
2816     # clean up the processes that started them
2817     [ -n "$CLIENT_LOAD_PIDS" ] && kill -9 $CLIENT_LOAD_PIDS 2>/dev/null || true
2818 }
2819 # End recovery-scale functions
2820
2821 # verify that lustre actually cleaned up properly
2822 cleanup_check() {
2823         VAR=$(lctl get_param -n catastrophe 2>&1)
2824         if [ $? = 0 ] ; then
2825                 if [ $VAR != 0 ]; then
2826                         error "LBUG/LASSERT detected"
2827                 fi
2828         fi
2829         BUSY=$(dmesg | grep -i destruct || true)
2830         if [ -n "$BUSY" ]; then
2831                 echo "$BUSY" 1>&2
2832                 [ -e $TMP/debug ] && mv $TMP/debug $TMP/debug-busy.$(date +%s)
2833                 exit 205
2834         fi
2835
2836         check_mem_leak || exit 204
2837
2838         [[ $($LCTL dl 2>/dev/null | wc -l) -gt 0 ]] && $LCTL dl &&
2839                 echo "$TESTSUITE: lustre didn't clean up..." 1>&2 &&
2840                 return 202 || true
2841
2842         if module_loaded lnet || module_loaded libcfs; then
2843                 echo "$TESTSUITE: modules still loaded..." 1>&2
2844                 /sbin/lsmod 1>&2
2845                 return 203
2846         fi
2847         return 0
2848 }
2849
2850 wait_update () {
2851         local verbose=false
2852         if [[ "$1" == "--verbose" ]]; then
2853                 shift
2854                 verbose=true
2855         fi
2856
2857         local node=$1
2858         local TEST=$2
2859         local FINAL=$3
2860         local MAX=${4:-90}
2861         local RESULT
2862         local PREV_RESULT
2863         local WAIT=0
2864         local sleep=1
2865         local print=10
2866
2867         PREV_RESULT=$(do_node $node "$TEST")
2868         while [ true ]; do
2869                 RESULT=$(do_node $node "$TEST")
2870                 if [[ "$RESULT" == "$FINAL" ]]; then
2871                         [[ -z "$RESULT" || $WAIT -le $sleep ]] ||
2872                                 echo "Updated after ${WAIT}s: wanted '$FINAL'"\
2873                                      "got '$RESULT'"
2874                         return 0
2875                 fi
2876                 if [[ $verbose && "$RESULT" != "$PREV_RESULT" ]]; then
2877                         echo "Changed after ${WAIT}s: from '$PREV_RESULT'"\
2878                              "to '$RESULT'"
2879                         PREV_RESULT=$RESULT
2880                 fi
2881                 [[ $WAIT -ge $MAX ]] && break
2882                 [[ $((WAIT % print)) -eq 0 ]] &&
2883                         echo "Waiting $((MAX - WAIT)) secs for update"
2884                 WAIT=$((WAIT + sleep))
2885                 sleep $sleep
2886         done
2887         echo "Update not seen after ${MAX}s: wanted '$FINAL' got '$RESULT'"
2888         return 3
2889 }
2890
2891 wait_update_facet() {
2892         local verbose=
2893         [ "$1" = "--verbose" ] && verbose="$1" && shift
2894
2895         local facet=$1
2896         shift
2897         wait_update $verbose $(facet_active_host $facet) "$@"
2898 }
2899
2900 sync_all_data() {
2901         do_nodes $(comma_list $(mdts_nodes)) \
2902             "lctl set_param -n os[cd]*.*MDT*.force_sync=1"
2903         do_nodes $(comma_list $(osts_nodes)) \
2904             "lctl set_param -n osd*.*OS*.force_sync=1" 2>&1 |
2905                 grep -v 'Found no match'
2906 }
2907
2908 wait_zfs_commit() {
2909         local zfs_wait=${2:-5}
2910
2911         # the occupied disk space will be released
2912         # only after TXGs are committed
2913         if [[ $(facet_fstype $1) == zfs ]]; then
2914                 echo "sleep $zfs_wait for ZFS $(facet_fstype $1)"
2915                 sleep $zfs_wait
2916         fi
2917 }
2918
2919 wait_delete_completed_mds() {
2920         local max_wait=${1:-20}
2921         local mds2sync=""
2922         local stime=$(date +%s)
2923         local etime
2924         local node
2925         local changes
2926
2927         # find MDS with pending deletions
2928         for node in $(mdts_nodes); do
2929                 changes=$(do_node $node "$LCTL get_param -n osc.*MDT*.sync_*" \
2930                         2>/dev/null | calc_sum)
2931                 if [[ $changes -eq 0 ]]; then
2932                         continue
2933                 fi
2934                 mds2sync="$mds2sync $node"
2935         done
2936         if [ -z "$mds2sync" ]; then
2937                 wait_zfs_commit $SINGLEMDS
2938                 return 0
2939         fi
2940         mds2sync=$(comma_list $mds2sync)
2941
2942         # sync MDS transactions
2943         do_nodes $mds2sync "$LCTL set_param -n os[cd]*.*MD*.force_sync 1"
2944
2945         # wait till all changes are sent and commmitted by OSTs
2946         # for ldiskfs space is released upon execution, but DMU
2947         # do this upon commit
2948
2949         local WAIT=0
2950         while [[ $WAIT -ne $max_wait ]]; do
2951                 changes=$(do_nodes $mds2sync \
2952                         "$LCTL get_param -n osc.*MDT*.sync_*" | calc_sum)
2953                 #echo "$node: $changes changes on all"
2954                 if [[ $changes -eq 0 ]]; then
2955                         wait_zfs_commit $SINGLEMDS
2956
2957                         # the occupied disk space will be released
2958                         # only after TXGs are committed
2959                         wait_zfs_commit ost1
2960                         return 0
2961                 fi
2962                 sleep 1
2963                 WAIT=$((WAIT + 1))
2964         done
2965
2966         etime=$(date +%s)
2967         echo "Delete is not completed in $((etime - stime)) seconds"
2968         do_nodes $mds2sync "$LCTL get_param osc.*MDT*.sync_*"
2969         return 1
2970 }
2971
2972 wait_for_host() {
2973     local hostlist=$1
2974
2975     # we can use "for" here because we are waiting the slowest
2976     for host in ${hostlist//,/ }; do
2977         check_network "$host" 900
2978     done
2979     while ! do_nodes $hostlist hostname  > /dev/null; do sleep 5; done
2980 }
2981
2982 wait_for_facet() {
2983     local facetlist=$1
2984     local hostlist
2985
2986     for facet in ${facetlist//,/ }; do
2987         hostlist=$(expand_list $hostlist $(facet_active_host $facet))
2988     done
2989     wait_for_host $hostlist
2990 }
2991
2992 _wait_recovery_complete () {
2993     local param=$1
2994
2995     # Use default policy if $2 is not passed by caller.
2996     local MAX=${2:-$(max_recovery_time)}
2997
2998     local WAIT=0
2999     local STATUS=
3000
3001     while [ $WAIT -lt $MAX ]; do
3002         STATUS=$(lctl get_param -n $param | grep status)
3003         echo $param $STATUS
3004         [[ $STATUS = "status: COMPLETE" || $STATUS = "status: INACTIVE" ]] && return 0
3005         sleep 5
3006         WAIT=$((WAIT + 5))
3007         echo "Waiting $((MAX - WAIT)) secs for $param recovery done. $STATUS"
3008     done
3009     echo "$param recovery not done in $MAX sec. $STATUS"
3010     return 1
3011 }
3012
3013 wait_recovery_complete () {
3014     local facet=$1
3015
3016     # with an assumption that at_max is the same on all nodes
3017     local MAX=${2:-$(max_recovery_time)}
3018
3019     local facets=$facet
3020     if [ "$FAILURE_MODE" = HARD ]; then
3021         facets=$(facets_on_host $(facet_active_host $facet))
3022     fi
3023     echo affected facets: $facets
3024
3025         # we can use "for" here because we are waiting the slowest
3026         for facet in ${facets//,/ }; do
3027                 local var_svc=${facet}_svc
3028                 local param="*.${!var_svc}.recovery_status"
3029
3030                 local host=$(facet_active_host $facet)
3031                 do_rpc_nodes "$host" _wait_recovery_complete $param $MAX
3032         done
3033 }
3034
3035 wait_mds_ost_sync () {
3036         # just because recovery is done doesn't mean we've finished
3037         # orphan cleanup. Wait for llogs to get synchronized.
3038         echo "Waiting for orphan cleanup..."
3039         # MAX value includes time needed for MDS-OST reconnection
3040         local MAX=$(( TIMEOUT * 2 ))
3041         local WAIT_TIMEOUT=${1:-$MAX}
3042         local WAIT=0
3043         local new_wait=true
3044         local list=$(comma_list $(mdts_nodes))
3045         local cmd="$LCTL get_param -n osp.*osc*.old_sync_processed"
3046         if ! do_facet $SINGLEMDS \
3047                 "$LCTL list_param osp.*osc*.old_sync_processed 2> /dev/null"
3048         then
3049                 # old way, use mds_sync
3050                 new_wait=false
3051                 list=$(comma_list $(osts_nodes))
3052                 cmd="$LCTL get_param -n obdfilter.*.mds_sync"
3053         fi
3054
3055         echo "wait $WAIT_TIMEOUT secs maximumly for $list mds-ost sync done."
3056         while [ $WAIT -lt $WAIT_TIMEOUT ]; do
3057                 local -a sync=($(do_nodes $list "$cmd"))
3058                 local con=1
3059                 local i
3060                 for ((i=0; i<${#sync[@]}; i++)); do
3061                         if $new_wait; then
3062                                 [ ${sync[$i]} -eq 1 ] && continue
3063                         else
3064                                 [ ${sync[$i]} -eq 0 ] && continue
3065                         fi
3066                         # there is a not finished MDS-OST synchronization
3067                         con=0
3068                         break;
3069                 done
3070                 sleep 2 # increase waiting time and cover statfs cache
3071                 [ ${con} -eq 1 ] && return 0
3072                 echo "Waiting $WAIT secs for $list $i mds-ost sync done."
3073                 WAIT=$((WAIT + 2))
3074         done
3075
3076         # show which nodes are not finished.
3077         cmd=$(echo $cmd | sed 's/-n//')
3078         do_nodes $list "$cmd"
3079         echo "$facet recovery node $i not done in $WAIT_TIMEOUT sec. $STATUS"
3080         return 1
3081 }
3082
3083 # Wait OSTs to be active on both client and MDT side.
3084 wait_osts_up() {
3085         local cmd="$LCTL get_param -n lov.$FSNAME-clilov-*.target_obd |
3086                 awk 'BEGIN {c = 0} /ACTIVE/{c += 1} END {printf \\\"%d\\\", c}'"
3087         wait_update $HOSTNAME "eval $cmd" $OSTCOUNT ||
3088                 error "wait_update OSTs up on client failed"
3089
3090         cmd="$LCTL get_param osp.$FSNAME-OST*-MDT0000.prealloc_last_id |
3091              awk '/=[1-9][0-9]/ { c += 1 } END { printf \\\"%d\\\", c }'"
3092         wait_update_facet $SINGLEMDS "eval $cmd" $OSTCOUNT ||
3093                 error "wait_update OSTs up on MDT0000 failed"
3094 }
3095
3096 wait_destroy_complete () {
3097         echo "Waiting for local destroys to complete"
3098         # MAX value shouldn't be big as this mean server responsiveness
3099         # never increase this just to make test pass but investigate
3100         # why it takes so long time
3101         local MAX=5
3102         local WAIT=0
3103         while [ $WAIT -lt $MAX ]; do
3104                 local -a RPCs=($($LCTL get_param -n osc.*.destroys_in_flight))
3105                 local con=1
3106                 local i
3107
3108                 for ((i=0; i<${#RPCs[@]}; i++)); do
3109                         [ ${RPCs[$i]} -eq 0 ] && continue
3110                         # there are still some destroy RPCs in flight
3111                         con=0
3112                         break;
3113                 done
3114                 sleep 1
3115                 [ ${con} -eq 1 ] && return 0 # done waiting
3116                 echo "Waiting ${WAIT}s for local destroys to complete"
3117                 WAIT=$((WAIT + 1))
3118         done
3119         echo "Local destroys weren't done in $MAX sec."
3120         return 1
3121 }
3122
3123 wait_delete_completed() {
3124         wait_delete_completed_mds $1 || return $?
3125         wait_destroy_complete || return $?
3126 }
3127
3128 wait_exit_ST () {
3129     local facet=$1
3130
3131     local WAIT=0
3132     local INTERVAL=1
3133     local running
3134     # conf-sanity 31 takes a long time cleanup
3135     while [ $WAIT -lt 300 ]; do
3136         running=$(do_facet ${facet} "lsmod | grep lnet > /dev/null &&
3137 lctl dl | grep ' ST ' || true")
3138         [ -z "${running}" ] && return 0
3139         echo "waited $WAIT for${running}"
3140         [ $INTERVAL -lt 64 ] && INTERVAL=$((INTERVAL + INTERVAL))
3141         sleep $INTERVAL
3142         WAIT=$((WAIT + INTERVAL))
3143     done
3144     echo "service didn't stop after $WAIT seconds.  Still running:"
3145     echo ${running}
3146     return 1
3147 }
3148
3149 wait_remote_prog () {
3150    local prog=$1
3151    local WAIT=0
3152    local INTERVAL=5
3153    local rc=0
3154
3155    [ "$PDSH" = "no_dsh" ] && return 0
3156
3157    while [ $WAIT -lt $2 ]; do
3158         running=$(ps uax | grep "$PDSH.*$prog.*$MOUNT" | grep -v grep) || true
3159         [ -z "${running}" ] && return 0 || true
3160         echo "waited $WAIT for: "
3161         echo "$running"
3162         [ $INTERVAL -lt 60 ] && INTERVAL=$((INTERVAL + INTERVAL))
3163         sleep $INTERVAL
3164         WAIT=$((WAIT + INTERVAL))
3165     done
3166     local pids=$(ps  uax | grep "$PDSH.*$prog.*$MOUNT" | grep -v grep | awk '{print $2}')
3167     [ -z "$pids" ] && return 0
3168     echo "$PDSH processes still exists after $WAIT seconds.  Still running: $pids"
3169     # FIXME: not portable
3170     for pid in $pids; do
3171         cat /proc/${pid}/status || true
3172         cat /proc/${pid}/wchan || true
3173         echo "Killing $pid"
3174         kill -9 $pid || true
3175         sleep 1
3176         ps -P $pid && rc=1
3177     done
3178
3179     return $rc
3180 }
3181
3182 lfs_df_check() {
3183         local clients=${1:-$CLIENTS}
3184
3185         if [ -z "$clients" ]; then
3186                 $LFS df $MOUNT
3187         else
3188                 $PDSH $clients "$LFS df $MOUNT" > /dev/null
3189         fi
3190 }
3191
3192 clients_up() {
3193         # not every config has many clients
3194         sleep 1
3195         lfs_df_check
3196 }
3197
3198 client_up() {
3199         # usually checked on particular client or locally
3200         sleep 1
3201         lfs_df_check $1
3202 }
3203
3204 client_evicted() {
3205     ! client_up $1
3206 }
3207
3208 client_reconnect_try() {
3209         local f=$MOUNT/recon
3210
3211         uname -n >> $f
3212         if [ -z "$CLIENTS" ]; then
3213                 $LFS df $MOUNT; uname -n >> $f
3214         else
3215                 do_nodes $CLIENTS "$LFS df $MOUNT; uname -n >> $f" > /dev/null
3216         fi
3217         echo "Connected clients: $(cat $f)"
3218         ls -l $f > /dev/null
3219         rm $f
3220 }
3221
3222 client_reconnect() {
3223         # one client_reconnect_try call does not always do the job...
3224         while true ; do
3225                 client_reconnect_try && break
3226                 sleep 1
3227         done
3228 }
3229
3230 affected_facets () {
3231     local facet=$1
3232
3233     local host=$(facet_active_host $facet)
3234     local affected=$facet
3235
3236     if [ "$FAILURE_MODE" = HARD ]; then
3237         affected=$(facets_up_on_host $host)
3238     fi
3239     echo $affected
3240 }
3241
3242 facet_failover() {
3243         local E2FSCK_ON_MDT0=false
3244         if [ "$1" == "--fsck" ]; then
3245                 shift
3246                 [ $(facet_fstype $SINGLEMDS) == ldiskfs ] &&
3247                         E2FSCK_ON_MDT0=true
3248         fi
3249
3250         local facets=$1
3251         local sleep_time=$2
3252         local -a affecteds
3253         local facet
3254         local total=0
3255         local index=0
3256         local skip
3257
3258         #Because it will only get up facets, we need get affected
3259         #facets before shutdown
3260         #For HARD Failure mode, it needs make sure facets on the same
3261         #HOST will only be shutdown and reboot once
3262         for facet in ${facets//,/ }; do
3263                 local affected_facet
3264                 skip=0
3265                 #check whether facet has been included in other affected facets
3266                 for ((index=0; index<$total; index++)); do
3267                         [[ *,$facet,* == ,${affecteds[index]}, ]] && skip=1
3268                 done
3269
3270                 if [ $skip -eq 0 ]; then
3271                         affecteds[$total]=$(affected_facets $facet)
3272                         total=$((total+1))
3273                 fi
3274         done
3275
3276         for ((index=0; index<$total; index++)); do
3277                 facet=$(echo ${affecteds[index]} | tr -s " " | cut -d"," -f 1)
3278                 local host=$(facet_active_host $facet)
3279                 echo "Failing ${affecteds[index]} on $host"
3280                 shutdown_facet $facet
3281         done
3282
3283         $E2FSCK_ON_MDT0 && (run_e2fsck $(facet_active_host $SINGLEMDS) \
3284                 $(mdsdevname 1) "-n" || error "Running e2fsck")
3285
3286         for ((index=0; index<$total; index++)); do
3287                 facet=$(echo ${affecteds[index]} | tr -s " " | cut -d"," -f 1)
3288                 echo reboot facets: ${affecteds[index]}
3289
3290                 reboot_facet $facet
3291
3292                 change_active ${affecteds[index]}
3293
3294                 wait_for_facet ${affecteds[index]}
3295                 # start mgs first if it is affected
3296                 if ! combined_mgs_mds &&
3297                         list_member ${affecteds[index]} mgs; then
3298                         mount_facet mgs || error "Restart of mgs failed"
3299                 fi
3300                 # FIXME; has to be changed to mount all facets concurrently
3301                 affected=$(exclude_items_from_list ${affecteds[index]} mgs)
3302                 echo mount facets: ${affecteds[index]}
3303                 mount_facets ${affecteds[index]}
3304         done
3305 }
3306
3307 obd_name() {
3308     local facet=$1
3309 }
3310
3311 replay_barrier() {
3312         local facet=$1
3313         do_facet $facet "sync; sync; sync"
3314         $LFS df $MOUNT
3315
3316         # make sure there will be no seq change
3317         local clients=${CLIENTS:-$HOSTNAME}
3318         local f=fsa-\\\$\(hostname\)
3319         do_nodes $clients "mcreate $MOUNT/$f; rm $MOUNT/$f"
3320         do_nodes $clients "if [ -d $MOUNT2 ]; then mcreate $MOUNT2/$f; rm $MOUNT2/$f; fi"
3321
3322         local svc=${facet}_svc
3323         do_facet $facet $LCTL --device ${!svc} notransno
3324         #
3325         # If a ZFS OSD is made read-only here, its pool is "freezed". This
3326         # in-memory state has to be cleared by either rebooting the host or
3327         # exporting and reimporting the pool.
3328         #
3329         # Although the uberblocks are not updated when a pool is freezed,
3330         # transactions are still written to the disks. Modified blocks may be
3331         # cached in memory when tests try reading them back. The
3332         # export-and-reimport process also evicts any cached pool data from
3333         # memory to provide the correct "data loss" semantics.
3334         #
3335         # In the test framework, the exporting and importing operations are
3336         # handled by stop() and mount_facet() separately, which are used
3337         # inside fail() and fail_abort().
3338         #
3339         set_dev_readonly $facet
3340         do_facet $facet $LCTL mark "$facet REPLAY BARRIER on ${!svc}"
3341         $LCTL mark "local REPLAY BARRIER on ${!svc}"
3342 }
3343
3344 replay_barrier_nodf() {
3345         local facet=$1    echo running=${running}
3346         do_facet $facet "sync; sync; sync"
3347         local svc=${facet}_svc
3348         echo Replay barrier on ${!svc}
3349         do_facet $facet $LCTL --device ${!svc} notransno
3350         set_dev_readonly $facet
3351         do_facet $facet $LCTL mark "$facet REPLAY BARRIER on ${!svc}"
3352         $LCTL mark "local REPLAY BARRIER on ${!svc}"
3353 }
3354
3355 replay_barrier_nosync() {
3356         local facet=$1    echo running=${running}
3357         local svc=${facet}_svc
3358         echo Replay barrier on ${!svc}
3359         do_facet $facet $LCTL --device ${!svc} notransno
3360         set_dev_readonly $facet
3361         do_facet $facet $LCTL mark "$facet REPLAY BARRIER on ${!svc}"
3362         $LCTL mark "local REPLAY BARRIER on ${!svc}"
3363 }
3364
3365 #
3366 # Get Lustre client uuid for a given Lustre mount point.
3367 #
3368 get_client_uuid() {
3369         local mntpnt=${1:-$MOUNT}
3370
3371         local name=$($LFS getname $mntpnt | cut -d' ' -f1)
3372         local uuid=$($LCTL get_param -n llite.$name.uuid)
3373
3374         echo -n $uuid
3375 }
3376
3377 mds_evict_client() {
3378         local mntpnt=${1:-$MOUNT}
3379         local uuid=$(get_client_uuid $mntpnt)
3380
3381         do_facet $SINGLEMDS \
3382                 "$LCTL set_param -n mdt.${mds1_svc}.evict_client $uuid"
3383 }
3384
3385 ost_evict_client() {
3386         local mntpnt=${1:-$MOUNT}
3387         local uuid=$(get_client_uuid $mntpnt)
3388
3389         do_facet ost1 \
3390                 "$LCTL set_param -n obdfilter.${ost1_svc}.evict_client $uuid"
3391 }
3392
3393 fail() {
3394         local facets=$1
3395         local clients=${CLIENTS:-$HOSTNAME}
3396
3397         facet_failover $* || error "failover: $?"
3398         # to initiate all OSC idling connections
3399         clients_up
3400         wait_clients_import_state "$clients" "$facets" "\(FULL\|IDLE\)"
3401         clients_up || error "post-failover stat: $?"
3402 }
3403
3404 fail_nodf() {
3405         local facet=$1
3406         facet_failover $facet
3407 }
3408
3409 fail_abort() {
3410         local facet=$1
3411         stop $facet
3412         change_active $facet
3413         wait_for_facet $facet
3414         mount_facet $facet -o abort_recovery
3415         clients_up || echo "first stat failed: $?"
3416         clients_up || error "post-failover stat: $?"
3417 }
3418
3419 host_nids_address() {
3420         local nodes=$1
3421         local net=${2:-"."}
3422
3423         do_nodes $nodes "$LCTL list_nids | grep $net | cut -f 1 -d @"
3424 }
3425
3426 h2name_or_ip() {
3427         if [ "$1" = "'*'" ]; then echo \'*\'; else
3428                 echo $1"@$2"
3429         fi
3430 }
3431
3432 h2nettype() {
3433         if [[ -n "$NETTYPE" ]]; then
3434                 h2name_or_ip "$1" "$NETTYPE"
3435         else
3436                 h2name_or_ip "$1" "$2"
3437         fi
3438 }
3439 declare -fx h2nettype
3440
3441 # Wrapper function to print the deprecation warning
3442 h2tcp() {
3443         echo "h2tcp: deprecated, use h2nettype instead" 1>&2
3444         if [[ -n "$NETTYPE" ]]; then
3445                 h2nettype "$@"
3446         else
3447                 h2nettype "$1" "tcp"
3448         fi
3449 }
3450
3451 # Wrapper function to print the deprecation warning
3452 h2o2ib() {
3453         echo "h2o2ib: deprecated, use h2nettype instead" 1>&2
3454         if [[ -n "$NETTYPE" ]]; then
3455                 h2nettype "$@"
3456         else
3457                 h2nettype "$1" "o2ib"
3458         fi
3459 }
3460
3461 # This enables variables in cfg/"setup".sh files to support the pdsh HOSTLIST
3462 # expressions format. As a bonus we can then just pass in those variables
3463 # to pdsh. What this function does is take a HOSTLIST type string and
3464 # expand it into a space deliminated list for us.
3465 hostlist_expand() {
3466     local hostlist=$1
3467     local offset=$2
3468     local myList
3469     local item
3470     local list
3471
3472     [ -z "$hostlist" ] && return
3473
3474     # Translate the case of [..],..,[..] to [..] .. [..]
3475     list="${hostlist/],/] }"
3476     front=${list%%[*}
3477     [[ "$front" == *,* ]] && {
3478         new="${list%,*} "
3479         old="${list%,*},"
3480         list=${list/${old}/${new}}
3481     }
3482
3483     for item in $list; do
3484         # Test if we have any []'s at all
3485         if [ "$item" != "${item/\[/}" ]; then {
3486             # Expand the [*] into list
3487             name=${item%%[*}
3488             back=${item#*]}
3489
3490             if [ "$name" != "$item" ]; then
3491                 group=${item#$name[*}
3492                 group=${group%%]*}
3493
3494                 for range in ${group//,/ }; do
3495                     local order
3496
3497                     begin=${range%-*}
3498                     end=${range#*-}
3499
3500                     # Number of leading zeros
3501                     padlen=${#begin}
3502                     padlen2=${#end}
3503                     end=$(echo $end | sed 's/0*//')
3504                     [[ -z "$end" ]] && end=0
3505                     [[ $padlen2 -gt $padlen ]] && {
3506                         [[ $padlen2 -eq ${#end} ]] && padlen2=0
3507                         padlen=$padlen2
3508                     }
3509                     begin=$(echo $begin | sed 's/0*//')
3510                     [ -z $begin ] && begin=0
3511
3512                     if [ ! -z "${begin##[!0-9]*}" ]; then
3513                         order=$(seq -f "%0${padlen}g" $begin $end)
3514                     else
3515                         order=$(eval echo {$begin..$end});
3516                     fi
3517
3518                     for num in $order; do
3519                         value="${name#*,}${num}${back}"
3520                         [ "$value" != "${value/\[/}" ] && {
3521                             value=$(hostlist_expand "$value")
3522                         }
3523                         myList="$myList $value"
3524                     done
3525                 done
3526             fi
3527         } else {
3528             myList="$myList $item"
3529         } fi
3530     done
3531     myList=${myList//,/ }
3532     myList=${myList:1} # Remove first character which is a space
3533
3534     # Filter any duplicates without sorting
3535     list="$myList "
3536     myList="${list%% *}"
3537
3538     while [[ "$list" != ${myList##* } ]]; do
3539         local tlist=" $list"
3540         list=${tlist// ${list%% *} / }
3541         list=${list:1}
3542         myList="$myList ${list%% *}"
3543     done
3544     myList="${myList%* }";
3545
3546     # We can select an object at an offset in the list
3547     [ $# -eq 2 ] && {
3548         cnt=0
3549         for item in $myList; do
3550             let cnt=cnt+1
3551             [ $cnt -eq $offset ] && {
3552                 myList=$item
3553             }
3554         done
3555         [ $(get_node_count $myList) -ne 1 ] && myList=""
3556     }
3557     echo $myList
3558 }
3559
3560 facet_host() {
3561         local facet=$1
3562         local varname
3563
3564         [ "$facet" == client ] && echo -n $HOSTNAME && return
3565         varname=${facet}_HOST
3566         if [ -z "${!varname}" ]; then
3567                 if [ "${facet:0:3}" == "ost" ]; then
3568                         local fh=${facet%failover}_HOST
3569                         eval export ${facet}_HOST=${!fh}
3570                         if [ -z "${!varname}" ]; then
3571                                 eval export ${facet}_HOST=${ost_HOST}
3572                         fi
3573                 elif [ "${facet:0:3}" == "mdt" -o \
3574                         "${facet:0:3}" == "mds" -o \
3575                         "${facet:0:3}" == "mgs" ]; then
3576                         eval export ${facet}_HOST=${mds_HOST}
3577                 fi
3578         fi
3579         echo -n ${!varname}
3580 }
3581
3582 facet_failover_host() {
3583         local facet=$1
3584         local varname
3585
3586         var=${facet}failover_HOST
3587         if [ -n "${!var}" ]; then
3588                 echo ${!var}
3589                 return
3590         fi
3591
3592         if [ "${facet:0:3}" == "mdt" -o "${facet:0:3}" == "mds" -o \
3593              "${facet:0:3}" == "mgs" ]; then
3594
3595                 eval export ${facet}failover_host=${mds_HOST}
3596                 echo ${mds_HOST}
3597                 return
3598         fi
3599
3600         if [[ $facet == ost* ]]; then
3601                 eval export ${facet}failover_host=${ost_HOST}
3602                 echo ${ost_HOST}
3603                 return
3604         fi
3605 }
3606
3607 facet_active() {
3608     local facet=$1
3609     local activevar=${facet}active
3610
3611     if [ -f $TMP/${facet}active ] ; then
3612         source $TMP/${facet}active
3613     fi
3614
3615     active=${!activevar}
3616     if [ -z "$active" ] ; then
3617         echo -n ${facet}
3618     else
3619         echo -n ${active}
3620     fi
3621 }
3622
3623 facet_active_host() {
3624         facet_host $(facet_active $1)
3625 }
3626
3627 # Get the passive failover partner host of facet.
3628 facet_passive_host() {
3629         local facet=$1
3630         [[ $facet = client ]] && return
3631
3632         local host=${facet}_HOST
3633         local failover_host=${facet}failover_HOST
3634         local active_host=$(facet_active_host $facet)
3635
3636         [[ -z ${!failover_host} || ${!failover_host} = ${!host} ]] && return
3637
3638         if [[ $active_host = ${!host} ]]; then
3639                 echo -n ${!failover_host}
3640         else
3641                 echo -n ${!host}
3642         fi
3643 }
3644
3645 change_active() {
3646     local facetlist=$1
3647     local facet
3648
3649     facetlist=$(exclude_items_from_list $facetlist mgs)
3650
3651     for facet in ${facetlist//,/ }; do
3652     local failover=${facet}failover
3653     local host=`facet_host $failover`
3654     [ -z "$host" ] && return
3655
3656     local curactive=`facet_active $facet`
3657     if [ -z "${curactive}" -o "$curactive" == "$failover" ] ; then
3658         eval export ${facet}active=$facet
3659     else
3660         eval export ${facet}active=$failover
3661     fi
3662     # save the active host for this facet
3663     local activevar=${facet}active
3664     echo "$activevar=${!activevar}" > $TMP/$activevar
3665     [[ $facet = mds1 ]] && combined_mgs_mds && \
3666         echo "mgsactive=${!activevar}" > $TMP/mgsactive
3667     local TO=`facet_active_host $facet`
3668     echo "Failover $facet to $TO"
3669     done
3670 }
3671
3672 do_node() {
3673     local verbose=false
3674     # do not stripe off hostname if verbose, bug 19215
3675     if [ x$1 = x--verbose ]; then
3676         shift
3677         verbose=true
3678     fi
3679
3680     local HOST=$1
3681     shift
3682     local myPDSH=$PDSH
3683     if [ "$HOST" = "$HOSTNAME" ]; then
3684         myPDSH="no_dsh"
3685     elif [ -z "$myPDSH" -o "$myPDSH" = "no_dsh" ]; then
3686         echo "cannot run remote command on $HOST with $myPDSH"
3687         return 128
3688     fi
3689     if $VERBOSE; then
3690         echo "CMD: $HOST $@" >&2
3691         $myPDSH $HOST "$LCTL mark \"$@\"" > /dev/null 2>&1 || :
3692     fi
3693
3694         if [[ "$myPDSH" == "rsh" ]] ||
3695            [[ "$myPDSH" == *pdsh* && "$myPDSH" != *-S* ]]; then
3696                 # we need this because rsh and pdsh do not return
3697                 # exit code of an executed command
3698                 local command_status="$TMP/cs"
3699                 eval $myPDSH $HOST ":> $command_status"
3700                 eval $myPDSH $HOST "(PATH=\$PATH:$RLUSTRE/utils:$RLUSTRE/tests;
3701                                      PATH=\$PATH:/sbin:/usr/sbin;
3702                                      cd $RPWD;
3703                                      LUSTRE=\"$RLUSTRE\" sh -c \"$@\") ||
3704                                      echo command failed >$command_status"
3705                 [[ -n "$($myPDSH $HOST cat $command_status)" ]] && return 1 ||
3706                         return 0
3707         fi
3708
3709     if $verbose ; then
3710         # print HOSTNAME for myPDSH="no_dsh"
3711         if [[ $myPDSH = no_dsh ]]; then
3712             $myPDSH $HOST "(PATH=\$PATH:$RLUSTRE/utils:$RLUSTRE/tests:/sbin:/usr/sbin; cd $RPWD; LUSTRE=\"$RLUSTRE\" sh -c \"$@\")" | sed -e "s/^/${HOSTNAME}: /"
3713         else
3714             $myPDSH $HOST "(PATH=\$PATH:$RLUSTRE/utils:$RLUSTRE/tests:/sbin:/usr/sbin; cd $RPWD; LUSTRE=\"$RLUSTRE\" sh -c \"$@\")"
3715         fi
3716     else
3717         $myPDSH $HOST "(PATH=\$PATH:$RLUSTRE/utils:$RLUSTRE/tests:/sbin:/usr/sbin; cd $RPWD; LUSTRE=\"$RLUSTRE\" sh -c \"$@\")" | sed "s/^${HOST}: //"
3718     fi
3719     return ${PIPESTATUS[0]}
3720 }
3721
3722 do_nodev() {
3723     do_node --verbose "$@"
3724 }
3725
3726 single_local_node () {
3727    [ "$1" = "$HOSTNAME" ]
3728 }
3729
3730 # Outputs environment variable assignments that should be passed to remote nodes
3731 get_env_vars() {
3732         local var
3733         local value
3734         local facets=$(get_facets)
3735         local facet
3736
3737         for var in ${!MODOPTS_*}; do
3738                 value=${!var//\"/\\\"}
3739                 echo -n " ${var}=\"$value\""
3740         done
3741
3742         for facet in ${facets//,/ }; do
3743                 var=${facet}_FSTYPE
3744                 if [ -n "${!var}" ]; then
3745                         echo -n " $var=${!var}"
3746                 fi
3747         done
3748
3749         for var in MGSFSTYPE MDSFSTYPE OSTFSTYPE; do
3750                 if [ -n "${!var}" ]; then
3751                         echo -n " $var=${!var}"
3752                 fi
3753         done
3754
3755         for var in VERBOSE; do
3756                 if [ -n "${!var}" ]; then
3757                         echo -n " $var=${!var}"
3758                 fi
3759         done
3760
3761         if [ -n "$FSTYPE" ]; then
3762                 echo -n " FSTYPE=$FSTYPE"
3763         fi
3764
3765         for var in LNETLND NETTYPE; do
3766                 if [ -n "${!var}" ]; then
3767                         echo -n " $var=${!var}"
3768                 fi
3769         done
3770 }
3771
3772 do_nodes() {
3773     local verbose=false
3774     # do not stripe off hostname if verbose, bug 19215
3775     if [ x$1 = x--verbose ]; then
3776         shift
3777         verbose=true
3778     fi
3779
3780     local rnodes=$1
3781     shift
3782
3783     if single_local_node $rnodes; then
3784         if $verbose; then
3785            do_nodev $rnodes "$@"
3786         else
3787            do_node $rnodes "$@"
3788         fi
3789         return $?
3790     fi
3791
3792     # This is part from do_node
3793     local myPDSH=$PDSH
3794
3795     [ -z "$myPDSH" -o "$myPDSH" = "no_dsh" -o "$myPDSH" = "rsh" ] && \
3796         echo "cannot run remote command on $rnodes with $myPDSH" && return 128
3797
3798     export FANOUT=$(get_node_count "${rnodes//,/ }")
3799     if $VERBOSE; then
3800         echo "CMD: $rnodes $@" >&2
3801         $myPDSH $rnodes "$LCTL mark \"$@\"" > /dev/null 2>&1 || :
3802     fi
3803
3804     # do not replace anything from pdsh output if -N is used
3805     # -N     Disable hostname: prefix on lines of output.
3806     if $verbose || [[ $myPDSH = *-N* ]]; then
3807         $myPDSH $rnodes "(PATH=\$PATH:$RLUSTRE/utils:$RLUSTRE/tests:/sbin:/usr/sbin; cd $RPWD; LUSTRE=\"$RLUSTRE\" $(get_env_vars) sh -c \"$@\")"
3808     else
3809         $myPDSH $rnodes "(PATH=\$PATH:$RLUSTRE/utils:$RLUSTRE/tests:/sbin:/usr/sbin; cd $RPWD; LUSTRE=\"$RLUSTRE\" $(get_env_vars) sh -c \"$@\")" | sed -re "s/^[^:]*: //g"
3810     fi
3811     return ${PIPESTATUS[0]}
3812 }
3813
3814 ##
3815 # Execute commands on a single service's host
3816 #
3817 # The \a facet (service) may be on a local or remote node, which is
3818 # determined at the time the command is run.
3819 #
3820 # usage: do_facet $facet command [arg ...]
3821 do_facet() {
3822         local facet=$1
3823         shift
3824         local HOST=$(facet_active_host $facet)
3825         [ -z $HOST ] && echo "No host defined for facet ${facet}" && exit 1
3826         do_node $HOST "$@"
3827 }
3828
3829 # Function: do_facet_random_file $FACET $FILE $SIZE
3830 # Creates FILE with random content on the given FACET of given SIZE
3831
3832 do_facet_random_file() {
3833         local facet="$1"
3834         local fpath="$2"
3835         local fsize="$3"
3836         local cmd="dd if=/dev/urandom of='$fpath' bs=$fsize count=1"
3837         do_facet $facet "$cmd 2>/dev/null"
3838 }
3839
3840 do_facet_create_file() {
3841         local facet="$1"
3842         local fpath="$2"
3843         local fsize="$3"
3844         local cmd="dd i