mirror of
https://git.savannah.gnu.org/git/parallel.git
synced 2024-10-18 12:59:39 +00:00
55 lines
4.1 KiB
Bash
55 lines
4.1 KiB
Bash
#!/bin/bash
|
|
|
|
echo '### Test --env - https://savannah.gnu.org/bugs/?37351'
|
|
export TWOSPACES=' 2 spaces '
|
|
export THREESPACES=" > My brother's 12\" records < "
|
|
echo a"$TWOSPACES"b 1
|
|
stdout parallel --env TWOSPACES echo 'a"$TWOSPACES"b' ::: 1
|
|
stdout parallel -S localhost --env TWOSPACES echo 'a"$TWOSPACES"b' ::: 1
|
|
stdout parallel -S csh@localhost --env TWOSPACES echo 'a"$TWOSPACES"b' ::: 1
|
|
stdout parallel -S tcsh@localhost --env TWOSPACES echo 'a"$TWOSPACES"b' ::: 1
|
|
|
|
echo a"$TWOSPACES"b a"$THREESPACES"b 2
|
|
stdout parallel --env TWOSPACES --env THREESPACES echo 'a"$TWOSPACES"b' 'a"$THREESPACES"b' ::: 2
|
|
stdout parallel -S localhost --env TWOSPACES --env THREESPACES echo 'a"$TWOSPACES"b' 'a"$THREESPACES"b' ::: 2
|
|
stdout parallel -S csh@localhost --env TWOSPACES --env THREESPACES echo 'a"$TWOSPACES"b' 'a"$THREESPACES"b' ::: 2
|
|
stdout parallel -S tcsh@localhost --env TWOSPACES --env THREESPACES echo 'a"$TWOSPACES"b' 'a"$THREESPACES"b' ::: 2
|
|
|
|
echo a"$TWOSPACES"b a"$THREESPACES"b 3
|
|
stdout parallel --env TWOSPACES,THREESPACES echo 'a"$TWOSPACES"b' 'a"$THREESPACES"b' ::: 3
|
|
stdout parallel -S localhost --env TWOSPACES,THREESPACES echo 'a"$TWOSPACES"b' 'a"$THREESPACES"b' ::: 3
|
|
stdout parallel -S csh@localhost --env TWOSPACES,THREESPACES echo 'a"$TWOSPACES"b' 'a"$THREESPACES"b' ::: 3
|
|
stdout parallel -S tcsh@localhost --env TWOSPACES,THREESPACES echo 'a"$TWOSPACES"b' 'a"$THREESPACES"b' ::: 3
|
|
|
|
export MIN=" \'\""
|
|
echo a"$MIN"b 4
|
|
stdout parallel --env MIN echo 'a"$MIN"b' ::: 4
|
|
stdout parallel -S localhost --env MIN echo 'a"$MIN"b' ::: 4
|
|
stdout parallel -S csh@localhost --env MIN echo 'a"$MIN"b' ::: 4
|
|
stdout parallel -S tcsh@localhost --env MIN echo 'a"$MIN"b' ::: 4
|
|
|
|
export SPC="'"' * ? >o <i*? ][\!#¤%=( ) | }'
|
|
echo a"$SPC"b 5
|
|
stdout parallel --env SPC echo 'a"$SPC"b' ::: 5
|
|
stdout parallel -S localhost --env SPC echo 'a"$SPC"b' ::: 5
|
|
stdout parallel -S csh@localhost --env SPC echo 'a"$SPC"b' ::: 5
|
|
stdout parallel -S tcsh@localhost --env SPC echo 'a"$SPC"b' ::: 5
|
|
|
|
echo '### Test --env for \n and \\ - single and double (bash only) - no output is good'
|
|
perl -e 'for(10,92) { printf "%c%c %c%d\0",$_,$_,$_,$_ }' | stdout parallel --nice 19 -j4 -k -I // --arg-sep _ -0 V=// V2=V2=// parallel -k -j1 -S 2/:,2/lo --env V,V2 echo \''"{}$V$V2"'\' ::: {#} {#} {#} {#} | sort | uniq -c | grep -v ' 4 '|grep -v xauth |grep -v X11
|
|
|
|
echo '### Test --env for \n and \\ - single and double (*csh only) - no output is good but csh fails'
|
|
perl -e 'for(10,92) { printf "%c%c %c%d\0",$_,$_,$_,$_ }' | stdout parallel --nice 19 -j4 -k -I // --arg-sep _ -0 V=// V2=V2=// parallel -k -j1 -S 2/tcsh@lo,2/csh@lo --env V,V2 echo \''"{}$V$V2"'\' ::: {#} {#} {#} {#} | sort | uniq -c | grep -v ' 4 '|grep -v xauth |grep -v X11
|
|
|
|
echo '### Test --env for \n and \\ - single and double --onall (bash only) - no output is good'
|
|
perl -e 'for(10,92) { printf "%c%c %c%d\0",$_,$_,$_,$_ }' | stdout parallel --nice 19 -j4 -k -I // --arg-sep _ -0 V=// V2=V2=// parallel -k -j1 -S :,lo --onall --env V,V2 echo \''"{}$V$V2"'\' ::: {#} | sort | uniq -c | grep -v ' 4 '|grep -v xauth |grep -v X11
|
|
|
|
echo '### Test --env for \n and \\ - single and double --onall (*csh only) - no output is good but csh fails'
|
|
perl -e 'for(10,92) { printf "%c%c %c%d\0",$_,$_,$_,$_ }' | stdout parallel --nice 19 -j4 -k -I // --arg-sep _ -0 V=// V2=V2=// parallel -k -j1 -S 1/tcsh@lo,1/csh@lo --onall --env V,V2 echo \''"{}$V$V2"'\' ::: {#} | sort | uniq -c | grep -v ' 2 '|grep -v xauth |grep -v X11
|
|
|
|
echo '### Test --env for \160 - which kills csh - single and double - no output is good'
|
|
perl -e 'for(160) { printf "%c%c %c%d\0",$_,$_,$_,$_ }' | stdout parallel --nice 19 -j4 -k -I // --arg-sep _ -0 V=// V2=V2=// parallel -k -j1 -S :,1/lo,1/tcsh@lo --env V,V2 echo \''"{}$V$V2"'\' ::: {#} {#} {#} | uniq -c | grep -v ' 3 '|grep -v xauth |grep -v X11
|
|
|
|
echo '### Test --env for \160 - which kills csh - single and double --onall - no output is good'
|
|
perl -e 'for(160) { printf "%c%c %c%d\0",$_,$_,$_,$_ }' | stdout parallel --nice 19 -j4 -k -I // --arg-sep _ -0 V=// V2=V2=// parallel -k -j1 -S :,1/lo,1/tcsh@lo --onall --env V,V2 echo \''"{}$V$V2"'\' ::: {#} | uniq -c | grep -v ' 3 '|grep -v xauth |grep -v X11
|