From 119b7b5f2ad7efcf273f395e7633747f56ff3f95 Mon Sep 17 00:00:00 2001 From: Richard Levitte Date: Fri, 4 Nov 2022 10:37:13 +0100 Subject: [PATCH] crypto/sha/asm/sha512-ia64.pl: When checking assembler file names, ignore case The use case is that uppercase .ASM extension may be used on some platforms, and we were only testing for the lowercase extension. Reviewed-by: Matt Caswell Reviewed-by: Tomas Mraz Reviewed-by: Dmitry Belyavskiy (Merged from https://github.com/openssl/openssl/pull/19604) --- crypto/sha/asm/sha512-ia64.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/crypto/sha/asm/sha512-ia64.pl b/crypto/sha/asm/sha512-ia64.pl index eccc6c92e76..e147f2682d5 100755 --- a/crypto/sha/asm/sha512-ia64.pl +++ b/crypto/sha/asm/sha512-ia64.pl @@ -78,7 +78,7 @@ # $output is the last argument if it looks like a file (it has an extension) $output = $#ARGV >= 0 && $ARGV[$#ARGV] =~ m|\.\w+$| ? pop : undef; -if ($output =~ /512.*\.[s|asm]/) { +if ($output =~ /512.*\.[s|asm]/i) { $SZ=8; $BITS=8*$SZ; $LDW="ld8"; @@ -92,7 +92,7 @@ if ($output =~ /512.*\.[s|asm]/) { @sigma0=(1, 8, 7); @sigma1=(19,61, 6); $rounds=80; -} elsif ($output =~ /256.*\.[s|asm]/) { +} elsif ($output =~ /256.*\.[s|asm]/i) { $SZ=4; $BITS=8*$SZ; $LDW="ld4"; -- 2.47.3