diff options
| -rwxr-xr-x | config | 2 | ||||
| -rw-r--r-- | config.com | 64 |
2 files changed, 42 insertions, 24 deletions
@@ -33,7 +33,7 @@ case "$i" in -t*) TEST="true";; -h*) TEST="true"; cat <<EOF Usage: config [options] - -d Add a debug- prefix to machine choice. + -d Build with debugging when possible. -t Test mode, do not run the Configure perl script. -h This help. diff --git a/config.com b/config.com index b43acfaac4..4151a88a44 100644 --- a/config.com +++ b/config.com @@ -2,14 +2,15 @@ $ ! OpenSSL config: determine the architecture and run Configure $ ! $ ! Very simple for the moment, it will take the following arguments: $ ! -$ ! 32 sets /POINTER_SIZE=32 -$ ! 64 sets /POINTER_SIZE=64 -$ ! DEBUG sets debugging -$ ! HELP prints a usage and exits +$ ! -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 = "" -$ debug = "" +$ test = 0 $ here = F$PARSE("A.;",F$ENVIRONMENT("PROCEDURE"),,,"SYNTAX_ONLY") - "A.;" $ $ collected_args = "" @@ -18,20 +19,43 @@ $ LOOP1: $ P_index = P_index + 1 $ IF P_index .GT. 8 THEN GOTO ENDLOOP1 $ P = F$EDIT(P1,"TRIM,LOWERCASE") -$ IF P .EQS. "help" THEN GOTO USAGE -$ IF P .EQS. "32" +$ IF P .EQS. "-h" +$ THEN +$ TEST = 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. + -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 +$ test = 1 +$ P = "" +$ ENDIF +$ IF P .EQS. "-32" .OR. P .EQS. "32" $ THEN $ pointer_size = "-P32" $ P = "" $ ENDIF -$ IF P .EQS. "64" +$ IF P .EQS. "-64" .OR. P .EQS. "64" $ THEN $ pointer_size = "-P64" $ P = "" $ ENDIF -$ IF P .EQS. "debug" +$ IF P .EQS. "-d" $ THEN -$ debug = "--debug" +$ collected_args = collected_args + " --debug" $ P = "" $ ENDIF $ IF P .NES. "" THEN - @@ -48,18 +72,12 @@ $ GOTO LOOP1 $ ENDLOOP1: $ $ target = "vms-''arch'''pointer_size'" -$ PERL 'here'Configure "''target'" 'debug' 'collected_args' -$ EXIT $STATUS +$ IF test +$ THEN +$ WRITE SYS$OUTPUT "PERL ''here'Configure ""''target'""''collected_args'" +$ ELSE +$ PERL 'here'Configure "''target'" 'debug' 'collected_args' +$ ENDIF +$ EXIT $STATUS $ $ USAGE: -$ TYPE SYS$INPUT -$ DECK -usage: @config [options] - - 32 build with 32-bit pointer size - 64 build with 64-bit pointer size - DEBUG build with debugging - HELP this text - -Any other option is simply passed to Configure. -$ EOD |