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