parallel/testsuite/tests-to-run/sem01.sh

93 lines
2.8 KiB
Bash
Executable file

#!/bin/bash
# SPDX-FileCopyrightText: 2021-2023 Ole Tange, http://ole.tange.dk and Free Software and Foundation, Inc.
#
# SPDX-License-Identifier: GPL-3.0-or-later
par_stdin() {
echo '### bug #60579: Sem: Allow reading from stdin and setting -a'
seq 10 | parallel --semaphore --id stdin wc
seq 10 | parallel --semaphore --id stdin --fg wc
tmp=$(mktemp)
seq 10 > "$tmp"
parallel -a "$tmp" --semaphore --id stdin wc
parallel -a "$tmp" --semaphore --id stdin --fg wc
parallel --semaphore --id stdin --wait
# Should fail: More files are not supported
parallel -a "$tmp" -a "$tmp" --semaphore --id stdin --fg wc
}
par_mutex() {
echo '### Test mutex. This should not mix output'
parallel --semaphore --id mutex -u seq 1 10 '|' pv -qL 20
parallel --semaphore --id mutex -u seq 11 20 '|' pv -qL 100
parallel --semaphore --id mutex --wait
echo done
}
par_2jobs() {
echo '### Test similar example as from man page - run 2 jobs simultaneously'
echo 'Expect done: 1 2 5 3 4'
for i in 5 1 2 3 4 ; do
sleep 0.2
echo Scheduling $i
sem -j2 --id ex2jobs -u echo starting $i ";" sleep $i ";" echo done $i
done
sem --id ex2jobs --wait
}
par_fg_then_bg() {
echo '### Test --fg followed by --bg'
parallel -u --id fgbg --fg --semaphore seq 1 10 '|' pv -qL 30
parallel -u --id fgbg --bg --semaphore seq 11 20 '|' pv -qL 30
parallel -u --id fgbg --fg --semaphore seq 21 30 '|' pv -qL 30
parallel -u --id fgbg --bg --semaphore seq 31 40 '|' pv -qL 30
sem --id fgbg --wait
}
par_bg_p_should_error() {
echo '### Test bug #33621: --bg -p should give an error message'
stdout parallel -p --bg echo x{}
}
par_fg_line-buffer() {
echo '### Failed on 20141226'
sem --fg --line-buffer --id bugin20141226 echo OK
}
par_semaphore-timeout() {
echo '### Test --st +1/-1'
stdout sem --id st --line-buffer "echo A normal-start;sleep 3;echo C normal-end"
stdout sem --id st --line-buffer --st 1 "echo B st1-start;sleep 3;echo D st1-end"
stdout sem --id st --line-buffer --st -1 "echo ERROR-st-1-start;sleep 3;echo ERROR-st-1-end"
stdout sem --id st --wait
}
par_exit() {
echo '### Exit values'
test_exit() {
stdout sem --fg --id exit$1 exit $1
echo $?
}
export -f test_exit
parallel --tag -k test_exit ::: 0 1 10 100 101 102 222 255
echo '### Exit values - signal'
test_signal() {
bash -c 'kill -'$1' $$'
echo Bash exit value $?
stdout sem --fg --id signal$1 kill -$1 '$$'
echo Sem exit value $?
}
export -f test_signal
ulimit -c 0
stdout parallel -j15 -k --timeout 20 --tag test_signal ::: {0..64} |
perl -pe 's/line 1: (\d+)/line 1: PID/'
}
export -f $(compgen -A function | grep par_)
compgen -A function | grep par_ | LC_ALL=C sort |
parallel --timeout 30 -j6 --tag -k --joblog /tmp/jl-`basename $0` '{} 2>&1' |
perl -pe 's:/usr/bin:/bin:g'