lustre/tests/parallel-scale.sh

   1 #!/bin/bash
   2 #
   3 #set -vx
   4
   5 LUSTRE=${LUSTRE:-$(cd $(dirname $0)/..; echo $PWD)}
   6 . $LUSTRE/tests/test-framework.sh
   7 init_test_env $@
   8 . ${CONFIG:=$LUSTRE/tests/cfg/$NAME.sh}
   9
  10 #              bug 20670
  11 ALWAYS_EXCEPT="parallel_grouplock  $PARALLEL_SCALE_EXCEPT"
  12
  13 #
  14 # compilbench
  15 #
  16 cbench_DIR=${cbench_DIR:-""}
  17 cbench_IDIRS=${cbench_IDIRS:-4}
  18 cbench_RUNS=${cbench_RUNS:-4}   # FIXME: wiki page requirements is 30, do we really need 30 ?
  19
  20 if [ "$SLOW" = "no" ]; then
  21     cbench_IDIRS=2
  22     cbench_RUNS=2
  23 fi
  24
  25 #
  26 # metabench
  27 #
  28 METABENCH=${METABENCH:-$(which metabench 2> /dev/null || true)}
  29 mbench_NFILES=${mbench_NFILES:-30400}
  30 [ "$SLOW" = "no" ] && mbench_NFILES=10000
  31 MACHINEFILE=${MACHINEFILE:-$TMP/$(basename $0 .sh).machines}
  32 # threads per client
  33 mbench_THREADS=${mbench_THREADS:-4}
  34
  35 #
  36 # simul
  37 #
  38 SIMUL=${SIMUL:=$(which simul 2> /dev/null || true)}
  39 # threads per client
  40 simul_THREADS=${simul_THREADS:-2}
  41 simul_REP=${simul_REP:-20}
  42 [ "$SLOW" = "no" ] && simul_REP=2
  43
  44 #
  45 # connectathon
  46 #
  47 cnt_DIR=${cnt_DIR:-""}
  48 cnt_NRUN=${cnt_NRUN:-10}
  49 [ "$SLOW" = "no" ] && cnt_NRUN=2
  50
  51 #
  52 # cascading rw
  53 #
  54 CASC_RW=${CASC_RW:-$(which cascading_rw 2> /dev/null || true)}
  55 # threads per client
  56 casc_THREADS=${casc_THREADS:-2}
  57 casc_REP=${casc_REP:-300}
  58 [ "$SLOW" = "no" ] && casc_REP=10
  59
  60 #
  61 # IOR
  62 #
  63 IOR=${IOR:-$(which IOR 2> /dev/null || true)}
  64 # threads per client
  65 ior_THREADS=${ior_THREADS:-2}
  66 ior_blockSize=${ior_blockSize:-6}       # Gb
  67 ior_DURATION=${ior_DURATION:-30}        # minutes
  68 [ "$SLOW" = "no" ] && ior_DURATION=5
  69
  70 #
  71 # write_append_truncate
  72 #
  73 # threads per client
  74 write_THREADS=${write_THREADS:-8}
  75 write_REP=${write_REP:-10000}
  76 [ "$SLOW" = "no" ] && write_REP=100
  77
  78 #
  79 # write_disjoint
  80 #
  81 WRITE_DISJOINT=${WRITE_DISJOINT:-$(which write_disjoint 2> /dev/null || true)}
  82 # threads per client
  83 wdisjoint_THREADS=${wdisjoint_THREADS:-4}
  84 wdisjoint_REP=${wdisjoint_REP:-10000}
  85 [ "$SLOW" = "no" ] && wdisjoint_REP=100
  86
  87 #
  88 # parallel_grouplock
  89 #
  90 #
  91 PARALLEL_GROUPLOCK=${PARALLEL_GROUPLOCK:-$(which parallel_grouplock 2> /dev/null || true)}
  92 parallel_grouplock_MINTASKS=${parallel_grouplock_MINTASKS:-5}
  93
  94 build_test_filter
  95 check_and_setup_lustre
  96
  97 get_mpiuser_id $MPI_USER
  98 MPI_RUNAS=${MPI_RUNAS:-"runas -u $MPI_USER_UID -g $MPI_USER_GID"}
  99 $GSS_KRB5 && refresh_krb5_tgt $MPI_USER_UID $MPI_USER_GID $MPI_RUNAS
 100
 101 print_opts () {
 102     local var
 103
 104     echo OPTIONS:
 105
 106     for i in $@; do
 107         var=$i
 108         echo "${var}=${!var}"
 109     done
 110     [ -e $MACHINEFILE ] && cat $MACHINEFILE
 111 }
 112
 113 # Takes:
 114 # 5 min * cbench_RUNS
 115 #        SLOW=no     10 mins
 116 #        SLOW=yes    50 mins
 117 # Space estimation:
 118 #        compile dir kernel-1 680MB
 119 #        required space       680MB * cbench_IDIRS = ~7 Gb
 120
 121 test_compilebench() {
 122     print_opts cbench_DIR cbench_IDIRS cbench_RUNS
 123
 124     [ x$cbench_DIR = x ] &&
 125         { skip_env "compilebench not found" && return; }
 126
 127     [ -e $cbench_DIR/compilebench ] || \
 128         { skip_env "No compilebench build" && return; }
 129
 130     local space=$(df -P $DIR | tail -n 1 | awk '{ print $4 }')
 131     if [ $space -le $((680 * 1024 * cbench_IDIRS)) ]; then
 132         cbench_IDIRS=$(( space / 680 / 1024))
 133         [ $cbench_IDIRS = 0 ] && \
 134             skip_env "Need free space atleast 680 Mb, have $space" && return
 135
 136         log free space=$space, reducing initial dirs to $cbench_IDIRS
 137     fi
 138     # FIXME:
 139     # t-f _base needs to be modifyed to set properly tdir
 140     # for new "test_foo" functions names
 141     # local testdir=$DIR/$tdir
 142     local testdir=$DIR/d0.compilebench
 143     mkdir -p $testdir
 144
 145     local savePWD=$PWD
 146     cd $cbench_DIR
 147     local cmd="./compilebench -D $testdir -i $cbench_IDIRS -r $cbench_RUNS --makej"
 148
 149     log "$cmd"
 150
 151     local rc=0
 152     eval $cmd
 153     rc=$?
 154
 155     cd $savePWD
 156     [ $rc = 0 ] || error "compilebench failed: $rc"
 157     rm -rf $testdir
 158 }
 159 run_test compilebench "compilebench"
 160
 161 test_metabench() {
 162     [ x$METABENCH = x ] &&
 163         { skip_env "metabench not found" && return; }
 164
 165     local clients=$CLIENTS
 166     [ -z $clients ] && clients=$(hostname)
 167
 168     num_clients=$(get_node_count ${clients//,/ })
 169
 170     # FIXME
 171     # Need space estimation here.
 172
 173     generate_machine_file $clients $MACHINEFILE || \
 174         error "can not generate machinefile $MACHINEFILE"
 175
 176     print_opts METABENCH clients mbench_NFILES mbench_THREADS
 177
 178     local testdir=$DIR/d0.metabench
 179     mkdir -p $testdir
 180     # mpi_run uses mpiuser
 181     chmod 0777 $testdir
 182
 183     # -C             Run the file creation tests.
 184     # -S             Run the file stat tests.
 185     # -c nfile       Number of files to be used in each test.
 186     # -k             Cleanup.  Remove the test directories.
 187     local cmd="$METABENCH -w $testdir -c $mbench_NFILES -C -S -k"
 188     echo "+ $cmd"
 189     mpi_run -np $((num_clients * $mbench_THREADS)) -machinefile ${MACHINEFILE} $cmd
 190     local rc=$?
 191     if [ $rc != 0 ] ; then
 192         error "metabench failed! $rc"
 193     fi
 194     rm -rf $testdir
 195 }
 196 run_test metabench "metabench"
 197
 198 test_simul() {
 199     [ x$SIMUL = x ] &&
 200         { skip_env "simul not found" && return; }
 201
 202     local clients=$CLIENTS
 203     [ -z $clients ] && clients=$(hostname)
 204
 205     local num_clients=$(get_node_count ${clients//,/ })
 206
 207     # FIXME
 208     # Need space estimation here.
 209
 210     generate_machine_file $clients $MACHINEFILE || \
 211         error "can not generate machinefile $MACHINEFILE"
 212
 213     print_opts SIMUL clients simul_REP simul_THREADS
 214
 215     local testdir=$DIR/d0.simul
 216     mkdir -p $testdir
 217     # mpi_run uses mpiuser
 218     chmod 0777 $testdir
 219
 220     # -n # : repeat each test # times
 221     # -N # : repeat the entire set of tests # times
 222
 223     local cmd="$SIMUL -d $testdir -n $simul_REP -N $simul_REP"
 224
 225     echo "+ $cmd"
 226     mpi_run -np $((num_clients * $simul_THREADS)) -machinefile ${MACHINEFILE} $cmd
 227
 228     local rc=$?
 229     if [ $rc != 0 ] ; then
 230         error "simul failed! $rc"
 231     fi
 232     rm -rf $testdir
 233 }
 234 run_test simul "simul"
 235
 236 test_connectathon() {
 237     print_opts cnt_DIR cnt_NRUN
 238
 239     [ x$cnt_DIR = x ] &&
 240         { skip_env "connectathon dir not found" && return; }
 241
 242     [ -e $cnt_DIR/runtests ] || \
 243         { skip_env "No connectathon runtests found" && return; }
 244
 245     local testdir=$DIR/d0.connectathon
 246     mkdir -p $testdir
 247
 248     local savePWD=$PWD
 249     cd $cnt_DIR
 250
 251     # -f      a quick functionality test
 252     # -a      run basic, general, special, and lock tests
 253     # -N numpasses - will be passed to the runtests script.  This argument
 254     #         is optional.  It specifies the number of times to run
 255     #         through the tests.
 256
 257     local cmd="./runtests -N $cnt_NRUN -a -f $testdir"
 258
 259     log "$cmd"
 260
 261     local rc=0
 262     eval $cmd
 263     rc=$?
 264
 265     cd $savePWD
 266     [ $rc = 0 ] || error "connectathon failed: $rc"
 267     rm -rf $testdir
 268 }
 269 run_test connectathon "connectathon"
 270
 271 test_ior() {
 272     [ x$IOR = x ] &&
 273         { skip_env "IOR not found" && return; }
 274
 275     local clients=$CLIENTS
 276     [ -z $clients ] && clients=$(hostname)
 277
 278     local num_clients=$(get_node_count ${clients//,/ })
 279
 280     local space=$(df -P $DIR | tail -n 1 | awk '{ print $4 }')
 281     echo "+ $ior_blockSize * 1024 * 1024 * $num_clients * $ior_THREADS "
 282     if [ $((space / 2)) -le $(( ior_blockSize * 1024 * 1024 * num_clients * ior_THREADS)) ]; then
 283         echo "+ $space * 9/10 / 1024 / 1024 / $num_clients / $ior_THREADS"
 284         ior_blockSize=$(( space /2 /1024 /1024 / num_clients / ior_THREADS ))
 285         [ $ior_blockSize = 0 ] && \
 286             skip_env "Need free space more than ($num_clients * $ior_THREADS )Gb: $((num_clients*ior_THREADS *1024 *1024*2)), have $space" && return
 287
 288         echo "free space=$space, Need: $num_clients x $ior_THREADS x $ior_blockSize Gb (blockSize reduced to $ior_blockSize Gb)"
 289     fi
 290
 291     generate_machine_file $clients $MACHINEFILE || \
 292         error "can not generate machinefile $MACHINEFILE"
 293
 294     print_opts IOR ior_THREADS ior_DURATION MACHINEFILE
 295
 296     local testdir=$DIR/d0.ior
 297     mkdir -p $testdir
 298     # mpi_run uses mpiuser
 299     chmod 0777 $testdir
 300
 301     #
 302     # -b N  blockSize -- contiguous bytes to write per task  (e.g.: 8, 4k, 2m, 1g)"
 303     # -o S  testFileName
 304     # -t N  transferSize -- size of transfer in bytes (e.g.: 8, 4k, 2m, 1g)"
 305     # -w    writeFile -- write file"
 306     # -r    readFile -- read existing file"
 307     # -T    maxTimeDuration -- max time in minutes to run tests"
 308     # -k    keepFile -- keep testFile(s) on program exit
 309     local cmd="$IOR -a POSIX -b ${ior_blockSize}g -o $testdir/iorData -t 2m -v -w -r -T $ior_DURATION -k"
 310
 311     echo "+ $cmd"
 312     mpi_run -np $((num_clients * $ior_THREADS)) -machinefile ${MACHINEFILE} $cmd
 313
 314     local rc=$?
 315     if [ $rc != 0 ] ; then
 316         error "ior failed! $rc"
 317     fi
 318     rm -rf $testdir
 319 }
 320 run_test ior "ior"
 321
 322 test_cascading_rw() {
 323     [ x$CASC_RW = x ] &&
 324         { skip_env "cascading_rw not found" && return; }
 325
 326     local clients=$CLIENTS
 327     [ -z $clients ] && clients=$(hostname)
 328
 329     num_clients=$(get_node_count ${clients//,/ })
 330
 331     # FIXME
 332     # Need space estimation here.
 333
 334     generate_machine_file $clients $MACHINEFILE || \
 335         error "can not generate machinefile $MACHINEFILE"
 336
 337     print_opts CASC_RW clients casc_THREADS casc_REP MACHINEFILE
 338
 339     local testdir=$DIR/d0.cascading_rw
 340     mkdir -p $testdir
 341     # mpi_run uses mpiuser
 342     chmod 0777 $testdir
 343
 344     # -g: debug mode
 345     # -n: repeat test # times
 346
 347     local cmd="$CASC_RW -g -d $testdir -n $casc_REP"
 348
 349     echo "+ $cmd"
 350     mpi_run -np $((num_clients * $casc_THREADS)) -machinefile ${MACHINEFILE} $cmd
 351
 352     local rc=$?
 353     if [ $rc != 0 ] ; then
 354         error "cascading_rw failed! $rc"
 355     fi
 356     rm -rf $testdir
 357 }
 358 run_test cascading_rw "cascading_rw"
 359
 360 test_write_append_truncate() {
 361     # location is lustre/tests dir
 362     if ! which write_append_truncate > /dev/null 2>&1 ; then
 363         skip_env "write_append_truncate not found"
 364         return
 365     fi
 366
 367     local clients=$CLIENTS
 368     [ -z $clients ] && clients=$(hostname)
 369
 370     local num_clients=$(get_node_count ${clients//,/ })
 371
 372     # FIXME
 373     # Need space estimation here.
 374
 375     generate_machine_file $clients $MACHINEFILE || \
 376         error "can not generate machinefile $MACHINEFILE"
 377
 378     local testdir=$DIR/d0.write_append_truncate
 379     local file=$testdir/f0.wat
 380
 381     print_opts clients write_REP write_THREADS MACHINEFILE
 382
 383     mkdir -p $testdir
 384     # mpi_run uses mpiuser
 385     chmod 0777 $testdir
 386
 387     local cmd="write_append_truncate -n $write_REP $file"
 388
 389     echo "+ $cmd"
 390     mpi_run -np $((num_clients * $write_THREADS)) -machinefile ${MACHINEFILE} $cmd
 391
 392     local rc=$?
 393     if [ $rc != 0 ] ; then
 394         error "write_append_truncate failed! $rc"
 395         return $rc
 396     fi
 397     rm -rf $testdir
 398 }
 399 run_test write_append_truncate "write_append_truncate"
 400
 401 test_write_disjoint() {
 402     [ x$WRITE_DISJOINT = x ] &&
 403         { skip_env "write_disjoint not found" && return; }
 404
 405     local clients=$CLIENTS
 406     [ -z $clients ] && clients=$(hostname)
 407
 408     local num_clients=$(get_node_count ${clients//,/ })
 409
 410     # FIXME
 411     # Need space estimation here.
 412
 413     generate_machine_file $clients $MACHINEFILE || \
 414         error "can not generate machinefile $MACHINEFILE"
 415
 416     print_opts WRITE_DISJOINT clients wdisjoint_THREADS wdisjoint_REP MACHINEFILE
 417     local testdir=$DIR/d0.write_disjoint
 418     mkdir -p $testdir
 419     # mpi_run uses mpiuser
 420     chmod 0777 $testdir
 421
 422     local cmd="$WRITE_DISJOINT -f $testdir/file -n $wdisjoint_REP"
 423
 424     echo "+ $cmd"
 425     mpi_run -np $((num_clients * $wdisjoint_THREADS)) -machinefile ${MACHINEFILE} $cmd
 426
 427     local rc=$?
 428     if [ $rc != 0 ] ; then
 429         error "write_disjoint failed! $rc"
 430     fi
 431     rm -rf $testdir
 432 }
 433 run_test write_disjoint "write_disjoint"
 434
 435 test_parallel_grouplock() {
 436     [ x$PARALLEL_GROUPLOCK = x ] &&
 437         { skip "PARALLEL_GROUPLOCK not found" && return; }
 438
 439     local clients=$CLIENTS
 440     [ -z $clients ] && clients=$(hostname)
 441
 442     local num_clients=$(get_node_count ${clients//,/ })
 443
 444     generate_machine_file $clients $MACHINEFILE || \
 445         error "can not generate machinefile $MACHINEFILE"
 446
 447     print_opts clients parallel_grouplock_MINTASKS MACHINEFILE
 448
 449     local testdir=$DIR/d0.parallel_grouplock
 450     mkdir -p $testdir
 451     # mpi_run uses mpiuser
 452     chmod 0777 $testdir
 453
 454     do_nodes $clients "lctl set_param llite.*.max_rw_chunk=0" ||
 455         error "set_param max_rw_chunk=0 failed "
 456
 457     local cmd
 458     local status=0
 459     local subtest
 460     for i in $(seq 12); do
 461         subtest="-t $i"
 462         local cmd="$PARALLEL_GROUPLOCK -g -v -d $testdir $subtest"
 463         echo "+ $cmd"
 464
 465         mpi_run -np $parallel_grouplock_MINTASKS -machinefile ${MACHINEFILE} $cmd
 466         local rc=$?
 467         if [ $rc != 0 ] ; then
 468             error_noexit "parallel_grouplock subtests $subtest failed! $rc"
 469         else
 470             echo "parallel_grouplock subtests $subtest PASS"
 471         fi
 472         let status=$((status + rc))
 473         # clear debug to collect one log per one test
 474         do_nodes $(comma_list $(nodes_list)) lctl clear
 475      done
 476     [ $status -eq 0 ] || error "parallel_grouplock status: $status"
 477     rm -rf $testdir
 478 }
 479 run_test parallel_grouplock "parallel_grouplock"
 480
 481 equals_msg `basename $0`: test complete, cleaning up
 482 check_and_cleanup_lustre
 483 [ -f "$TESTSUITELOG" ] && cat $TESTSUITELOG && grep -q FAIL $TESTSUITELOG && exit 1 || true