mirror of
https://git.savannah.gnu.org/git/parallel.git
synced 2024-11-25 15:37:56 +00:00
parallel: Allow hostnames in UPPERCASE.
This commit is contained in:
parent
59c20fa265
commit
5fa7e57b6b
|
@ -6784,10 +6784,10 @@ sub new($$) {
|
||||||
}
|
}
|
||||||
|
|
||||||
# [server]:port
|
# [server]:port
|
||||||
if($s =~ s/([-a-z0-9.]+)//) { $host = $1; }
|
if($s =~ s/([-a-z0-9.]+)//i) { $host = $1; }
|
||||||
|
|
||||||
# [:port]
|
# [:port]
|
||||||
if($s =~ s/:(\w+)//) { $port = $1; }
|
if($s =~ s/:(\w+)//i) { $port = $1; }
|
||||||
|
|
||||||
if($s and $s ne ':') {
|
if($s and $s ne ':') {
|
||||||
::die_bug("SSHLogin parser failed on '$origs' => '$s'");
|
::die_bug("SSHLogin parser failed on '$origs' => '$s'");
|
||||||
|
@ -11400,9 +11400,9 @@ sub print_joblog($) {
|
||||||
160..178,180,182..185,187..186,189,196..214,232..250,
|
160..178,180,182..185,187..186,189,196..214,232..250,
|
||||||
253..254));
|
253..254));
|
||||||
# reorder list so adjacent colors are dissimilar
|
# reorder list so adjacent colors are dissimilar
|
||||||
# %7 and %17 were found experimentally
|
# %23 and %7 were found experimentally
|
||||||
@color = @color[
|
@color = @color[
|
||||||
sort { ($b%7 <=> $a%7) or ($a%17 <=> $b%17) } 0..$#color
|
sort { ($a%23 <=> $b%23) or ($b%7 <=> $a%7) } 0..$#color
|
||||||
];
|
];
|
||||||
}
|
}
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
|
|
|
@ -9,6 +9,18 @@ unset run_once
|
||||||
|
|
||||||
# SSH only allowed to localhost/lo
|
# SSH only allowed to localhost/lo
|
||||||
|
|
||||||
|
par_sshloginfile() {
|
||||||
|
echo '### --slf with mIxEd cAsE'
|
||||||
|
tmp=$(mktemp)
|
||||||
|
(
|
||||||
|
echo 2/bash@LO
|
||||||
|
echo 3/parallel@Lo:22
|
||||||
|
echo 4/ksh@lO:ssh
|
||||||
|
) > "$tmp"
|
||||||
|
seq 9 | parallel --slf "$tmp" 'whoami;sleep 1;echo' | sort
|
||||||
|
rm -f "$tmp"
|
||||||
|
}
|
||||||
|
|
||||||
par_env_underscore() {
|
par_env_underscore() {
|
||||||
echo '### --env _'
|
echo '### --env _'
|
||||||
echo ignored_var >> ~/.parallel/ignored_vars
|
echo ignored_var >> ~/.parallel/ignored_vars
|
||||||
|
|
|
@ -78,7 +78,7 @@ perl -ne '$/="\n\n"; /^Output/../^[^O]\S/ and next; /^ / and print;' ../../src/
|
||||||
# Race condition
|
# Race condition
|
||||||
s/^4-(middle|end)\n//;
|
s/^4-(middle|end)\n//;
|
||||||
# Base 64 string with quotes
|
# Base 64 string with quotes
|
||||||
s:['"'"'"\\+/a-z0-9=]{50,}(\s['"'"'"\\+/a-z0-9=]*)*:BASE64:ig;
|
s:['"'"'"\\+/a-z.0-9=]{50,}(\s['"'"'"\\+/a-z.0-9=]*)*:BASE64:ig;
|
||||||
# Timings are often off
|
# Timings are often off
|
||||||
s/^(\d)$/9/;
|
s/^(\d)$/9/;
|
||||||
s/^(\d\d)$/99/;
|
s/^(\d\d)$/99/;
|
||||||
|
|
|
@ -110,9 +110,11 @@ par_csv_pipe 9000"
|
||||||
par_csv_pipe 11000"
|
par_csv_pipe 11000"
|
||||||
par_ctagstring ### --ctag --ctagstring should be different from --tag --tagstring
|
par_ctagstring ### --ctag --ctagstring should be different from --tag --tagstring
|
||||||
par_ctagstring 8
|
par_ctagstring 8
|
||||||
par_ctagstring 33
|
par_ctagstring [00m
|
||||||
|
par_ctagstring 34
|
||||||
par_ctagstring 10
|
par_ctagstring 10
|
||||||
par_ctagstring 35
|
par_ctagstring [00m
|
||||||
|
par_ctagstring 36
|
||||||
par_delimiter ### Test --delimiter and -d: Delimiter instead of newline
|
par_delimiter ### Test --delimiter and -d: Delimiter instead of newline
|
||||||
par_delimiter # Yes there is supposed to be an extra newline for -d N
|
par_delimiter # Yes there is supposed to be an extra newline for -d N
|
||||||
par_delimiter This is line 1
|
par_delimiter This is line 1
|
||||||
|
@ -953,10 +955,10 @@ par_sem_quote ### sem --quote should not add empty argument
|
||||||
par_sem_quote echo
|
par_sem_quote echo
|
||||||
par_sem_quote
|
par_sem_quote
|
||||||
par_shellcompletion ### --shellcompletion
|
par_shellcompletion ### --shellcompletion
|
||||||
par_shellcompletion f4aa0b2d61cf5e6836b738bf403c1d96 -
|
par_shellcompletion 9c26e11f6435802cd18a8fd78f65f71d -
|
||||||
par_shellcompletion f4aa0b2d61cf5e6836b738bf403c1d96 -
|
par_shellcompletion 9c26e11f6435802cd18a8fd78f65f71d -
|
||||||
par_shellcompletion be5b6ba646ba3f082315afd8e205c954 -
|
par_shellcompletion 2b8f8856cd7b632edec5526f8d3637c9 -
|
||||||
par_shellcompletion be5b6ba646ba3f082315afd8e205c954 -
|
par_shellcompletion 2b8f8856cd7b632edec5526f8d3637c9 -
|
||||||
par_slow_pipe_regexp ### bug #53718: --pipe --regexp -N blocks
|
par_slow_pipe_regexp ### bug #53718: --pipe --regexp -N blocks
|
||||||
par_slow_pipe_regexp This should take a few ms, but took more than 2 hours
|
par_slow_pipe_regexp This should take a few ms, but took more than 2 hours
|
||||||
par_slow_pipe_regexp 0 1 1
|
par_slow_pipe_regexp 0 1 1
|
||||||
|
|
|
@ -42,6 +42,25 @@ par_multiple_hosts_repeat_arg parallel: Warning: Using -X or -m with --sshlogin
|
||||||
par_multiple_hosts_repeat_arg 1
|
par_multiple_hosts_repeat_arg 1
|
||||||
par_multiple_hosts_repeat_arg 2
|
par_multiple_hosts_repeat_arg 2
|
||||||
par_multiple_hosts_repeat_arg 3
|
par_multiple_hosts_repeat_arg 3
|
||||||
|
par_sshloginfile ### --slf with mIxEd cAsE
|
||||||
|
par_sshloginfile 1
|
||||||
|
par_sshloginfile 2
|
||||||
|
par_sshloginfile 3
|
||||||
|
par_sshloginfile 4
|
||||||
|
par_sshloginfile 5
|
||||||
|
par_sshloginfile 6
|
||||||
|
par_sshloginfile 7
|
||||||
|
par_sshloginfile 8
|
||||||
|
par_sshloginfile 9
|
||||||
|
par_sshloginfile bash
|
||||||
|
par_sshloginfile bash
|
||||||
|
par_sshloginfile ksh
|
||||||
|
par_sshloginfile ksh
|
||||||
|
par_sshloginfile ksh
|
||||||
|
par_sshloginfile ksh
|
||||||
|
par_sshloginfile parallel
|
||||||
|
par_sshloginfile parallel
|
||||||
|
par_sshloginfile parallel
|
||||||
par_tmux_different_shells ### Test tmux works on different shells
|
par_tmux_different_shells ### Test tmux works on different shells
|
||||||
par_tmux_different_shells 0
|
par_tmux_different_shells 0
|
||||||
par_tmux_different_shells 4
|
par_tmux_different_shells 4
|
||||||
|
|
|
@ -1272,7 +1272,7 @@ If you pay 10000 EUR you should feel free to use GNU Parallel without citing.
|
||||||
More about funding GNU Parallel and the citation notice:
|
More about funding GNU Parallel and the citation notice:
|
||||||
https://lists.gnu.org/archive/html/parallel/2013-11/msg00006.html
|
https://lists.gnu.org/archive/html/parallel/2013-11/msg00006.html
|
||||||
https://www.gnu.org/software/parallel/parallel_design.html#citation-notice
|
https://www.gnu.org/software/parallel/parallel_design.html#citation-notice
|
||||||
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
|
https:BASE64-notice-faq.txt
|
||||||
If you send a copy of your published article to tange@gnu.org, it will be
|
If you send a copy of your published article to tange@gnu.org, it will be
|
||||||
mentioned in the release notes of next version of GNU Parallel.
|
mentioned in the release notes of next version of GNU Parallel.
|
||||||
parallel --number-of-cpus
|
parallel --number-of-cpus
|
||||||
|
@ -1286,4 +1286,4 @@ mentioned in the release notes of next version of GNU Parallel.
|
||||||
echo A
|
echo A
|
||||||
echo B
|
echo B
|
||||||
echo C
|
echo C
|
||||||
8
|
6
|
||||||
|
|
Loading…
Reference in a new issue