diff options
| author |   Angelos Mouzakitis <a.mouzakitis@virtualopensystems.com> | 2023-10-10 14:33:42 +0000 |
|---|---|---|
| committer | Angelos Mouzakitis <a.mouzakitis@virtualopensystems.com> | 2023-10-10 14:33:42 +0000 |
| commit | af1a266670d040d2f4083ff309d732d648afba2a (patch) | |
| tree | 2fc46203448ddcc6f81546d379abfaeb323575e9 /roms/edk2/CryptoPkg/Library/OpensslLib/openssl/config.com | |
| parent | e02cda008591317b1625707ff8e115a4841aa889 (diff) | |
Change-Id: Iaf8d18082d3991dec7c0ebbea540f092188eb4ec
Diffstat (limited to 'roms/edk2/CryptoPkg/Library/OpensslLib/openssl/config.com')
| -rw-r--r-- | roms/edk2/CryptoPkg/Library/OpensslLib/openssl/config.com | 93 |
1 files changed, 93 insertions, 0 deletions
diff --git a/roms/edk2/CryptoPkg/Library/OpensslLib/openssl/config.com b/roms/edk2/CryptoPkg/Library/OpensslLib/openssl/config.com new file mode 100644 index 000000000..46ccaa20d --- /dev/null +++ b/roms/edk2/CryptoPkg/Library/OpensslLib/openssl/config.com @@ -0,0 +1,93 @@ +$ ! OpenSSL config: determine the architecture and run Configure +$ ! Copyright 2016-2018 The OpenSSL Project Authors. All Rights Reserved. +$ ! +$ ! Licensed under the OpenSSL license (the "License"). You may not use +$ ! this file except in compliance with the License. You can obtain a +$ ! copy in the file LICENSE in the source distribution or at +$ ! https://www.openssl.org/source/license.html +$ ! +$ ! Very simple for the moment, it will take the following arguments: +$ ! +$ ! -32 or 32 sets /POINTER_SIZE=32 +$ ! -64 or 64 sets /POINTER_SIZE=64 +$ ! -d sets debugging +$ ! -h prints a usage and exits +$ ! -t test mode, doesn't run Configure +$ +$ arch = f$edit( f$getsyi( "arch_name"), "lowercase") +$ pointer_size = "" +$ dryrun = 0 +$ verbose = 0 +$ here = F$PARSE("A.;",F$ENVIRONMENT("PROCEDURE"),,,"SYNTAX_ONLY") - "A.;" +$ +$ collected_args = "" +$ P_index = 0 +$ LOOP1: +$ P_index = P_index + 1 +$ IF P_index .GT. 8 THEN GOTO ENDLOOP1 +$ P = F$EDIT(P1,"TRIM,LOWERCASE") +$ IF P .EQS. "-h" +$ THEN +$ dryrun = 1 +$ P = "" +$ TYPE SYS$INPUT +$ DECK +Usage: @config [options] + + -32 or 32 Build with 32-bit pointer size. + -64 or 64 Build with 64-bit pointer size. + -d Build with debugging. + -t Test mode, do not run the Configure perl script. + -v Verbose mode, show the exact Configure call that is being made. + -h This help. + +Any other text will be passed to the Configure perl script. +See INSTALL for instructions. + +$ EOD +$ ENDIF +$ IF P .EQS. "-t" +$ THEN +$ dryrun = 1 +$ verbose = 1 +$ P = "" +$ ENDIF +$ IF P .EQS. "-v" +$ THEN +$ verbose = 1 +$ P = "" +$ ENDIF +$ IF P .EQS. "-32" .OR. P .EQS. "32" +$ THEN +$ pointer_size = "-P32" +$ P = "" +$ ENDIF +$ IF P .EQS. "-64" .OR. P .EQS. "64" +$ THEN +$ pointer_size = "-P64" +$ P = "" +$ ENDIF +$ IF P .EQS. "-d" +$ THEN +$ collected_args = collected_args + " --debug" +$ P = "" +$ ENDIF +$ IF P .NES. "" THEN - + collected_args = collected_args + " """ + P1 + """" +$ P1 = P2 +$ P2 = P3 +$ P3 = P4 +$ P4 = P5 +$ P5 = P6 +$ P6 = P7 +$ P7 = P8 +$ P8 = "" +$ GOTO LOOP1 +$ ENDLOOP1: +$ +$ target = "vms-''arch'''pointer_size'" +$ IF verbose THEN - + WRITE SYS$OUTPUT "PERL ''here'Configure ""''target'""",collected_args +$ IF .not. dryrun THEN - + PERL 'here'Configure "''target'"'collected_args' +$ EXIT $STATUS |