mirror of
https://git.savannah.gnu.org/git/parallel.git
synced 2024-12-23 05:07:54 +00:00
9d1e2df9b9
Updates to *-local-* tests so they can run on different computers.
53 lines
2.1 KiB
Bash
53 lines
2.1 KiB
Bash
#!/bin/bash
|
|
|
|
# Simple jobs that never fails
|
|
# Each should be taking >100s and be possible to run in parallel
|
|
# I.e.: No race conditions, no logins
|
|
|
|
# tmpdir with > 5 GB available
|
|
TMP5G=${TMP5G:-/dev/shm}
|
|
export TMP5G
|
|
|
|
cat <<'EOF' | sed -e 's/;$/; /;s/$SERVER1/'$SERVER1'/;s/$SERVER2/'$SERVER2'/' | stdout parallel -vj0 -k --joblog /tmp/jl-`basename $0` -L1
|
|
echo '### Test of --retries on unreachable host'
|
|
seq 2 | stdout parallel -k --retries 2 -v -S 4.3.2.1,: echo
|
|
|
|
echo '**'
|
|
|
|
echo "### Test Force outside the file handle limit, 2009-02-17 Gave fork error"
|
|
(echo echo Start; seq 1 20000 | perl -pe 's/^/true /'; echo echo end) | stdout parallel -uj 0 | egrep -v 'processes took|adjusting'
|
|
|
|
echo '**'
|
|
|
|
echo '### Test if we can deal with output > 4 GB'
|
|
echo | nice parallel --tmpdir $TMP5G -q perl -e '$a="x"x1000000;for(0..4300){print $a}' | nice md5sum
|
|
|
|
echo '**'
|
|
|
|
echo 'bug #41613: --compress --line-buffer no --tagstring';
|
|
diff
|
|
<(nice perl -e 'for("x011".."x110"){print "$_\t", ("\n", map { rand } (1..100000)) }'|
|
|
nice parallel -N10 -L1 --pipe -j6 --block 20M --compress
|
|
pv -qL 1000000 | perl -pe 's/(....).*/$1/')
|
|
<(nice perl -e 'for("x011".."x110"){print "$_\t", ("\n", map { rand } (1..100000)) }'|
|
|
nice parallel -N10 -L1 --pipe -j6 --block 20M --compress --line-buffer
|
|
pv -qL 1000000 | perl -pe 's/(....).*/$1/')
|
|
>/dev/null
|
|
|| (echo 'Good: --line-buffer matters'; false) && echo 'Bad: --line-buffer not working'
|
|
|
|
echo 'bug #41613: --compress --line-buffer with --tagstring';
|
|
diff
|
|
<(nice perl -e 'for("x011".."x110"){print "$_\t", ("\n", map { rand } (1..100000)) }'|
|
|
nice parallel -N10 -L1 --pipe -j6 --block 20M --compress --tagstring {#}
|
|
pv -qL 1000000 | perl -pe 's/(....).*/$1/')
|
|
<(nice perl -e 'for("x011".."x110"){print "$_\t", ("\n", map { rand } (1..100000)) }'|
|
|
nice parallel -N10 -L1 --pipe -j6 --block 20M --compress --tagstring {#} --line-buffer
|
|
pv -qL 1000000 | perl -pe 's/(....).*/$1/')
|
|
>/dev/null
|
|
|| (echo 'Good: --line-buffer matters'; false) && echo 'Bad: --line-buffer not working'
|
|
|
|
echo '**'
|
|
|
|
|
|
EOF
|