diff options
author | Dr. David von Oheimb <David.von.Oheimb@siemens.com> | 2022-01-06 22:54:20 +0100 |
---|---|---|
committer | Pauli <ppzgs1@gmail.com> | 2022-01-09 13:19:52 +1100 |
commit | d45c0e1a5e89f01d83f6059c788524e901a11604 (patch) | |
tree | f6be7ef567299d748e8686391deae50cc102ca3e /util | |
parent | 15ae69fa7bc0f367edded19bc48e6d9a5ce8d547 (diff) | |
download | openssl-d45c0e1a5e89f01d83f6059c788524e901a11604.tar.gz |
check-format.pl: Fix report on missing space before +/-: allow, e.g., '1e-6'
Reviewed-by: Paul Dale <pauli@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/17434)
Diffstat (limited to 'util')
-rw-r--r-- | util/check-format-test-negatives.c | 5 | ||||
-rwxr-xr-x | util/check-format.pl | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/util/check-format-test-negatives.c b/util/check-format-test-negatives.c index 8f6ed23ee7..3ea792a72f 100644 --- a/util/check-format-test-negatives.c +++ b/util/check-format-test-negatives.c @@ -190,6 +190,11 @@ X509 *x509 = NULL; int y = a + 1 < b; int ret, was_NULL = *certs == NULL; +/* should not trigger: no space before binary ... operator */ +float z = 1e-6 * (-1) * b[+6] * 1e+1 * (a)->f * (long)+1 + - (tmstart.tv_sec + tmstart.tv_nsec * 1e-9); +struct st = {-1, 0}; + const OPTIONS passwd_options[] = { {"aixmd5", OPT_AIXMD5, '-', "AIX MD5-based password algorithm"}, #if !defined(OPENSSL_NO_DES) && !defined(OPENSSL_NO_DEPRECATED_3_0) diff --git a/util/check-format.pl b/util/check-format.pl index 8861b2bd8a..836fe30fa9 100755 --- a/util/check-format.pl +++ b/util/check-format.pl @@ -691,8 +691,8 @@ while (<>) { # loop over all lines of all input files report("no space before '=' or '<op>='") if $intra_line =~ m/\S(=)/; # '=' etc. without preceding space report("no space before '$1'") if $intra_line =~ m/\S([|\/%<>^\?])/; # |/%<>^? without preceding space # TODO ternary ':' without preceding SPC, while allowing no SPC before ':' after 'case' - report("no space before binary '$1'") if $intra_line =~ m/[^\s{()\[]([+\-])/;# +/- without preceding space or {()[ - # or ')' (which is used f type casts) + report("no space before binary '$2'") if $intra_line =~ m/([^\s{()\[e])([+\-])/; # '+'/'-' without preceding space or {()[e + # ')' may be used for type casts or before "->", 'e' may be used for numerical literals such as "1e-6" report("no space before binary '$1'") if $intra_line =~ m/[^\s{()\[*!]([*])/; # '*' without preceding space or {()[*! report("no space before binary '$1'") if $intra_line =~ m/[^\s{()\[]([&])/; # '&' without preceding space or {()[ report("no space after ternary '$1'") if $intra_line =~ m/(:)[^\s\d]/; # ':' without following space or digit |