lustre/tests/ha.sh

   1 #!/bin/bash
   2 # -*- mode: Bash; tab-width: 4; indent-tabs-mode: t; -*-
   3 # vim:shiftwidth=4:softtabstop=4:tabstop=4:
   4 #
   5 # NAME
   6 #
   7 #   ha.sh - test Lustre HA (aka failover) configurations
   8 #
   9 # SYNOPSIS
  10 #
  11 #   ha.sh [OPTIONS]
  12 #
  13 # DESCRIPTION
  14 #
  15 #   ha.sh tests Lustre HA (aka failover) configurations with a CRM.
  16 #
  17 # OPTIONS
  18 #
  19 #   -h
  20 #       Help.
  21 #
  22 #   -c HOST[,...]
  23 #       Specify client nodes.
  24 #
  25 #   -s HOST[,...]
  26 #       Specify server nodes.
  27 #
  28 #   -v HOST[,...]
  29 #       Specify victim nodes to be rebooted.
  30 #
  31 #   -d DIRECTORY
  32 #       Choose a parent of the test directory.  "/mnt/lustre" if not specified.
  33 #
  34 #   -u SECONDS
  35 #       Define a duration for the test. 86400 seconds if not specified.
  36 #
  37 #   -p SECONDS
  38 #       Define a max failover period. 10 minutes if not set.
  39 #
  40 #   -w
  41 #       Only run the workloads; no failure will be introduced.
  42 #       -v, -s are ignored in this case.
  43 #   -r
  44 #       Workloads dry run for several seconds; no failures will be introduced.
  45 #       This option is useful to verify the loads.
  46 #       -u is ignored in this case
  47 #   -m
  48 #       Reboot victim nodes simultaneously.
  49 #
  50 #
  51 # ASSUMPTIONS
  52 #
  53 #   A Lustre file system is up and mounted on all client nodes.  This script
  54 #   does not mount or unmount any Lustre targets or clients, let alone format
  55 #   anything.
  56 #
  57 #   Each target has a failnode, so that workloads can continue after a power
  58 #   failure.
  59 #
  60 #   CRM could be configured by 2 ways:
  61 #   1.
  62 #   Targets are automatically failed back when their primary node is back.  This
  63 #   assumption avoids calling CRM-specific commands to trigger failbacks, making
  64 #   this script more CRM-neural.
  65 #   2.
  66 #   Targets are not automatically failed back when their primary node is back.
  67 #   CRM-specific command is executed to trigger failbacks.
  68 #
  69 #   A crash dump mechanism is configured to catch LBUGs, panics, etc.
  70 #
  71 # WORKLOADS
  72 #
  73 #   Each client runs set of MPI and non-MPI workloads. These
  74 #   applications are run in short loops so that their exit status can be waited
  75 #   for and checked within reasonable time by ha_wait_loads.
  76 #   The set of MPI and non-MPI workloads are configurable by parameters:
  77 #       ha_nonmpi_loads
  78 #               default set: dd, tar, iozone
  79 #       ha_mpi_loads
  80 #               default set: ior, simul, mdtest
  81 #
  82 #   The number of clients run MPI loads is configured by parameter
  83 #   ha_mpi_instances. Only one client runs MPI workloads by default.
  84 #
  85 #   MPI workloads can be run from several users. The list of users to use is
  86 #   configured by parameter ha_mpi_users, default is "mpiuser".
  87 #
  88 # PROCESS STRUCTURE AND IPC
  89 #
  90 #   On the node where this script is run, the processes look like this:
  91 #
  92 #       ~ ha.sh (ha_killer)
  93 #
  94 #           ~ ha.sh (ha_repeat_mpi_load ior)
  95 #               ~ mpirun IOR
  96 #           ~ ha.sh (ha_repeat_mpi_load simul)
  97 #               ~ mpirun simul
  98 #           ~ ha.sh (ha_repeat_mpi_load mdtest)
  99 #               ~ mpirun mdtest
 100 #           ~ ... (one for each MPI load)
 101 #
 102 #           ~ ha.sh (ha_repeat_nonmpi_load client2 dbench)
 103 #               ~ pdsh client2 dbench
 104 #           ~ ha.sh (ha_repeat_nonmpi_load client2 iozone)
 105 #               ~ pdsh client2 iozone
 106 #           ~ ha.sh (ha_repeat_nonmpi_load client5 iozone)
 107 #               ~ pdsh client5 iozone
 108 #           ~ ... (one for each non-MPI load on each client)
 109 #
 110 #   Each tilde represents a process.  Indentations imply parent-children
 111 #   relation.
 112 #
 113 #   IPC is done by files in the temporary directory.
 114 #
 115
 116 #set -x
 117
 118 SIMUL=${SIMUL:-$(which simul 2> /dev/null || true)}
 119 IOR=${IOR:-$(which IOR 2> /dev/null || true)}
 120 MDTEST=${MDTEST:-$(which mdtest 2> /dev/null || true)}
 121
 122 ior_blockSize=${ior_blockSize:-6g}
 123 mpi_threads_per_client=${mpi_threads_per_client:-2}
 124
 125 iozone_SIZE=${iozone_SIZE:-262144} # 256m
 126
 127 mpirun=${MPIRUN:-$(which mpirun)}
 128 LFS=${LFS:-$(which lfs)}
 129
 130 ha_check_env()
 131 {
 132         for ((load = 0; load < ${#ha_mpi_load_tags[@]}; load++)); do
 133                 local tag=${ha_mpi_load_tags[$load]}
 134                 local bin=$(echo $tag | tr '[:lower:]' '[:upper:]')
 135                 if [ x${!bin} = x ]; then
 136                         ha_error ha_mpi_loads: ${ha_mpi_loads}, $bin is not set
 137                         exit 1
 138                 fi
 139         done
 140 }
 141
 142 ha_info()
 143 {
 144         echo "$0: $(date +%H:%M:%S' '%s):" "$@"
 145 }
 146
 147 ha_touch()
 148 {
 149         local date=$(date +%H:%M:%S' '%s)
 150
 151         [[ $1 =~ stop ]] &&
 152                 echo $date ${FUNCNAME[1]} $2 >> $ha_stop_file ||
 153                 true
 154         [[ $1 =~ fail ]] &&
 155                 echo $date ${FUNCNAME[1]} $2 >> $ha_fail_file ||
 156                 true
 157         [[ $1 =~ lfsck ]] &&
 158                 echo $date ${FUNCNAME[1]} $2 >> $ha_lfsck_stop ||
 159                 true
 160 }
 161
 162 ha_log()
 163 {
 164         local nodes=${1// /,}
 165         shift
 166         ha_on $nodes "lctl mark $*"
 167 }
 168
 169 ha_error()
 170 {
 171     ha_info "$@" >&2
 172 }
 173
 174 ha_trap_err()
 175 {
 176     local i
 177
 178     ha_error "Trap ERR triggered by:"
 179     ha_error "    $BASH_COMMAND"
 180     ha_error "Call trace:"
 181     for ((i = 0; i < ${#FUNCNAME[@]}; i++)); do
 182         ha_error "    ${FUNCNAME[$i]} [${BASH_SOURCE[$i]}:${BASH_LINENO[$i]}]"
 183     done
 184 }
 185
 186 trap ha_trap_err ERR
 187 set -eE
 188
 189 declare     ha_power_down_pids
 190 declare     ha_tmp_dir=/tmp/$(basename $0)-$$
 191 declare     ha_stop_file=$ha_tmp_dir/stop
 192 declare     ha_fail_file=$ha_tmp_dir/fail
 193 declare     ha_pm_states=$ha_tmp_dir/ha_pm_states
 194 declare     ha_status_file_prefix=$ha_tmp_dir/status
 195 declare -a  ha_status_files
 196 declare     ha_machine_file=$ha_tmp_dir/machine_file
 197 declare     ha_lfsck_log=$ha_tmp_dir/lfsck.log
 198 declare     ha_lfsck_lock=$ha_tmp_dir/lfsck.lock
 199 declare     ha_lfsck_stop=$ha_tmp_dir/lfsck.stop
 200 declare     ha_lfsck_bg=${LFSCK_BG:-false}
 201 declare     ha_lfsck_after=${LFSCK_AFTER:-false}
 202 declare     ha_lfsck_node=${LFSCK_NODE:-""}
 203 declare     ha_lfsck_device=${LFSCK_DEV:-""}
 204 declare     ha_lfsck_types=${LFSCK_TYPES:-"namespace layout"}
 205 declare     ha_lfsck_custom_params=${LFSCK_CUSTOM_PARAMS:-""}
 206 declare     ha_lfsck_wait=${LFSCK_WAIT:-1200}
 207 declare     ha_lfsck_fail_on_repaired=${LFSCK_FAIL_ON_REPAIRED:-false}
 208 declare     ha_power_down_cmd=${POWER_DOWN:-"pm -0"}
 209 declare     ha_power_up_cmd=${POWER_UP:-"pm -1"}
 210 declare     ha_power_delay=${POWER_DELAY:-60}
 211 declare     ha_node_up_delay=${NODE_UP_DELAY:-10}
 212 declare     ha_wait_nodes_up=${WAIT_NODES_UP:-600}
 213 declare     ha_pm_host=${PM_HOST:-$(hostname)}
 214 declare     ha_failback_delay=${DELAY:-5}
 215 declare     ha_failback_cmd=${FAILBACK:-""}
 216 declare     ha_stripe_params=${STRIPEPARAMS:-"-c 0"}
 217 declare     ha_test_dir_stripe_count=${TDSTRIPECOUNT:-"1"}
 218 declare     ha_test_dir_mdt_index=${TDMDTINDEX:-"0"}
 219 declare     ha_test_dir_mdt_index_random=${TDMDTINDEXRAND:-false}
 220 declare     ha_dir_stripe_count=${DSTRIPECOUNT:-"1"}
 221 declare     ha_dir_stripe_count_random=${DSTRIPECOUNTRAND:-false}
 222 declare     ha_mdt_index=${MDTINDEX:-"0"}
 223 declare     ha_mdt_index_random=${MDTINDEXRAND:-false}
 224 declare -a  ha_clients
 225 declare -a  ha_servers
 226 declare -a  ha_victims
 227 declare -a  ha_victims_pair
 228 declare     ha_test_dir=/mnt/lustre/$(basename $0)-$$
 229 declare -a  ha_testdirs=(${ha_test_dirs="$ha_test_dir"})
 230
 231 for ((i=0; i<${#ha_testdirs[@]}; i++)); do
 232         echo I=$i ${ha_testdirs[i]}
 233         ha_testdirs[i]="${ha_testdirs[i]}/$(basename $0)-$$"
 234         echo i=$i ${ha_testdirs[i]}
 235 done
 236
 237 declare     ha_cleanup=${CLEANUP:-true}
 238 declare     ha_start_time=$(date +%s)
 239 declare     ha_expected_duration=$((60 * 60 * 24))
 240 declare     ha_max_failover_period=10
 241 declare     ha_nr_loops=0
 242 declare     ha_stop_signals="SIGINT SIGTERM SIGHUP"
 243 declare     ha_load_timeout=${LOAD_TIMEOUT:-$((60 * 10))}
 244 declare     ha_workloads_only=false
 245 declare     ha_workloads_dry_run=false
 246 declare     ha_simultaneous=false
 247
 248 declare     ha_mpi_instances=${ha_mpi_instances:-1}
 249
 250 declare     ha_mpi_loads=${ha_mpi_loads="ior simul mdtest"}
 251 declare -a  ha_mpi_load_tags=($ha_mpi_loads)
 252 declare -a  ha_mpiusers=(${ha_mpi_users="mpiuser"})
 253 declare -a  ha_users
 254 declare -A  ha_mpiopts
 255
 256 for ((i=0; i<${#ha_mpiusers[@]}; i++)); do
 257         u=${ha_mpiusers[i]%%:*}
 258         o=""
 259         # user gets empty option if ha_mpi_users does not specify it explicitly
 260         [[ ${ha_mpiusers[i]} =~ : ]] && o=${ha_mpiusers[i]##*:}
 261         ha_users[i]=$u
 262         ha_mpiopts[$u]+=" $o"
 263 done
 264 ha_users=(${!ha_mpiopts[@]})
 265
 266 declare     ha_ior_params=${IORP:-'" -b $ior_blockSize -t 2m -w -W -T 1"'}
 267 declare     ha_simul_params=${SIMULP:-'" -n 10"'}
 268 declare     ha_mdtest_params=${MDTESTP:-'" -i 1 -n 1000"'}
 269 declare     ha_mpirun_options=${MPIRUN_OPTIONS:-""}
 270 declare     ha_clients_stripe=${CLIENTSSTRIPE:-'"$STRIPEPARAMS"'}
 271 declare     ha_nclientsset=${NCLIENTSSET:-1}
 272 declare     ha_ninstmustfail=${NINSTMUSTFAIL:-0}
 273
 274 declare     ha_racer_params=${RACERP:-"MDSCOUNT=1"}
 275
 276 eval ha_params_ior=($ha_ior_params)
 277 eval ha_params_simul=($ha_simul_params)
 278 eval ha_params_mdtest=($ha_mdtest_params)
 279 eval ha_stripe_clients=($ha_clients_stripe)
 280
 281 declare ha_nparams_ior=${#ha_params_ior[@]}
 282 declare ha_nparams_simul=${#ha_params_simul[@]}
 283 declare ha_nparams_mdtest=${#ha_params_mdtest[@]}
 284 declare ha_nstripe_clients=${#ha_stripe_clients[@]}
 285
 286 declare -A  ha_mpi_load_cmds=(
 287         [ior]="$IOR -o {}/f.ior {params}"
 288         [simul]="$SIMUL {params} -d {}"
 289         [mdtest]="$MDTEST {params} -d {}"
 290 )
 291
 292 declare racer=${RACER:-"$(dirname $0)/racer/racer.sh"}
 293
 294 declare     ha_nonmpi_loads=${ha_nonmpi_loads="dd tar iozone"}
 295 declare -a  ha_nonmpi_load_tags=($ha_nonmpi_loads)
 296 declare -A  ha_nonmpi_load_cmds=(
 297         [dd]="dd if=/dev/zero of={}/f.dd bs=1M count=256"
 298         [tar]="tar cf - /etc | tar xf - -C {}"
 299         [iozone]="iozone -a -e -+d -s $iozone_SIZE {}/f.iozone"
 300         [racer]="$ha_racer_params $racer {}"
 301 )
 302 declare     ha_check_attrs="find {} -type f -ls 2>&1 | grep -e '?'"
 303
 304 ha_usage()
 305 {
 306         ha_info "Usage: $0 -c HOST[,...] -s HOST[,...]" \
 307                 "-v HOST[,...] -f HOST[,...] [-d DIRECTORY] [-u SECONDS]"
 308 }
 309
 310 ha_process_arguments()
 311 {
 312     local opt
 313
 314         while getopts hc:s:v:d:p:u:wrmf: opt; do
 315         case $opt in
 316         h)
 317             ha_usage
 318             exit 0
 319             ;;
 320         c)
 321             ha_clients=(${OPTARG//,/ })
 322             ;;
 323         s)
 324             ha_servers=(${OPTARG//,/ })
 325             ;;
 326         v)
 327             ha_victims=(${OPTARG//,/ })
 328             ;;
 329         d)
 330             ha_test_dir=$OPTARG/$(basename $0)-$$
 331             ;;
 332         u)
 333             ha_expected_duration=$OPTARG
 334             ;;
 335         p)
 336                 ha_max_failover_period=$OPTARG
 337                 ;;
 338         w)
 339                 ha_workloads_only=true
 340                 ;;
 341         r)
 342                 ha_workloads_dry_run=true
 343                 ;;
 344         m)
 345                 ha_simultaneous=true
 346                 ;;
 347         f)
 348                 ha_victims_pair=(${OPTARG//,/ })
 349                 ;;
 350         \?)
 351             ha_usage
 352             exit 1
 353             ;;
 354         esac
 355     done
 356
 357         if [ -z "${ha_clients[*]}" ]; then
 358                 ha_error "-c is mandatory"
 359                 ha_usage
 360                 exit 1
 361         fi
 362         if ! ($ha_workloads_dry_run ||
 363                         $ha_workloads_only) &&
 364                         ([ -z "${ha_servers[*]}" ] ||
 365                         [ -z "${ha_victims[*]}" ]); then
 366                 ha_error "-s, and -v are all mandatory"
 367                 ha_usage
 368                 exit 1
 369         fi
 370 }
 371
 372 ha_on()
 373 {
 374         local nodes=$1
 375         local rc=0
 376
 377         shift
 378
 379         #
 380         # -S is to be used here to track the
 381         # remote command return values
 382         #
 383         pdsh -S -w $nodes "PATH=/usr/local/sbin:/usr/local/bin:/sbin:\
 384 /bin:/usr/sbin:/usr/bin; $@" ||
 385                 rc=$?
 386         return $rc
 387 }
 388
 389 ha_trap_exit()
 390 {
 391         ha_touch stop
 392         trap 0
 393         if [ -e "$ha_fail_file" ]; then
 394                 ha_info "Test directories ${ha_testdirs[@]} not removed"
 395                 ha_info "Temporary directory $ha_tmp_dir not removed"
 396         else
 397                 $ha_cleanup &&
 398                         ha_on ${ha_clients[0]} rm -rf ${ha_testdirs[@]} ||
 399                         ha_info "Test directories ${ha_testdirs[@]} not removed"
 400                 ha_info "Please find the results in the directory $ha_tmp_dir"
 401         fi
 402 }
 403
 404 ha_trap_stop_signals()
 405 {
 406         ha_info "${ha_stop_signals// /,} received"
 407         ha_touch stop "${ha_stop_signals// /,} received"
 408 }
 409
 410 ha_sleep()
 411 {
 412     local n=$1
 413
 414     ha_info "Sleeping for ${n}s"
 415     #
 416     # sleep(1) could interrupted.
 417     #
 418     sleep $n || true
 419 }
 420
 421 ha_wait_unlock()
 422 {
 423         local lock=$1
 424
 425         while [ -e $lock ]; do
 426                 sleep 1
 427         done
 428 }
 429
 430 ha_lock()
 431 {
 432     local lock=$1
 433
 434     until mkdir "$lock" >/dev/null 2>&1; do
 435         ha_sleep 1 >/dev/null
 436     done
 437 }
 438
 439 ha_unlock()
 440 {
 441     local lock=$1
 442
 443     rm -r "$lock"
 444 }
 445
 446 ha_dump_logs()
 447 {
 448         local nodes=${1// /,}
 449         local file=/tmp/$(basename $0)-$$-$(date +%s).dk
 450         local lock=$ha_tmp_dir/lock-dump-logs
 451         local rc=0
 452
 453         ha_lock "$lock"
 454         ha_info "Dumping lctl log to $file"
 455
 456         #
 457         # some nodes could crash, so
 458         # do not exit with error if not all logs are dumped
 459         #
 460         ha_on $nodes "lctl dk >>$file" || rc=$?
 461
 462         [ $rc -eq 0 ] ||
 463                 ha_error "not all logs are dumped! Some nodes are unreachable."
 464         ha_unlock "$lock"
 465 }
 466
 467 ha_repeat_mpi_load()
 468 {
 469         local client=$1
 470         local load=$2
 471         local status=$3
 472         local parameter=$4
 473         local machines=$5
 474         local stripeparams=$6
 475         local mpiuser=$7
 476         local mustpass=$8
 477         local mpirunoptions=$9
 478         local test_dir=${10}
 479         local tag=${ha_mpi_load_tags[$load]}
 480         local cmd=${ha_mpi_load_cmds[$tag]}
 481         local dir=$test_dir/$client-$tag
 482         local log=$ha_tmp_dir/$client-$tag
 483         local rc=0
 484         local rccheck=0
 485         local nr_loops=0
 486         local avg_loop_time=0
 487         local start_time=$(date +%s)
 488         local check_attrs=${ha_check_attrs//"{}"/$dir}
 489
 490         cmd=${cmd//"{}"/$dir}
 491         cmd=${cmd//"{params}"/$parameter}
 492
 493         [[ -n "$ha_postcmd" ]] && ha_postcmd=${ha_postcmd//"{}"/$dir}
 494         [[ -n "$ha_precmd" ]] && ha_precmd=${ha_precmd//"{}"/$dir}
 495         ha_info "Starting $tag"
 496
 497         machines="-machinefile $machines"
 498         while [ ! -e "$ha_stop_file" ] && ((rc == 0)) && ((rccheck == 0)); do
 499                 ha_info "$client Starts: $mpiuser: $cmd" 2>&1 |  tee -a $log
 500                 {
 501                 local mdt_index
 502                 if $ha_mdt_index_random && [ $ha_mdt_index -ne 0 ]; then
 503                         mdt_index=$(ha_rand $((ha_mdt_index + 1)) )
 504                 else
 505                         mdt_index=$ha_mdt_index
 506                 fi
 507                 local dir_stripe_count
 508                 if $ha_dir_stripe_count_random &&
 509                         [ $ha_dir_stripe_count -ne 1 ]; then
 510                         dir_stripe_count=$(($(ha_rand $ha_dir_stripe_count) + 1))
 511                 else
 512                         dir_stripe_count=$ha_dir_stripe_count
 513                 fi
 514                 [[ -n "$ha_precmd" ]] && ha_info "$ha_precmd" &&
 515                         ha_on $client "$ha_precmd" >>"$log" 2>&1
 516                 ha_info "$client Creates $dir with -i$mdt_index -c$dir_stripe_count "
 517                 ha_on $client $LFS mkdir -i$mdt_index -c$dir_stripe_count "$dir" &&
 518                 ha_on $client $LFS getdirstripe "$dir" &&
 519                 ha_on $client $LFS setstripe $stripeparams $dir &&
 520                 ha_on $client $LFS getstripe $dir &&
 521                 ha_on $client chmod a+xwr $dir &&
 522                 ha_on $client "su $mpiuser bash -c \" $mpirun $mpirunoptions \
 523                         -np $((${#ha_clients[@]} * mpi_threads_per_client / ha_nclientsset)) \
 524                         $machines $cmd \" " || rc=$?
 525                 ha_on ${ha_clients[0]} "$check_attrs &&                    \
 526                         $LFS df $dir &&                                    \
 527                         $check_attrs " && rccheck=1
 528                 [[ -n "$ha_postcmd" ]] && ha_info "$ha_postcmd" &&
 529                         ha_on $client "$ha_postcmd" >>"$log" 2>&1
 530                 (( ((rc == 0)) && ((rccheck == 0)) && (( mustpass != 0 )) )) ||
 531                 (( ((rc != 0)) && ((rccheck == 0)) && (( mustpass == 0 )) )) &&
 532                 ha_on $client rm -rf "$dir";
 533                 } >>"$log" 2>&1
 534
 535                 ha_info $client: rc=$rc rccheck=$rccheck mustpass=$mustpass
 536
 537                 # mustpass=0 means that failure is expected
 538                 if (( rccheck != 0 )); then
 539                         ha_touch stop,fail $client,$tag
 540                         ha_dump_logs "${ha_clients[*]} ${ha_servers[*]}"
 541                 elif (( rc !=0 )); then
 542                         if (( mustpass != 0 )); then
 543                                 ha_touch stop,fail $client,$tag
 544                                 ha_dump_logs "${ha_clients[*]} ${ha_servers[*]}"
 545                         else
 546                                 # Ok to fail
 547                                 rc=0
 548                         fi
 549                 elif (( mustpass == 0 )); then
 550                         ha_touch stop,fail $client,$tag
 551                         ha_dump_logs "${ha_clients[*]} ${ha_servers[*]}"
 552                 fi
 553                 echo rc=$rc rccheck=$rccheck mustpass=$mustpass >"$status"
 554
 555                 nr_loops=$((nr_loops + 1))
 556         done
 557
 558         [ $nr_loops -ne 0 ] &&
 559                 avg_loop_time=$((($(date +%s) - start_time) / nr_loops))
 560
 561         ha_info "$tag stopped: rc=$rc mustpass=$mustpass \
 562                 avg loop time $avg_loop_time"
 563 }
 564
 565 ha_start_mpi_loads()
 566 {
 567         local client
 568         local load
 569         local tag
 570         local status
 571         local n
 572         local nparam
 573         local machines
 574         local m
 575         local -a mach
 576         local mpiuser
 577         local nmpi
 578
 579         # ha_mpi_instances defines the number of
 580         # clients start mpi loads; should be <= ${#ha_clients[@]}
 581         # do nothing if
 582         #    ha_mpi_instances = 0
 583         # or
 584         #    ${#ha_mpi_load_tags[@]} =0
 585         local inst=$ha_mpi_instances
 586         (( inst == 0 )) || (( ${#ha_mpi_load_tags[@]} == 0 )) &&
 587                 ha_info "no mpi load to start" &&
 588                 return 0
 589
 590         (( inst <= ${#ha_clients[@]} )) || inst=${#ha_clients[@]}
 591
 592         # Define names for machinefiles for each client set
 593         for (( n=0; n < $ha_nclientsset; n++ )); do
 594                 mach[$n]=$ha_machine_file$n
 595         done
 596
 597         for ((n = 0; n < ${#ha_clients[@]}; n++)); do
 598                 m=$(( n % ha_nclientsset))
 599                 machines=${mach[m]}
 600                 ha_info machine_file=$machines
 601                 echo ${ha_clients[n]} >> $machines
 602         done
 603         local dirname=$(dirname $ha_machine_file)
 604         for client in ${ha_clients[@]}; do
 605                 ha_on $client mkdir -p $dirname
 606                 scp $ha_machine_file* $client:$dirname
 607         done
 608
 609         local ndir
 610         for ((n = 0; n < $inst; n++)); do
 611                 client=${ha_clients[n]}
 612                 nmpi=$((n % ${#ha_users[@]}))
 613                 mpiuser=${ha_users[nmpi]}
 614                 ndir=$((n % ${#ha_testdirs[@]}))
 615                 test_dir=${ha_testdirs[ndir]}
 616                 for ((load = 0; load < ${#ha_mpi_load_tags[@]}; load++)); do
 617                         tag=${ha_mpi_load_tags[$load]}
 618                         status=$ha_status_file_prefix-$tag-$client
 619                         # ha_nparams_ior
 620                         # ha_nparams_simul
 621                         local num=ha_nparams_$tag
 622                         nparam=$((n % num))
 623                         local aref=ha_params_$tag[nparam]
 624                         local parameter=${!aref}
 625                         local nstripe=$((n % ha_nstripe_clients))
 626                         aref=ha_stripe_clients[nstripe]
 627                         local stripe=${!aref}
 628                         local m=$(( n % ha_nclientsset))
 629                         machines=${mach[m]}
 630                         local mustpass=1
 631                         [[ $ha_ninstmustfail == 0 ]] ||
 632                                 mustpass=$(( n % ha_ninstmustfail ))
 633                         ha_repeat_mpi_load $client $load $status "$parameter" \
 634                                 $machines "$stripe" "$mpiuser" "$mustpass" \
 635                                 "${ha_mpiopts[$mpiuser]} $ha_mpirun_options" "$test_dir" &
 636                                 ha_status_files+=("$status")
 637                 done
 638         done
 639 }
 640
 641 ha_repeat_nonmpi_load()
 642 {
 643         local client=$1
 644         local load=$2
 645         local status=$3
 646         local tag=${ha_nonmpi_load_tags[$load]}
 647         local cmd=${ha_nonmpi_load_cmds[$tag]}
 648         local test_dir=$4
 649         local dir=$test_dir/$client-$tag
 650         local log=$ha_tmp_dir/$client-$tag
 651         local rc=0
 652
 653         local rccheck=0
 654         local nr_loops=0
 655         local avg_loop_time=0
 656         local start_time=$(date +%s)
 657         local check_attrs=${ha_check_attrs//"{}"/$dir}
 658
 659         cmd=${cmd//"{}"/$dir}
 660
 661         ha_info "Starting $tag on $client on $dir"
 662
 663         while [ ! -e "$ha_stop_file" ] && ((rc == 0)); do
 664                 ha_info "$client Starts: $cmd" 2>&1 |  tee -a $log
 665                 ha_on $client "mkdir -p $dir &&                              \
 666                         $cmd"              >>"$log" 2>&1 || rc=$?
 667
 668                 ha_on $client "$check_attrs &&                               \
 669                         $LFS df $dir &&                                      \
 670                         $check_attrs "          >>"$log"  2>&1 && rccheck=1 ||
 671                 ha_on $client "rm -rf $dir"      >>"$log"  2>&1
 672
 673                 ha_info rc=$rc rccheck=$rccheck
 674
 675                 if (( (rc + rccheck) != 0 )); then
 676                         ha_dump_logs "${ha_clients[*]} ${ha_servers[*]}"
 677                         ha_touch stop,fail $client,$tag
 678                 fi
 679                 echo $rc >"$status"
 680
 681                 nr_loops=$((nr_loops + 1))
 682         done
 683
 684         [ $nr_loops -ne 0 ] &&
 685                 avg_loop_time=$((($(date +%s) - start_time) / nr_loops))
 686
 687         ha_info "$tag on $client stopped: rc $rc avg loop time ${avg_loop_time}s"
 688 }
 689
 690 ha_start_nonmpi_loads()
 691 {
 692         local client
 693         local load
 694         local tag
 695         local status
 696         local n
 697         local test_dir
 698         local ndir
 699
 700         for (( n = 0; n < ${#ha_clients[@]}; n++)); do
 701                 client=${ha_clients[n]}
 702                 ndir=$((n % ${#ha_testdirs[@]}))
 703                 test_dir=${ha_testdirs[ndir]}
 704                 for ((load = 0; load < ${#ha_nonmpi_load_tags[@]}; load++)); do
 705                         tag=${ha_nonmpi_load_tags[$load]}
 706                         status=$ha_status_file_prefix-$tag-$client
 707                         ha_repeat_nonmpi_load $client $load $status $test_dir &
 708                         ha_status_files+=("$status")
 709                 done
 710         done
 711 }
 712
 713 declare ha_bgcmd=${ha_bgcmd:-""}
 714 declare ha_bgcmd_log=$ha_tmp_dir/bgcmdlog
 715
 716 ha_cmd_bg () {
 717         [[ -z "$ha_bgcmd" ]] && return 0
 718         for ((i=0; i<${#ha_testdirs[@]}; i++)); do
 719                 ha_bgcmd=${ha_bgcmd//"{}"/${ha_testdirs[i]}}
 720         done
 721
 722         ha_info "BG cmd: $ha_bgcmd"
 723         while [ true ]; do
 724                 [ -f $ha_stop_file ] &&
 725                         ha_info "$ha_stop_file found! $ha_bgcmd no started" &&
 726                         break
 727                 eval $ha_bgcmd 2>&1 | tee -a $ha_bgcmd_log
 728                 sleep 1
 729         done &
 730         CMD_BG_PID=$!
 731         ha_info CMD BG PID: $CMD_BG_PID
 732         ps aux | grep $CMD_BG_PID
 733 }
 734
 735 ha_lfsck_bg () {
 736         rm -f $ha_lfsck_log
 737         rm -f $ha_lfsck_stop
 738
 739         ha_info "LFSCK BG"
 740         while [ true ]; do
 741                 [ -f $ha_lfsck_stop ] && ha_info "LFSCK stopped" && break
 742                 [ -f $ha_stop_file ] &&
 743                         ha_info "$ha_stop_file found! LFSCK not started" &&
 744                         break
 745                 ha_start_lfsck 2>&1 | tee -a $ha_lfsck_log
 746                 sleep 1
 747         done &
 748         LFSCK_BG_PID=$!
 749         ha_info LFSCK BG PID: $LFSCK_BG_PID
 750 }
 751
 752 ha_wait_lfsck_completed () {
 753         local -a status
 754         local -a types=($ha_lfsck_types)
 755         local type
 756         local s
 757
 758         local nodes="${ha_servers[@]}"
 759         nodes=${nodes// /,}
 760
 761         # -A start LFSCK on all nodes
 762         # -t default all
 763         [ ${#types[@]} -eq 0 ] && types=(namespace layout)
 764         ha_info "Waiting LFSCK completed in $ha_lfsck_wait sec: types ${types[@]}"
 765         for type in ${types[@]}; do
 766                 eval var_$type=0
 767                 for (( i=0; i<=ha_lfsck_wait; i++)); do
 768                         status=($(ha_on $nodes lctl get_param -n *.*.lfsck_$type 2>/dev/null | \
 769                                 awk '/status/ { print $3 }'))
 770                         for (( s=0; s<${#status[@]}; s++ )); do
 771                                 # "partial" is expected after HARD failover
 772                                 [[ "${status[s]}" = "completed" ]] ||
 773                                 [[ "${status[s]}" = "partial" ]] ||  break
 774                         done
 775                         [[ $s -eq ${#status[@]} ]] && eval var_$type=1 && break
 776                         sleep 1
 777                 done
 778                 ha_info "LFSCK $type status in $i sec:"
 779                 ha_on $nodes lctl get_param -n *.*.lfsck_$type 2>/dev/null | grep status
 780
 781         done
 782
 783         for type in ${types[@]}; do
 784                 local var=var_$type
 785                 ha_on $nodes lctl get_param -n *.*.lfsck_$type 2>/dev/null
 786                 [[ ${!var} -eq 1 ]] ||
 787                         { ha_info "lfsck not completed in $ha_lfsck_wait sec";
 788                         return 1; }
 789         done
 790         return 0
 791 }
 792
 793 ha_start_lfsck()
 794 {
 795         local -a types=($ha_lfsck_types)
 796         local rc=0
 797
 798         # -A: start LFSCK on all nodes via the specified MDT device
 799         # (see "-M" option) by single LFSCK command
 800         local params=" -A -r $ha_lfsck_custom_params"
 801
 802         # use specified device if set
 803         [ -n "$ha_lfsck_device" ] && params="-M $ha_lfsck_device $params"
 804
 805         # -t: check type(s) to be performed (default all)
 806         # check only specified types if set
 807         if [ ${#types[@]} -ne 0 ]; then
 808                 local type="${types[@]}"
 809                 params="$params -t ${type// /,}"
 810         fi
 811
 812         ha_info "LFSCK start $params"
 813         ha_on $ha_lfsck_node "lctl lfsck_start $params" || rc=1
 814         if [ $rc -ne 0 ]; then
 815                 if [ -e $ha_lfsck_lock ]; then
 816                         rc=0
 817                         ha_wait_unlock $ha_lfsck_lock
 818                         ha_sleep 120
 819                         ha_on $ha_lfsck_node "lctl lfsck_start $params" || rc=1
 820                 fi
 821         fi
 822
 823         [ $rc -eq 0 ] ||
 824                 { ha_touch stop,fail,lfsck; return 1; }
 825
 826         ha_wait_lfsck_completed ||
 827                 { ha_touch stop,fail,lfsck; return 1; }
 828
 829         return 0
 830 }
 831
 832 ha_lfsck_repaired()
 833 {
 834         local n=0
 835
 836         n=$(cat $ha_lfsck_log | awk '/repaired/ {print $3}' |\
 837                 awk '{sum += $1} END { print sum }')
 838         [ $n -eq 0] ||
 839                 { ha_info "Total repaired: $n";
 840                 ha_touch fail; return 1; }
 841         return 0
 842 }
 843
 844 ha_start_loads()
 845 {
 846         ha_cmd_bg
 847         $ha_lfsck_bg && ha_lfsck_bg
 848         trap ha_trap_stop_signals $ha_stop_signals
 849         ha_start_nonmpi_loads
 850         ha_start_mpi_loads
 851 }
 852
 853 ha_stop_loads()
 854 {
 855         ha_touch stop
 856         [[ -n $CMD_BG_PID ]] && wait $CMD_BG_PID || true
 857         # true because of lfsck_bg could be stopped already
 858         $ha_lfsck_bg && wait $LFSCK_BG_PID || true
 859         trap - $ha_stop_signals
 860         ha_info "Waiting for workloads to stop"
 861         wait
 862 }
 863
 864 ha_wait_loads()
 865 {
 866     local file
 867     local end=$(($(date +%s) + ha_load_timeout))
 868
 869     ha_info "Waiting $ha_load_timeout sec for workload status..."
 870     rm -f "${ha_status_files[@]}"
 871
 872         #
 873         # return immediately if ha_stop_file exists,
 874         # all status_files not needed to be checked
 875         #
 876         for file in "${ha_status_files[@]}"; do
 877                 if [ -e "$ha_stop_file" ]; then
 878                         ha_info "$ha_stop_file found! Stop."
 879                         break
 880                 fi
 881                 #
 882                 # Wait status file created during ha_load_timeout.
 883                 # Existing file guarantees that some application
 884                 # is completed. If no status file was created
 885                 # this function guarantees that we allow
 886                 # applications to continue after/before
 887                 # failover/failback during ha_load_timeout time.
 888                 #
 889                 until [ -e "$file" ] || (($(date +%s) >= end)); do
 890                         #
 891                         # check ha_stop_file again, it could appear
 892                         # during ha_load_timeout
 893                         #
 894                         if [ -e "$ha_stop_file" ]; then
 895                                 ha_info "$ha_stop_file found! Stop."
 896                                 break
 897                         fi
 898                         ha_sleep 1 >/dev/null
 899                 done
 900         done
 901 }
 902
 903 ha_powermanage()
 904 {
 905         local nodes=$1
 906         local expected_state=$2
 907         local state
 908         local -a states
 909         local i
 910         local rc=0
 911
 912         # store pm -x -q $nodes results in a file to have
 913         # more information about nodes statuses
 914         ha_on $ha_pm_host pm -x -q $nodes | awk '{print $2 $3}' > $ha_pm_states
 915         rc=${PIPESTATUS[0]}
 916         echo pmrc=$rc
 917
 918         while IFS=": " read node state; do
 919                 [[ "$state" = "$expected_state" ]] && {
 920                         nodes=${nodes/$node/}
 921                         nodes=${nodes//,,/,}
 922                         nodes=${nodes/#,}
 923                         nodes=${nodes/%,}
 924                 }
 925         done < $ha_pm_states
 926
 927         if [ -n "$nodes" ]; then
 928                 cat $ha_pm_states
 929                 return 1
 930         fi
 931         return 0
 932 }
 933
 934 ha_power_down_cmd_fn()
 935 {
 936         local nodes=$1
 937         local cmd
 938         local pid
 939         local rc=0
 940
 941         case $ha_power_down_cmd in
 942         # format is: POWER_DOWN=sysrqcrash
 943         sysrqcrash)
 944                 cmd="pdsh -S -w $nodes -u 120 \"echo c > /proc/sysrq-trigger\" &"
 945                 eval $cmd
 946                 pid=$!
 947                 ha_power_down_pids=$(echo $ha_power_down_pids $pid)
 948                 ha_info "ha_power_down_pids: $ha_power_down_pids"
 949                 [[ -z "$ha_power_down_pids" ]] ||
 950                         ps aux | grep " ${ha_power_down_pids// / \| } " ||
 951                         true
 952                 ;;
 953         *)
 954                 cmd="$ha_power_down_cmd $nodes"
 955                 eval $cmd
 956                 rc=$?
 957                 ;;
 958         esac
 959
 960         return $rc
 961 }
 962
 963 ha_power_down()
 964 {
 965         local nodes=$1
 966         local rc=1
 967         local i
 968         local state
 969
 970         case $ha_power_down_cmd in
 971                 *pm*) state=off ;;
 972                 sysrqcrash) state=off ;;
 973                 *) state=on;;
 974         esac
 975
 976         if $ha_lfsck_bg && [[ ${nodes//,/ /} =~ $ha_lfsck_node ]]; then
 977                 ha_info "$ha_lfsck_node down, delay start LFSCK"
 978                 ha_lock $ha_lfsck_lock
 979         fi
 980
 981         ha_info "Powering down $nodes : cmd: $ha_power_down_cmd"
 982         ha_power_down_pids=""
 983         for (( i=0; i<10; i++ )) {
 984                 ha_info "attempt: $i"
 985                 ha_power_down_cmd_fn $nodes || rc=1
 986                 ha_sleep $ha_power_delay
 987                 ha_powermanage $nodes $state && rc=0 && break
 988         }
 989         if [[ -n "$ha_power_down_pids" ]]; then
 990                 kill -9 $ha_power_down_pids ||  true
 991                 wait $ha_power_down_pids || true
 992         fi
 993
 994         [ $rc -eq 0 ] || {
 995                 ha_info "Failed Powering down in $i attempts:" \
 996                         "$ha_power_down_cmd"
 997                 cat $ha_pm_states
 998                 exit 1
 999         }
1000 }
1001
1002 ha_get_pair()
1003 {
1004         local node=$1
1005         local i
1006
1007         for ((i=0; i<${#ha_victims[@]}; i++)) {
1008                 [[ ${ha_victims[i]} == $node ]] && echo ${ha_victims_pair[i]} &&
1009                         return
1010         }
1011         [[ $i -ne ${#ha_victims[@]} ]] ||
1012                 ha_error "No pair found!"
1013 }
1014
1015 ha_power_up_delay()
1016 {
1017         local nodes=$1
1018         local end=$(($(date +%s) + ha_node_up_delay))
1019         local rc
1020
1021         if [[ ${#ha_victims_pair[@]} -eq 0 ]]; then
1022                 ha_sleep $ha_node_up_delay
1023                 return 0
1024         fi
1025
1026         # Check CRM status on failover pair
1027         while (($(date +%s) <= end)); do
1028                 rc=0
1029                 for n in ${nodes//,/ }; do
1030                         local pair=$(ha_get_pair $n)
1031                         local status=$(ha_on $pair crm_mon -1rQ | \
1032                                 grep -w $n | head -1)
1033
1034                         ha_info "$n pair: $pair status: $status"
1035                         [[ "$status" == *OFFLINE* ]] ||
1036                                 rc=$((rc + $?))
1037                         ha_info "rc: $rc"
1038                 done
1039
1040                 if [[ $rc -eq 0 ]];  then
1041                         ha_info "CRM: Got all victims status OFFLINE"
1042                         return 0
1043                 fi
1044                 sleep 60
1045         done
1046
1047         ha_info "$nodes CRM status not OFFLINE"
1048         for n in ${nodes//,/ }; do
1049                 local pair=$(ha_get_pair $n)
1050
1051                 ha_info "CRM --- $n"
1052                 ha_on $pair crm_mon -1rQ
1053         done
1054         ha_error "CRM: some of $nodes are not OFFLINE in $ha_node_up_delay sec"
1055         exit 1
1056 }
1057
1058 ha_power_up()
1059 {
1060         local nodes=$1
1061         local rc=1
1062         local i
1063
1064         ha_power_up_delay $nodes
1065         ha_info "Powering up $nodes : cmd: $ha_power_up_cmd"
1066         for (( i=0; i<10; i++ )) {
1067                 ha_info "attempt: $i"
1068                 $ha_power_up_cmd $nodes &&
1069                         ha_powermanage $nodes on && rc=0 && break
1070                 sleep $ha_power_delay
1071         }
1072
1073         [ $rc -eq 0 ] || {
1074                 ha_info "Failed Powering up in $i attempts: $ha_power_up_cmd"
1075                 cat $ha_pm_states
1076                 exit 1
1077         }
1078 }
1079
1080 #
1081 # rand MAX
1082 #
1083 # Print a random integer within [0, MAX).
1084 #
1085 ha_rand()
1086 {
1087     local max=$1
1088
1089     #
1090     # See "5.2 Bash Variables" from "info bash".
1091     #
1092     echo -n $((RANDOM * max / 32768))
1093 }
1094
1095 ha_aim()
1096 {
1097         local i
1098         local nodes
1099
1100         if $ha_simultaneous ; then
1101                 nodes=$(echo ${ha_victims[@]})
1102                 nodes=${nodes// /,}
1103         else
1104                 i=$(ha_rand ${#ha_victims[@]})
1105                 nodes=${ha_victims[$i]}
1106         fi
1107
1108         echo -n $nodes
1109 }
1110
1111 ha_wait_nodes()
1112 {
1113         local nodes=$1
1114         local end=$(($(date +%s) + $ha_wait_nodes_up))
1115
1116         ha_info "Waiting for $nodes to boot up in $ha_wait_nodes_up"
1117         until ha_on $nodes hostname >/dev/null 2>&1 ||
1118                 [ -e "$ha_stop_file" ] ||
1119                         (($(date +%s) >= end)); do
1120                 ha_sleep 1 >/dev/null
1121         done
1122
1123         ha_info "Check where we are ..."
1124         [ -e "$ha_stop_file" ] &&
1125                 ha_info "$ha_stop_file found!"
1126
1127         local -a nodes_up
1128         nodes_up=($(ha_on $nodes hostname | awk '{ print $2 }'))
1129         ha_info "Nodes $nodes are up: ${nodes_up[@]}"
1130         local -a n=(${nodes//,/ })
1131         if [[ ${#nodes_up[@]} -ne ${#n[@]} ]]; then
1132                 ha_info "Failed boot up $nodes in $ha_wait_nodes_up sec!"
1133                 ha_touch fail,stop
1134                 return 1
1135         fi
1136         return 0
1137 }
1138
1139 ha_failback()
1140 {
1141         local nodes=$1
1142         ha_info "Failback resources on $nodes in $ha_failback_delay sec"
1143
1144         ha_sleep $ha_failback_delay
1145         [ "$ha_failback_cmd" ] ||
1146         {
1147                 ha_info "No failback command set, skiping"
1148                 return 0
1149         }
1150
1151         $ha_failback_cmd $nodes
1152         [ -e $ha_lfsck_lock ] && ha_unlock $ha_lfsck_lock || true
1153 }
1154
1155 ha_summarize()
1156 {
1157     ha_info "---------------8<---------------"
1158     ha_info "Summary:"
1159     ha_info "    Duration: $(($(date +%s) - $ha_start_time))s"
1160     ha_info "    Loops: $ha_nr_loops"
1161 }
1162
1163 ha_killer()
1164 {
1165         local nodes
1166
1167         while (($(date +%s) < ha_start_time + ha_expected_duration)) &&
1168                         [ ! -e "$ha_stop_file" ]; do
1169                 ha_info "---------------8<---------------"
1170
1171                 $ha_workloads_only || nodes=$(ha_aim)
1172
1173                 ha_info "Failing $nodes"
1174                 $ha_workloads_only && ha_info "    is skipped: workload only..."
1175
1176                 ha_sleep $(ha_rand $ha_max_failover_period)
1177                 $ha_workloads_only || ha_power_down $nodes
1178                 ha_sleep 10
1179                 ha_wait_loads || return
1180
1181                 if [ -e $ha_stop_file ]; then
1182                         $ha_workloads_only || ha_power_up $nodes
1183                         break
1184                 fi
1185
1186                 ha_info "Bringing $nodes back"
1187                 ha_sleep $(ha_rand 10)
1188                 $ha_workloads_only ||
1189                 {
1190                         ha_power_up $nodes
1191                         ha_wait_nodes $nodes
1192                         ha_failback $nodes
1193                 }
1194
1195                 #
1196                 # Wait for the failback to start.
1197                 #
1198                 ha_sleep 60
1199                 ha_wait_loads || return
1200
1201                 ha_sleep $(ha_rand 20)
1202
1203                 ha_nr_loops=$((ha_nr_loops + 1))
1204                 ha_info "Loop $ha_nr_loops done"
1205         done
1206         ha_summarize
1207 }
1208
1209 ha_main()
1210 {
1211         ha_process_arguments "$@"
1212         ha_check_env
1213
1214         ha_log "${ha_clients[*]} ${ha_servers[*]}" \
1215                 "START: $0: $(date +%H:%M:%S' '%s)"
1216         trap ha_trap_exit EXIT
1217         mkdir "$ha_tmp_dir"
1218
1219         local mdt_index
1220         if $ha_test_dir_mdt_index_random &&
1221                 [ $ha_test_dir_mdt_index -ne 0 ]; then
1222                 mdt_index=$(ha_rand $((ha_test_dir_mdt_index + 1)) )
1223         else
1224                 mdt_index=$ha_test_dir_mdt_index
1225         fi
1226
1227         local dir
1228         test_dir=${ha_testdirs[0]}
1229         ha_on ${ha_clients[0]} "$LFS mkdir -i$mdt_index \
1230                 -c$ha_test_dir_stripe_count $test_dir"
1231         for ((i=0; i<${#ha_testdirs[@]}; i++)); do
1232                 test_dir=${ha_testdirs[i]}
1233                 ha_on ${ha_clients[0]} $LFS getdirstripe $test_dir
1234                 ha_on ${ha_clients[0]} " \
1235                         $LFS setstripe $ha_stripe_params $test_dir"
1236         done
1237
1238         ha_start_loads
1239         ha_wait_loads
1240
1241         if $ha_workloads_dry_run; then
1242                 ha_sleep 5
1243         else
1244                 ha_killer
1245                 ha_dump_logs "${ha_clients[*]} ${ha_servers[*]}"
1246         fi
1247
1248         ha_stop_loads
1249
1250         $ha_lfsck_after && ha_start_lfsck | tee -a $ha_lfsck_log
1251
1252         $ha_lfsck_fail_on_repaired && ha_lfsck_repaired
1253
1254         if [ -e "$ha_fail_file" ]; then
1255                 exit 1
1256         else
1257                 ha_log "${ha_clients[*]} ${ha_servers[*]}" \
1258                         "END: $0: $(date +%H:%M:%S' '%s)"
1259                 exit 0
1260         fi
1261 }
1262
1263 ha_main "$@"