tange/parallel
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/parallel.git synced 2024-11-22 14:07:55 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

faster forcing the load > 10 to test of --load

Browse source
This commit is contained in:
Ole Tange 2011-02-21 22:57:58 +01:00
parent bad6dd4787
commit 1446047579
1 changed files with 13 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
testsuite/tests-to-run/test45.sh
View file

@ -7,9 +7,20 @@ echo '### Bug in --load'
parallel -k --load 30 sleep 0.1\;echo ::: 1 2 3
echo '### Test --load locally'
seq 1 300 | nice timeout -k 1 14 parallel -j0 burnP6
# This will force the loadavg > 10
while cat /proc/loadavg | egrep -q '^.\.' ; do
(nice -n 19 burnP6 &) 2>/dev/null
sleep .05;
done
killall -9 burnP6 2>/dev/null ;sleep 1;killall -9 burnP6 2>/dev/null
stdout /usr/bin/time -f %e parallel --load 10 sleep ::: 1 | perl -ne '$_ > 10 and print "OK\n"'
echo '### Test --load remote'
seq 1 300 | ssh parallel@$SERVER2 nice timeout -k 1 14 parallel -j0 burnP6
# This will force the loadavg > 10
ssh parallel@$SERVER2 "while cat /proc/loadavg | egrep -q '^.\.' ; do
(nice -n 19 burnP6 &) 2>/dev/null
sleep .05;
done
killall -9 burnP6 2>/dev/null ;sleep 1;killall -9 burnP6 2>/dev/null
"
stdout /usr/bin/time -f %e parallel -S parallel@$SERVER2 --load 10 sleep ::: 1 | perl -ne '$_ > 10 and print "OK\n"'