parallel/testsuite/tests-to-run/parallel-local-ssh1.sh

198 lines
6.8 KiB
Bash
Raw Permalink Normal View History

2013-01-09 22:06:01 +00:00
#!/bin/bash
2014-11-13 03:19:33 +00:00
# SSH only allowed to localhost/lo
rm -rf tmp
mkdir tmp
cd tmp
unset run_test
cat <<'EOF' | sed -e s/\$SERVER1/$SERVER1/\;s/\$SERVER2/$SERVER2/ | stdout parallel -vj300% -k --joblog /tmp/jl-`basename $0` -L1 -r
2014-07-21 15:07:48 +00:00
echo TODO
## echo '### Test --trc --basefile --/./--foo7 :/./:foo8 " "/./" "foo9 ./foo11/./foo11'
2013-01-09 22:06:01 +00:00
EOF
par_stop_if_no_hosts_left() {
echo '### Stop if all hosts are filtered and there are no hosts left to run on'
stdout parallel --filter-hosts -S no-such.host echo ::: 1
}
par_csh_variable_newline() {
echo '### Can csh propagate a variable containing \n'
export A=$(seq 3); parallel -S csh@lo --env A bash -c \''echo "$A"'\' ::: dummy
}
par_pipe_unneeded_spawn() {
echo '### Test bug #34241: --pipe should not spawn unneeded processes'
seq 5 | ssh csh@lo parallel -k --block 5 --pipe -j10 cat\\\;echo Block_end
}
par_files_nonall() {
echo '### bug #40002: --files and --nonall seem not to work together:'
parallel --files --nonall -S localhost true | tee >(parallel rm) | wc -l
}
par_joblog_nonall() {
echo '### bug #40001: --joblog and --nonall seem not to work together:'
parallel --joblog - --nonall -S lo,localhost true | wc -l
}
par_workdir_home() {
echo '### bug #40132: FreeBSD: --workdir . gives warning if . == $HOME'
cd && parallel --workdir . -S lo pwd ::: ""
}
par_PARALLEL_SSH_function() {
echo '### use function as $PARALLEL_SSH'
foossh() { echo "FOOSSH" >&2; ssh "$@"; }
export -f foossh
PARALLEL_SSH=foossh parallel -S 1/lo echo ::: 'Run through FOOSSH?'
}
par_ssh() {
echo '### use --ssh'
barssh() { echo "BARSSH" >&2; ssh "$@"; }
export -f barssh
parallel --ssh barssh -S 1/lo echo ::: 'Run through BARSSH?'
}
par_filename_colon() {
echo '### test filename :'
echo content-of-: > :
echo : | parallel -j1 --trc {}.{.} -S parallel@lo '(echo remote-{}.{.};cat {}) > {}.{.}'
cat :.:; rm : :.:
}
par_wd_dotdotdot() {
echo '### Test --wd ... --cleanup which should remove the filled tmp dir'
ssh sh@lo 'mkdir -p .parallel/tmp; find .parallel/tmp |grep uNiQuE_sTrInG.6 | parallel rm'
stdout parallel -j9 -k --retries 3 --wd ... --cleanup -S sh@lo -v echo ">"{}.6 ::: uNiQuE_sTrInG
find ~sh/.parallel/tmp |grep uNiQuE_sTrInG.6
}
par_wd_dashdash() {
echo '### Test --wd --'
stdout parallel --wd -- -S sh@lo echo OK ">"{}.7 ::: uNiQuE_sTrInG
cat ~sh/--/uNiQuE_sTrInG.7
stdout ssh sh@lo rm ./--/uNiQuE_sTrInG.7
}
par_wd_space() {
echo '### Test --wd " "'
stdout parallel --wd " " -S sh@lo echo OK ">"{}.8 ::: uNiQuE_sTrInG
cat ~sh/" "/uNiQuE_sTrInG.8
stdout ssh sh@lo rm ./'" "'/uNiQuE_sTrInG.8
}
par_wd_quote() {
echo "### Test --wd \"'\""
stdout parallel --wd "'" -S sh@lo echo OK ">"{}.9 ::: uNiQuE_sTrInG
cat ~sh/"'"/uNiQuE_sTrInG.9
stdout ssh sh@lo rm ./"\\'"/uNiQuE_sTrInG.9
}
par_trc_dashdash() {
echo '### Test --trc ./--/--foo1'
mkdir -p ./--; echo 'Content --/--foo1' > ./--/--foo1
stdout parallel --trc {}.1 -S sh@lo '(cat {}; echo remote1) > {}.1' ::: ./--/--foo1; cat ./--/--foo1.1
stdout parallel --trc {}.2 -S sh@lo '(cat ./{}; echo remote2) > {}.2' ::: --/--foo1; cat ./--/--foo1.2
}
par_trc_colon() {
echo '### Test --trc ./:dir/:foo2'
mkdir -p ./:dir; echo 'Content :dir/:foo2' > ./:dir/:foo2
stdout parallel --trc {}.1 -S sh@lo '(cat {}; echo remote1) > {}.1' ::: ./:dir/:foo2
cat ./:dir/:foo2.1
stdout parallel --trc {}.2 -S sh@lo '(cat ./{}; echo remote2) > {}.2' ::: :dir/:foo2
cat ./:dir/:foo2.2
}
par_trc_space() {
echo '### Test --trc ./" "/" "foo3'
mkdir -p ./" "; echo 'Content _/_foo3' > ./" "/" "foo3
stdout parallel --trc {}.1 -S sh@lo '(cat {}; echo remote1) > {}.1' ::: ./" "/" "foo3
cat ./" "/" "foo3.1
stdout parallel --trc {}.2 -S sh@lo '(cat ./{}; echo remote2) > {}.2' ::: " "/" "foo3
cat ./" "/" "foo3.2
}
par_trc_dashdashdot() {
echo '### Test --trc ./--/./--foo4'
mkdir -p ./--; echo 'Content --/./--foo4' > ./--/./--foo4
stdout parallel --trc {}.1 -S sh@lo '(cat ./--foo4; echo remote{}) > --foo4.1' ::: --/./--foo4
cat ./--/./--foo4.1
}
par_trc_colondot() {
echo '### Test --trc ./:/./:foo5'
mkdir -p ./:a; echo 'Content :a/./:foo5' > ./:a/./:foo5
stdout parallel --trc {}.1 -S sh@lo '(cat ./:foo5; echo remote{}) > ./:foo5.1' ::: ./:a/./:foo5
cat ./:a/./:foo5.1
}
par_trc_spacedot() {
echo '### Test --trc ./" "/./" "foo6'
mkdir -p ./" "; echo 'Content _/./_foo6' > ./" "/./" "foo6
stdout parallel --trc {}.1 -S sh@lo '(cat ./" "foo6; echo remote{}) > ./" "foo6.1' ::: ./" "/./" "foo6
cat ./" "/./" "foo6.1
}
par_trc_dashdashspace() {
echo '### Test --trc "-- " "-- "'
touch -- '-- ' ' --'; rm -f ./?--.a ./--?.a
parallel --trc {}.a -S csh@lo,sh@lo touch ./{}.a ::: '-- ' ' --'; ls ./--?.a ./?--.a
parallel --nonall -k -S csh@lo,sh@lo 'ls ./" "-- || echo OK'
parallel --nonall -k -S csh@lo,sh@lo 'ls ./--" " || echo OK'
parallel --nonall -k -S csh@lo,sh@lo 'ls ./" "--.a || echo OK'
parallel --nonall -k -S csh@lo,sh@lo 'ls ./--" ".a || echo OK'
}
par_trc_dashdashdashspace() {
echo '### Test --trc "/tmp/./--- /A" "/tmp/./ ---/B"'
mkdir -p '/tmp/./--- ' '/tmp/ ---'
touch -- '/tmp/./--- /A' '/tmp/ ---/B'
rm -f ./---?/A.a ./?---/B.a
parallel --trc {=s:.*/./::=}.a -S csh@lo,sh@lo touch ./{=s:.*/./::=}.a ::: '/tmp/./--- /A' '/tmp/./ ---/B'
ls ./---?/A.a ./?---/B.a | LC_ALL=C sort
parallel --nonall -k -S csh@lo,sh@lo 'ls ./?--- ./---? || echo OK' | LC_ALL=C sort
}
par_onall_transfer() {
echo '### bug #46519: --onall ignores --transfer'
touch bug46519.{a,b,c}; rm -f bug46519.?? bug46519.???
parallel --onall --tf bug46519.{} --trc bug46519.{}{} --trc bug46519.{}{}{} -S csh@lo,sh@lo 'ls bug46519.{}; touch bug46519.{}{} bug46519.{}{}{}' ::: a b c
ls bug46519.?? bug46519.???
parallel --onall -S csh@lo,sh@lo ls bug46519.{}{} bug46519.{}{}{} ::: a b c &&
echo Cleanup failed
}
par_--onall_--plus() {
echo '### Test --plus is respected with --onall/--nonall'
parallel -S bash@lo --onall --plus echo {host} ::: OK
parallel -S bash@lo --nonall --plus echo {host}
}
par_remote_load() {
echo '### Test --load remote'
ssh parallel@lo 'seq 10 | parallel --nice 19 --timeout 15 -j0 -qN0 perl -e while\(1\)\{\ \}' &
sleep 1
stdout /usr/bin/time -f %e parallel -S parallel@lo --load 10 sleep ::: 1 | perl -ne '$_ > 10 and print "OK\n"'
}
par_remote_nice() {
echo '### Test --nice remote'
stdout parallel --nice 1 -S lo -vv 'PAR=a bash -c "echo \$PAR {}"' ::: b |
perl -pe 's/\S*parallel-server\S*/one-server/;s:="[0-9]+":="XXXXX":i;'
}
export -f $(compgen -A function | grep par_)
compgen -A function | grep par_ | LC_ALL=C sort |
parallel --timeout 130 -j6 --tag -k --joblog /tmp/jl-`basename $0` '{} 2>&1'
cd ..
rm -rf tmp
mkdir tmp
cd tmp