makevms.com

   1 $!
   2 $! MAKEVMS.COM
   3 $! Original Author:  UNKNOWN
   4 $! Rewritten By:  Robert Byer
   5 $!                Vice-President
   6 $!                A-Com Computing, Inc.
   7 $!                byer@mail.all-net.net
   8 $!
   9 $! Changes by Richard Levitte <richard@levitte.org>
  10 $!
  11 $! This procedure creates the SSL libraries of "[.xxx.EXE.CRYPTO]LIBCRYPTO.OLB"
  12 $! "[.xxx.EXE.SSL]LIBSSL.OLB" and if specified "[.xxx.EXE.RSAREF]LIBRSAGLUE.OLB".
  13 $! The "xxx" denotes the machine architecture of AXP or VAX.
  14 $!
  15 $! This procedures accepts two command line options listed below.
  16 $!
  17 $! Specify one of the following build options for P1.
  18 $!
  19 $!      ALL       Just build "everything".
  20 $!      CONFIG    Just build the "[.CRYPTO]OPENSSLCONF.H" file.
  21 $!      BUILDINF  Just build the "[.CRYPTO]BUILDINF.H" file.
  22 $!      SOFTLINKS Just fix the Unix soft links.
  23 $!      BUILDALL  Same as ALL, except CONFIG, BUILDINF and SOFTILNKS aren't done.
  24 $!      RSAREF    Just build the "[.xxx.EXE.RSAREF]LIBRSAGLUE.OLB" library.
  25 $!      CRYPTO    Just build the "[.xxx.EXE.CRYPTO]LIBCRYPTO.OLB" library.
  26 $!      CRYPTO/x  Just build the x part of the
  27 $!                "[.xxx.EXE.CRYPTO]LIBCRYPTO.OLB" library.
  28 $!      SSL       Just build the "[.xxx.EXE.SSL]LIBSSL.OLB" library.
  29 $!      SSL_TASK  Just build the "[.xxx.EXE.SSL]SSL_TASK.EXE" program.
  30 $!      TEST      Just build the "[.xxx.EXE.TEST]" test programs for OpenSSL.
  31 $!      APPS      Just build the "[.xxx.EXE.APPS]" application programs for OpenSSL.
  32 $!      ENGINES   Just build the "[.xxx.EXE.ENGINES]" application programs for OpenSSL.
  33 $!
  34 $!
  35 $! Specify RSAREF as P2 to compile using the RSAREF Library.
  36 $! If you specify NORSAREF, it will compile without using RSAREF.
  37 $! (If in the United States, You Must Compile Using RSAREF).
  38 $!
  39 $! Note: The RSAREF libraries are NOT INCLUDED and you have to
  40 $!       download it from "ftp://ftp.rsa.com/rsaref".  You have to
  41 $!       get the ".tar-Z" file as the ".zip" file dosen't have the
  42 $!       directory structure stored.  You have to extract the file
  43 $!       into the [.RSAREF] directory as that is where the scripts
  44 $!       will look for the files.
  45 $!
  46 $! Speficy DEBUG or NODEBUG as P3 to compile with or without debugging
  47 $! information.
  48 $!
  49 $! Specify which compiler at P4 to try to compile under.
  50 $!
  51 $!        VAXC   For VAX C.
  52 $!        DECC   For DEC C.
  53 $!        GNUC   For GNU C.
  54 $!        LINK   To only link the programs from existing object files.
  55 $!               (not yet implemented)
  56 $!
  57 $! If you don't speficy a compiler, it will try to determine which
  58 $! "C" compiler to use.
  59 $!
  60 $! P5, if defined, sets a TCP/IP library to use, through one of the following
  61 $! keywords:
  62 $!
  63 $!      UCX             for UCX or UCX emulation
  64 $!      TCPIP           for TCP/IP Services or TCP/IP Services emulation
  65 $!                      (this is prefered over UCX)
  66 $!      SOCKETSHR       for SOCKETSHR+NETLIB
  67 $!      NONE            to avoid specifying which TCP/IP implementation to
  68 $!                      use at build time (this works with DEC C).  This is
  69 $!                      the default.
  70 $!
  71 $! P6, if defined, sets a compiler thread NOT needed on OpenVMS 7.1 (and up)
  72 $!
  73 $!
  74 $! Check if we're in a batch job, and make sure we get to
  75 $! the directory this script is in
  76 $!
  77 $ IF F$MODE() .EQS. "BATCH"
  78 $ THEN
  79 $   COMNAME=F$ENVIRONMENT("PROCEDURE")
  80 $   COMPATH=F$PARSE("A.;",COMNAME) - "A.;"
  81 $   SET DEF 'COMPATH'
  82 $ ENDIF
  83 $!
  84 $! Check Which Architecture We Are Using.
  85 $!
  86 $ IF (F$GETSYI("CPU").GE.128)
  87 $ THEN
  88 $!
  89 $!  The Architecture Is AXP.
  90 $!
  91 $   ARCH := AXP
  92 $!
  93 $! Else...
  94 $!
  95 $ ELSE
  96 $!
  97 $!  The Architecture Is VAX.
  98 $!
  99 $   ARCH := VAX
 100 $!
 101 $! End The Architecture Check.
 102 $!
 103 $ ENDIF
 104 $!
 105 $! Check To Make Sure We Have Valid Command Line Parameters.
 106 $!
 107 $ GOSUB CHECK_OPTIONS
 108 $!
 109 $! Check To See What We Are To Do.
 110 $!
 111 $ IF (BUILDCOMMAND.EQS."ALL")
 112 $ THEN
 113 $!
 114 $!  Start with building the OpenSSL configuration file.
 115 $!
 116 $   GOSUB CONFIG
 117 $!
 118 $!  Create The "BUILDINF.H" Include File.
 119 $!
 120 $   GOSUB BUILDINF
 121 $!
 122 $!  Fix The Unix Softlinks.
 123 $!
 124 $   GOSUB SOFTLINKS
 125 $!
 126 $ ENDIF
 127 $!
 128 $ IF (BUILDCOMMAND.EQS."ALL".OR.BUILDCOMMAND.EQS."BUILDALL")
 129 $ THEN
 130 $!
 131 $!  Check To See If We Are Going To Be Building The
 132 $!  [.xxx.EXE.RSAREF]LIBRSAGLUE.OLB Library.
 133 $!
 134 $   IF (RSAREF.EQS."RSAREF")
 135 $   THEN
 136 $!
 137 $!    Build The [.xxx.EXE.RSAREF]LIBRSAGLUE.OLB Library.
 138 $!
 139 $     GOSUB RSAREF
 140 $!
 141 $!  End The RSAREF Check.
 142 $!
 143 $   ENDIF
 144 $!
 145 $!  Build The [.xxx.EXE.CRYPTO]LIBCRYPTO.OLB Library.
 146 $!
 147 $   GOSUB CRYPTO
 148 $!
 149 $!  Build The [.xxx.EXE.SSL]LIBSSL.OLB Library.
 150 $!
 151 $   GOSUB SSL
 152 $!
 153 $!  Build The [.xxx.EXE.SSL]SSL_TASK.EXE DECNet SSL Engine.
 154 $!
 155 $   GOSUB SSL_TASK
 156 $!
 157 $!  Build The [.xxx.EXE.TEST] OpenSSL Test Utilities.
 158 $!
 159 $   GOSUB TEST
 160 $!
 161 $!  Build The [.xxx.EXE.APPS] OpenSSL Application Utilities.
 162 $!
 163 $   GOSUB APPS
 164 $!
 165 $!  Build The [.xxx.EXE.ENGINES] OpenSSL Shareable Engines.
 166 $!
 167 $   GOSUB ENGINES
 168 $!
 169 $! Else...
 170 $!
 171 $ ELSE
 172 $!
 173 $!    Build Just What The User Wants Us To Build.
 174 $!
 175 $     GOSUB 'BUILDCOMMAND'
 176 $!
 177 $ ENDIF
 178 $!
 179 $! Time To EXIT.
 180 $!
 181 $ EXIT
 182 $!
 183 $! Rebuild The "[.CRYPTO]OPENSSLCONF.H" file.
 184 $!
 185 $ CONFIG:
 186 $!
 187 $! Tell The User We Are Creating The [.CRYPTO]OPENSSLCONF.H File.
 188 $!
 189 $ WRITE SYS$OUTPUT "Creating [.CRYPTO]OPENSSLCONF.H Include File."
 190 $!
 191 $! Create The [.CRYPTO]OPENSSLCONF.H File.
 192 $!
 193 $ OPEN/WRITE H_FILE SYS$DISK:[.CRYPTO]OPENSSLCONF.H
 194 $!
 195 $! Write The [.CRYPTO]OPENSSLCONF.H File.
 196 $!
 197 $ WRITE H_FILE "/* This file was automatically built using makevms.com */"
 198 $ WRITE H_FILE "/* and [.CRYPTO]OPENSSLCONF.H_IN */"
 199 $
 200 $!
 201 $! Write a few macros that indicate how this system was built.
 202 $!
 203 $ WRITE H_FILE ""
 204 $ WRITE H_FILE "#ifndef OPENSSL_SYS_VMS"
 205 $ WRITE H_FILE "# define OPENSSL_SYS_VMS"
 206 $ WRITE H_FILE "#endif"
 207 $ CONFIG_LOGICALS := NO_ASM,NO_RSA,NO_DSA,NO_DH,NO_MD2,NO_MD5,NO_RIPEMD,-
 208         NO_SHA,NO_SHA0,NO_SHA1,NO_DES/NO_MDC2;NO_MDC2,NO_RC2,NO_RC4,NO_RC5,-
 209         NO_IDEA,NO_BF,NO_CAST,NO_HMAC,NO_SSL2
 210 $ CONFIG_LOG_I = 0
 211 $ CONFIG_LOG_LOOP:
 212 $   CONFIG_LOG_E1 = F$ELEMENT(CONFIG_LOG_I,",",CONFIG_LOGICALS)
 213 $   CONFIG_LOG_I = CONFIG_LOG_I + 1
 214 $   IF CONFIG_LOG_E1 .EQS. "" THEN GOTO CONFIG_LOG_LOOP
 215 $   IF CONFIG_LOG_E1 .EQS. "," THEN GOTO CONFIG_LOG_LOOP_END
 216 $   CONFIG_LOG_E2 = F$EDIT(CONFIG_LOG_E1,"TRIM")
 217 $   CONFIG_LOG_E1 = F$ELEMENT(0,";",CONFIG_LOG_E2)
 218 $   CONFIG_LOG_E2 = F$ELEMENT(1,";",CONFIG_LOG_E2)
 219 $   CONFIG_LOG_E0 = F$ELEMENT(0,"/",CONFIG_LOG_E1)
 220 $   CONFIG_LOG_E1 = F$ELEMENT(1,"/",CONFIG_LOG_E1)
 221 $   IF F$TRNLNM("OPENSSL_"+CONFIG_LOG_E0)
 222 $   THEN
 223 $     WRITE H_FILE "#ifndef OPENSSL_",CONFIG_LOG_E0
 224 $     WRITE H_FILE "# define OPENSSL_",CONFIG_LOG_E0
 225 $     WRITE H_FILE "#endif"
 226 $     IF CONFIG_LOG_E1 .NES. "/"
 227 $     THEN
 228 $       WRITE H_FILE "#ifndef OPENSSL_",CONFIG_LOG_E1
 229 $       WRITE H_FILE "# define OPENSSL_",CONFIG_LOG_E1
 230 $       WRITE H_FILE "#endif"
 231 $     ENDIF
 232 $   ELSE
 233 $     IF CONFIG_LOG_E2 .NES. ";"
 234 $     THEN
 235 $       IF F$TRNLNM("OPENSSL_"+CONFIG_LOG_E2)
 236 $       THEN
 237 $         WRITE H_FILE "#ifndef OPENSSL_",CONFIG_LOG_E2
 238 $         WRITE H_FILE "# define OPENSSL_",CONFIG_LOG_E2
 239 $         WRITE H_FILE "#endif"
 240 $       ENDIF
 241 $     ENDIF
 242 $   ENDIF
 243 $   GOTO CONFIG_LOG_LOOP
 244 $ CONFIG_LOG_LOOP_END:
 245 $ WRITE H_FILE "#ifndef OPENSSL_NO_STATIC_ENGINE"
 246 $ WRITE H_FILE "# define OPENSSL_NO_STATIC_ENGINE"
 247 $ WRITE H_FILE "#endif"
 248 $ WRITE H_FILE "#ifndef OPENSSL_THREADS"
 249 $ WRITE H_FILE "# define OPENSSL_THREADS"
 250 $ WRITE H_FILE "#endif"
 251 $ WRITE H_FILE "#ifndef OPENSSL_NO_KRB5"
 252 $ WRITE H_FILE "# define OPENSSL_NO_KRB5"
 253 $ WRITE H_FILE "#endif"
 254 $ WRITE H_FILE ""
 255 $!
 256 $! Different tar version may have named the file differently
 257 $ IF F$SEARCH("[.CRYPTO]OPENSSLCONF.H_IN") .NES. ""
 258 $ THEN
 259 $   TYPE [.CRYPTO]OPENSSLCONF.H_IN /OUTPUT=H_FILE:
 260 $ ELSE
 261 $   IF F$SEARCH("[.CRYPTO]OPENSSLCONF_H.IN") .NES. ""
 262 $   THEN
 263 $     TYPE [.CRYPTO]OPENSSLCONF_H.IN /OUTPUT=H_FILE:
 264 $   ELSE
 265 $     ! For ODS-5
 266 $     IF F$SEARCH("[.CRYPTO]OPENSSLCONF.H.IN") .NES. ""
 267 $     THEN
 268 $       TYPE [.CRYPTO]OPENSSLCONF.H.IN /OUTPUT=H_FILE:
 269 $     ELSE
 270 $       WRITE SYS$ERROR "Couldn't find a [.CRYPTO]OPENSSLCONF.H_IN.  Exiting!"
 271 $       EXIT 0
 272 $     ENDIF
 273 $   ENDIF
 274 $ ENDIF
 275 $ IF ARCH .EQS. "AXP"
 276 $ THEN
 277 $!
 278 $!  Write the Alpha specific data
 279 $!
 280 $   WRITE H_FILE "#if defined(HEADER_RC4_H)"
 281 $   WRITE H_FILE "#undef RC4_INT"
 282 $   WRITE H_FILE "#define RC4_INT unsigned int"
 283 $   WRITE H_FILE "#undef RC4_CHUNK"
 284 $   WRITE H_FILE "#define RC4_CHUNK unsigned long long"
 285 $   WRITE H_FILE "#endif"
 286 $!
 287 $   WRITE H_FILE "#if defined(HEADER_DES_LOCL_H)"
 288 $   WRITE H_FILE "#undef DES_LONG"
 289 $   WRITE H_FILE "#define DES_LONG unsigned int"
 290 $   WRITE H_FILE "#undef DES_PTR"
 291 $   WRITE H_FILE "#define DES_PTR"
 292 $   WRITE H_FILE "#undef DES_RISC1"
 293 $   WRITE H_FILE "#undef DES_RISC2"
 294 $   WRITE H_FILE "#define DES_RISC1"
 295 $   WRITE H_FILE "#undef DES_UNROLL"
 296 $   WRITE H_FILE "#define DES_UNROLL"
 297 $   WRITE H_FILE "#endif"
 298 $!
 299 $   WRITE H_FILE "#if defined(HEADER_BN_H)"
 300 $   WRITE H_FILE "#undef SIXTY_FOUR_BIT_LONG"
 301 $   WRITE H_FILE "#undef SIXTY_FOUR_BIT"
 302 $   WRITE H_FILE "#define SIXTY_FOUR_BIT"
 303 $   WRITE H_FILE "#undef THIRTY_TWO_BIT"
 304 $   WRITE H_FILE "#undef SIXTEEN_BIT"
 305 $   WRITE H_FILE "#undef EIGHT_BIT"
 306 $   WRITE H_FILE "#endif"
 307 $
 308 $   WRITE H_FILE "#undef OPENSSL_EXPORT_VAR_AS_FUNCTION"
 309 $!
 310 $!  Else...
 311 $!
 312 $ ELSE
 313 $!
 314 $!  Write the VAX specific data
 315 $!
 316 $   WRITE H_FILE "#if defined(HEADER_RC4_H)"
 317 $   WRITE H_FILE "#undef RC4_INT"
 318 $   WRITE H_FILE "#define RC4_INT unsigned char"
 319 $   WRITE H_FILE "#undef RC4_CHUNK"
 320 $   WRITE H_FILE "#define RC4_CHUNK unsigned long"
 321 $   WRITE H_FILE "#endif"
 322 $!
 323 $   WRITE H_FILE "#if defined(HEADER_DES_LOCL_H)"
 324 $   WRITE H_FILE "#undef DES_LONG"
 325 $   WRITE H_FILE "#define DES_LONG unsigned long"
 326 $   WRITE H_FILE "#undef DES_PTR"
 327 $   WRITE H_FILE "#define DES_PTR"
 328 $   WRITE H_FILE "#undef DES_RISC1"
 329 $   WRITE H_FILE "#undef DES_RISC2"
 330 $   WRITE H_FILE "#undef DES_UNROLL"
 331 $   WRITE H_FILE "#endif"
 332 $!
 333 $   WRITE H_FILE "#if defined(HEADER_BN_H)"
 334 $   WRITE H_FILE "#undef SIXTY_FOUR_BIT_LONG"
 335 $   WRITE H_FILE "#undef SIXTY_FOUR_BIT"
 336 $   WRITE H_FILE "#undef THIRTY_TWO_BIT"
 337 $   WRITE H_FILE "#define THIRTY_TWO_BIT"
 338 $   WRITE H_FILE "#undef SIXTEEN_BIT"
 339 $   WRITE H_FILE "#undef EIGHT_BIT"
 340 $   WRITE H_FILE "#endif"
 341 $
 342 $   WRITE H_FILE "#undef OPENSSL_EXPORT_VAR_AS_FUNCTION"
 343 $   WRITE H_FILE "#define OPENSSL_EXPORT_VAR_AS_FUNCTION"
 344 $!
 345 $!  End
 346 $!
 347 $ ENDIF
 348 $!
 349 $! Close the [.CRYPTO]OPENSSLCONF.H file
 350 $!
 351 $ CLOSE H_FILE
 352 $!
 353 $! That's All, Time To RETURN.
 354 $!
 355 $ RETURN
 356 $!
 357 $! Rebuild The "[.CRYPTO]BUILDINF.H" file.
 358 $!
 359 $ BUILDINF:
 360 $!
 361 $! Tell The User We Are Creating The [.CRYPTO]BUILDINF.H File.
 362 $!
 363 $ WRITE SYS$OUTPUT "Creating [.CRYPTO]BUILDINF.H Include File."
 364 $!
 365 $! Create The [.CRYPTO]BUILDINF.H File.
 366 $!
 367 $ OPEN/WRITE H_FILE SYS$DISK:[.CRYPTO]BUILDINF.H
 368 $!
 369 $! Get The Current Date & Time.
 370 $!
 371 $ TIME = F$TIME()
 372 $!
 373 $! Write The [.CRYPTO]BUILDINF.H File.
 374 $!
 375 $ WRITE H_FILE "#define CFLAGS """" /* Not filled in for now */"
 376 $ WRITE H_FILE "#define PLATFORM ""VMS"""
 377 $ WRITE H_FILE "#define DATE ""''TIME'"" "
 378 $!
 379 $! Close The [.CRYPTO]BUILDINF.H File.
 380 $!
 381 $ CLOSE H_FILE
 382 $!
 383 $! That's All, Time To RETURN.
 384 $!
 385 $ RETURN
 386 $!
 387 $! Copy a lot of files around.
 388 $!
 389 $ SOFTLINKS:
 390 $!
 391 $! Tell The User We Are Partly Rebuilding The [.TEST] Directory.
 392 $!
 393 $ WRITE SYS$OUTPUT "Rebuilding The '[.APPS]MD4.C', '[.APPS]MD5.C' And '[.APPS]RMD160.C' Files."
 394 $!
 395 $ DELETE SYS$DISK:[.APPS]MD4.C;*,MD5.C;*,RMD160.C;*
 396 $!
 397 $! Copy MD4.C from [.CRYPTO.MD4] into [.APPS]
 398 $!
 399 $ COPY SYS$DISK:[.CRYPTO.MD4]MD4.C SYS$DISK:[.APPS]
 400 $!
 401 $! Copy MD5.C from [.CRYPTO.MD5] into [.APPS]
 402 $!
 403 $ COPY SYS$DISK:[.CRYPTO.MD5]MD5.C SYS$DISK:[.APPS]
 404 $!
 405 $! Copy RMD160.C from [.CRYPTO.RIPEMD] into [.APPS]
 406 $!
 407 $ COPY SYS$DISK:[.CRYPTO.RIPEMD]RMD160.C SYS$DISK:[.APPS]
 408 $!
 409 $! Tell The User We Are Partly Rebuilding The [.TEST] Directory.
 410 $!
 411 $ WRITE SYS$OUTPUT "Rebuilding The '[.TEST]*.C' Files."
 412 $!
 413 $! First, We Have To "Rebuild" The "[.TEST]" Directory, So Delete
 414 $! All The "C" Files That Are Currently There Now.
 415 $!
 416 $ DELETE SYS$DISK:[.TEST]*.C;*
 417 $ DELETE SYS$DISK:[.TEST]EVPTESTS.TXT;*
 418 $!
 419 $! Copy all the *TEST.C files from [.CRYPTO...] into [.TEST]
 420 $!
 421 $ COPY SYS$DISK:[.CRYPTO.*]%*TEST.C SYS$DISK:[.TEST]
 422 $ COPY SYS$DISK:[.CRYPTO.EVP]EVPTESTS.TXT SYS$DISK:[.TEST]
 423 $!
 424 $! Copy all the *TEST.C files from [.SSL...] into [.TEST]
 425 $!
 426 $ COPY SYS$DISK:[.SSL]%*TEST.C SYS$DISK:[.TEST]
 427 $!
 428 $! Tell The User We Are Rebuilding The [.INCLUDE.OPENSSL] Directory.
 429 $!
 430 $ WRITE SYS$OUTPUT "Rebuilding The '[.INCLUDE.OPENSSL]' Directory."
 431 $!
 432 $! First, make sure the directory exists
 433 $!
 434 $ IF F$PARSE("SYS$DISK:[.INCLUDE.OPENSSL]") .EQS. "" THEN -
 435      CREATE/DIRECTORY SYS$DISK:[.INCLUDE.OPENSSL]
 436 $!
 437 $! Copy All The ".H" Files From The Main Directory.
 438 $!
 439 $ EXHEADER := e_os2.h
 440 $ COPY 'EXHEADER' SYS$DISK:[.INCLUDE.OPENSSL]
 441 $!
 442 $! Copy All The ".H" Files From The [.CRYPTO] Directory Tree.
 443 $!
 444 $ SDIRS := ,MD2,MD4,MD5,SHA,MDC2,HMAC,RIPEMD,-
 445    DES,RC2,RC4,RC5,IDEA,BF,CAST,-
 446    BN,EC,RSA,DSA,ECDSA,DH,ECDH,DSO,ENGINE,AES,-
 447    BUFFER,BIO,STACK,LHASH,RAND,ERR,OBJECTS,-
 448    EVP,ASN1,PEM,X509,X509V3,CONF,TXT_DB,PKCS7,PKCS12,COMP,OCSP,UI,KRB5
 449 $ EXHEADER_ := crypto.h,tmdiff.h,opensslv.h,opensslconf.h,ebcdic.h,symhacks.h,-
 450                 ossl_typ.h
 451 $ EXHEADER_MD2 := md2.h
 452 $ EXHEADER_MD4 := md4.h
 453 $ EXHEADER_MD5 := md5.h
 454 $ EXHEADER_SHA := sha.h
 455 $ EXHEADER_MDC2 := mdc2.h
 456 $ EXHEADER_HMAC := hmac.h
 457 $ EXHEADER_RIPEMD := ripemd.h
 458 $ EXHEADER_DES := des.h,des_old.h
 459 $ EXHEADER_RC2 := rc2.h
 460 $ EXHEADER_RC4 := rc4.h
 461 $ EXHEADER_RC5 := rc5.h
 462 $ EXHEADER_IDEA := idea.h
 463 $ EXHEADER_BF := blowfish.h
 464 $ EXHEADER_CAST := cast.h
 465 $ EXHEADER_BN := bn.h
 466 $ EXHEADER_EC := ec.h
 467 $ EXHEADER_RSA := rsa.h
 468 $ EXHEADER_DSA := dsa.h
 469 $ EXHEADER_ECDSA := ecdsa.h
 470 $ EXHEADER_DH := dh.h
 471 $ EXHEADER_ECDH := ecdh.h
 472 $ EXHEADER_DSO := dso.h
 473 $ EXHEADER_ENGINE := engine.h
 474 $ EXHEADER_AES := aes.h
 475 $ EXHEADER_BUFFER := buffer.h
 476 $ EXHEADER_BIO := bio.h
 477 $ EXHEADER_STACK := stack.h,safestack.h
 478 $ EXHEADER_LHASH := lhash.h
 479 $ EXHEADER_RAND := rand.h
 480 $ EXHEADER_ERR := err.h
 481 $ EXHEADER_OBJECTS := objects.h,obj_mac.h
 482 $ EXHEADER_EVP := evp.h
 483 $ EXHEADER_ASN1 := asn1.h,asn1_mac.h,asn1t.h
 484 $ EXHEADER_PEM := pem.h,pem2.h
 485 $ EXHEADER_X509 := x509.h,x509_vfy.h
 486 $ EXHEADER_X509V3 := x509v3.h
 487 $ EXHEADER_CONF := conf.h,conf_api.h
 488 $ EXHEADER_TXT_DB := txt_db.h
 489 $ EXHEADER_PKCS7 := pkcs7.h
 490 $ EXHEADER_PKCS12 := pkcs12.h
 491 $ EXHEADER_COMP := comp.h
 492 $ EXHEADER_OCSP := ocsp.h
 493 $ EXHEADER_UI := ui.h,ui_compat.h
 494 $ EXHEADER_KRB5 := krb5_asn.h
 495 $
 496 $ I = 0
 497 $ LOOP_SDIRS:
 498 $ D = F$EDIT(F$ELEMENT(I, ",", SDIRS),"TRIM")
 499 $ I = I + 1
 500 $ IF D .EQS. "," THEN GOTO LOOP_SDIRS_END
 501 $ tmp = EXHEADER_'D'
 502 $ IF D .EQS. ""
 503 $ THEN
 504 $   COPY [.CRYPTO]'tmp' SYS$DISK:[.INCLUDE.OPENSSL] !/LOG
 505 $ ELSE
 506 $   COPY [.CRYPTO.'D']'tmp' SYS$DISK:[.INCLUDE.OPENSSL] !/LOG
 507 $ ENDIF
 508 $ GOTO LOOP_SDIRS
 509 $ LOOP_SDIRS_END:
 510 $!
 511 $! Copy All The ".H" Files From The [.RSAREF] Directory.
 512 $!
 513 $! EXHEADER := rsaref.h
 514 $! COPY SYS$DISK:[.RSAREF]'EXHEADER' SYS$DISK:[.INCLUDE.OPENSSL]
 515 $!
 516 $! Copy All The ".H" Files From The [.SSL] Directory.
 517 $!
 518 $ EXHEADER := ssl.h,ssl2.h,ssl3.h,ssl23.h,tls1.h,kssl.h
 519 $ COPY SYS$DISK:[.SSL]'EXHEADER' SYS$DISK:[.INCLUDE.OPENSSL]
 520 $!
 521 $! Purge all doubles
 522 $!
 523 $ PURGE SYS$DISK:[.INCLUDE.OPENSSL]*.H
 524 $!
 525 $! That's All, Time To RETURN.
 526 $!
 527 $ RETURN
 528 $!
 529 $! Build The "[.xxx.EXE.CRYPTO]LIBCRYPTO.OLB" Library.
 530 $!
 531 $ CRYPTO:
 532 $!
 533 $! Tell The User What We Are Doing.
 534 $!
 535 $ WRITE SYS$OUTPUT ""
 536 $ WRITE SYS$OUTPUT "Building The [.",ARCH,".EXE.CRYPTO]LIBCRYPTO.OLB Library."
 537 $!
 538 $! Go To The [.CRYPTO] Directory.
 539 $!
 540 $ SET DEFAULT SYS$DISK:[.CRYPTO]
 541 $!
 542 $! Build The [.xxx.EXE.CRYPTO]LIBCRYPTO.OLB Library.
 543 $!
 544 $ @CRYPTO-LIB LIBRARY 'RSAREF' 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" "''ISSEVEN'" "''BUILDPART'"
 545 $!
 546 $! Build The [.xxx.EXE.CRYPTO]*.EXE Test Applications.
 547 $!
 548 $ @CRYPTO-LIB APPS 'RSAREF' 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" 'ISSEVEN' "''BUILDPART'"
 549 $!
 550 $! Go Back To The Main Directory.
 551 $!
 552 $ SET DEFAULT [-]
 553 $!
 554 $! Time To RETURN.
 555 $!
 556 $ RETURN
 557 $!
 558 $! Build The [.xxx.EXE.RSAREF]LIBRSAGLUE Library.
 559 $!
 560 $ RSAREF:
 561 $ WRITE SYS$OUTPUT ""
 562 $ WRITE SYS$OUTPUT "RSAref glue library not built, since it's no longer needed"
 563 $ RETURN
 564 $!
 565 $! Tell The User What We Are Doing.
 566 $!
 567 $ WRITE SYS$OUTPUT ""
 568 $ WRITE SYS$OUTPUT "Building The [.",ARCH,".EXE.RSAREF]LIBRSAGLUE.OLB Library."
 569 $!
 570 $! Go To The [.RSAREF] Directory.
 571 $!
 572 $ SET DEFAULT SYS$DISK:[.RSAREF]
 573 $!
 574 $! Build The [.xxx.EXE.RSAREF]LIBRSAGLUE.OLB Library.
 575 $!
 576 $ @RSAREF-LIB LIBRARY 'DEBUGGER' "''COMPILER'" 'ISSEVEN'
 577 $!
 578 $! Go Back To The Main Directory.
 579 $!
 580 $ SET DEFAULT [-]
 581 $!
 582 $! Time To Return.
 583 $!
 584 $ RETURN
 585 $!
 586 $! Build The "[.xxx.EXE.SSL]LIBSSL.OLB" Library.
 587 $!
 588 $ SSL:
 589 $!
 590 $! Tell The User What We Are Doing.
 591 $!
 592 $ WRITE SYS$OUTPUT ""
 593 $ WRITE SYS$OUTPUT "Building The [.",ARCH,".EXE.SSL]LIBSSL.OLB Library."
 594 $!
 595 $! Go To The [.SSL] Directory.
 596 $!
 597 $ SET DEFAULT SYS$DISK:[.SSL]
 598 $!
 599 $! Build The [.xxx.EXE.SSL]LIBSSL.OLB Library.
 600 $!
 601 $ @SSL-LIB LIBRARY 'RSAREF' 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" 'ISSEVEN'
 602 $!
 603 $! Go Back To The Main Directory.
 604 $!
 605 $ SET DEFAULT [-]
 606 $!
 607 $! Time To Return.
 608 $!
 609 $ RETURN
 610 $!
 611 $! Build The "[.xxx.EXE.SSL]SSL_TASK.EXE" Program.
 612 $!
 613 $ SSL_TASK:
 614 $!
 615 $! Tell The User What We Are Doing.
 616 $!
 617 $ WRITE SYS$OUTPUT ""
 618 $ WRITE SYS$OUTPUT "Building DECNet Based SSL Engine, [.",ARCH,".EXE.SSL]SSL_TASK.EXE"
 619 $!
 620 $! Go To The [.SSL] Directory.
 621 $!
 622 $ SET DEFAULT SYS$DISK:[.SSL]
 623 $!
 624 $! Build The [.xxx.EXE.SSL]SSL_TASK.EXE
 625 $!
 626 $ @SSL-LIB SSL_TASK 'RSAREF' 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" 'ISSEVEN'
 627 $!
 628 $! Go Back To The Main Directory.
 629 $!
 630 $ SET DEFAULT [-]
 631 $!
 632 $! That's All, Time To RETURN.
 633 $!
 634 $ RETURN
 635 $!
 636 $! Build The OpenSSL Test Programs.
 637 $!
 638 $ TEST:
 639 $!
 640 $! Tell The User What We Are Doing.
 641 $!
 642 $ WRITE SYS$OUTPUT ""
 643 $ WRITE SYS$OUTPUT "Building The OpenSSL [.",ARCH,".EXE.TEST] Test Utilities."
 644 $!
 645 $! Go To The [.TEST] Directory.
 646 $!
 647 $ SET DEFAULT SYS$DISK:[.TEST]
 648 $!
 649 $! Build The Test Programs.
 650 $!
 651 $ @MAKETESTS 'RSAREF' 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" 'ISSEVEN'
 652 $!
 653 $! Go Back To The Main Directory.
 654 $!
 655 $ SET DEFAULT [-]
 656 $!
 657 $! That's All, Time To RETURN.
 658 $!
 659 $ RETURN
 660 $!
 661 $! Build The OpenSSL Application Programs.
 662 $!
 663 $ APPS:
 664 $!
 665 $! Tell The User What We Are Doing.
 666 $!
 667 $ WRITE SYS$OUTPUT ""
 668 $ WRITE SYS$OUTPUT "Building OpenSSL [.",ARCH,".EXE.APPS] Applications."
 669 $!
 670 $! Go To The [.APPS] Directory.
 671 $!
 672 $ SET DEFAULT SYS$DISK:[.APPS]
 673 $!
 674 $! Build The Application Programs.
 675 $!
 676 $ @MAKEAPPS 'RSAREF' 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" 'ISSEVEN'
 677 $!
 678 $! Go Back To The Main Directory.
 679 $!
 680 $ SET DEFAULT [-]
 681 $!
 682 $! That's All, Time To RETURN.
 683 $!
 684 $ RETURN
 685 $!
 686 $! Build The OpenSSL Application Programs.
 687 $!
 688 $ ENGINES:
 689 $!
 690 $! Tell The User What We Are Doing.
 691 $!
 692 $ WRITE SYS$OUTPUT ""
 693 $ WRITE SYS$OUTPUT "Building OpenSSL [.",ARCH,".EXE.ENGINES] Engines."
 694 $!
 695 $! Go To The [.ENGINES] Directory.
 696 $!
 697 $ SET DEFAULT SYS$DISK:[.ENGINES]
 698 $!
 699 $! Build The Application Programs.
 700 $!
 701 $ @MAKEENGINES ENGINES 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" 'ISSEVEN' "''BUILDPART'"
 702 $!
 703 $! Go Back To The Main Directory.
 704 $!
 705 $ SET DEFAULT [-]
 706 $!
 707 $! That's All, Time To RETURN.
 708 $!
 709 $ RETURN
 710 $!
 711 $! Check The User's Options.
 712 $!
 713 $ CHECK_OPTIONS:
 714 $!
 715 $! Check if there's a "part", and separate it out
 716 $!
 717 $ BUILDPART = F$ELEMENT(1,"/",P1)
 718 $ IF BUILDPART .EQS. "/"
 719 $ THEN
 720 $   BUILDPART = ""
 721 $ ELSE
 722 $   P1 = F$EXTRACT(0,F$LENGTH(P1) - F$LENGTH(BUILDPART) - 1, P1)
 723 $ ENDIF
 724 $!
 725 $! Check To See If P1 Is Blank.
 726 $!
 727 $ IF (P1.EQS."ALL")
 728 $ THEN
 729 $!
 730 $!   P1 Is ALL, So Build Everything.
 731 $!
 732 $    BUILDCOMMAND = "ALL"
 733 $!
 734 $! Else...
 735 $!
 736 $ ELSE
 737 $!
 738 $!  Else, Check To See If P1 Has A Valid Arguement.
 739 $!
 740 $   IF (P1.EQS."CONFIG").OR.(P1.EQS."BUILDINF").OR.(P1.EQS."SOFTLINKS") -
 741        .OR.(P1.EQS."BUILDALL") -
 742        .OR.(P1.EQS."CRYPTO").OR.(P1.EQS."SSL").OR.(P1.EQS."RSAREF") -
 743        .OR.(P1.EQS."SSL_TASK").OR.(P1.EQS."TEST").OR.(P1.EQS."APPS")
 744 $   THEN
 745 $!
 746 $!    A Valid Arguement.
 747 $!
 748 $     BUILDCOMMAND = P1
 749 $!
 750 $!  Else...
 751 $!
 752 $   ELSE
 753 $!
 754 $!    Tell The User We Don't Know What They Want.
 755 $!
 756 $     WRITE SYS$OUTPUT ""
 757 $     WRITE SYS$OUTPUT "The Option ",P1," Is Invalid.  The Valid Options Are:"
 758 $     WRITE SYS$OUTPUT ""
 759 $     WRITE SYS$OUTPUT "    ALL      :  Just Build Everything."
 760 $     WRITE SYS$OUTPUT "    CONFIG   :  Just build the [.CRYPTO]OPENSSLCONF.H file."
 761 $     WRITE SYS$OUTPUT "    BUILDINF :  Just build the [.CRYPTO]BUILDINF.H file."
 762 $     WRITE SYS$OUTPUT "    SOFTLINKS:  Just Fix The Unix soft links."
 763 $     WRITE SYS$OUTPUT "    BUILDALL :  Same as ALL, except CONFIG, BUILDINF and SOFTILNKS aren't done."
 764 $     WRITE SYS$OUTPUT "    CRYPTO   :  To Build Just The [.xxx.EXE.CRYPTO]LIBCRYPTO.OLB Library."
 765 $     WRITE SYS$OUTPUT "    CRYPTO/x :  To Build Just The x Part Of The"
 766 $     WRITE SYS$OUTPUT "                [.xxx.EXE.CRYPTO]LIBCRYPTO.OLB Library."
 767 $     WRITE SYS$OUTPUT "    SSL      :  To Build Just The [.xxx.EXE.SSL]LIBSSL.OLB Library."
 768 $     WRITE SYS$OUTPUT "    SSL_TASK :  To Build Just The [.xxx.EXE.SSL]SSL_TASK.EXE Program."
 769 $     WRITE SYS$OUTPUT "    TEST     :  To Build Just The OpenSSL Test Programs."
 770 $     WRITE SYS$OUTPUT "    APPS     :  To Build Just The OpenSSL Application Programs."
 771 $     WRITE SYS$OUTPUT ""
 772 $     WRITE SYS$OUTPUT " Where 'xxx' Stands For:"
 773 $     WRITE SYS$OUTPUT ""
 774 $     WRITE SYS$OUTPUT "        AXP  :  Alpha Architecture."
 775 $     WRITE SYS$OUTPUT "        VAX  :  VAX Architecture."
 776 $     WRITE SYS$OUTPUT ""
 777 $!
 778 $!    Time To EXIT.
 779 $!
 780 $     EXIT
 781 $!
 782 $!  End The Valid Argument Check.
 783 $!
 784 $   ENDIF
 785 $!
 786 $! End The P1 Check.
 787 $!
 788 $ ENDIF
 789 $!
 790 $! Check To See If P2 Is Blank.
 791 $!
 792 $ P2 = "NORSAREF"
 793 $ IF (P2.EQS."NORSAREF")
 794 $ THEN
 795 $!
 796 $!   P2 Is NORSAREF, So Compile Without RSAREF.
 797 $!
 798 $    RSAREF = "NORSAREF"
 799 $!
 800 $! Else...
 801 $!
 802 $ ELSE
 803 $!
 804 $!  Check To See If We Are To Compile Using The RSAREF Library.
 805 $!
 806 $   IF (P2.EQS."RSAREF")
 807 $   THEN
 808 $!
 809 $!    Compile With RSAREF Library.
 810 $!
 811 $     RSAREF = "RSAREF"
 812 $!
 813 $!  Else...
 814 $!
 815 $   ELSE
 816 $!
 817 $!    Tell The User Entered An Invalid Option..
 818 $!
 819 $     WRITE SYS$OUTPUT ""
 820 $     WRITE SYS$OUTPUT "The Option ",P2," Is Invalid.  The Valid Options Are:"
 821 $     WRITE SYS$OUTPUT ""
 822 $     WRITE SYS$OUTPUT "    RSAREF   :  To Compile With The RSAREF Library."
 823 $     WRITE SYS$OUTPUT "    NORSAREF :  To Compile With The Regular RSA Library."
 824 $     WRITE SYS$OUTPUT ""
 825 $!
 826 $!    Time To EXIT.
 827 $!
 828 $     EXIT
 829 $!
 830 $!  End The Valid Arguemnt Check.
 831 $!
 832 $   ENDIF
 833 $!
 834 $! End The P2 Check.
 835 $!
 836 $ ENDIF
 837 $!
 838 $! Check To See If P3 Is Blank.
 839 $!
 840 $ IF (P3.EQS."NODEBUG")
 841 $ THEN
 842 $!
 843 $!   P3 Is NODEBUG, So Compile Without Debugger Information.
 844 $!
 845 $    DEBUGGER = "NODEBUG"
 846 $!
 847 $! Else...
 848 $!
 849 $ ELSE
 850 $!
 851 $!  Check To See If We Are To Compile With Debugger Information.
 852 $!
 853 $   IF (P3.EQS."DEBUG")
 854 $   THEN
 855 $!
 856 $!    Compile With Debugger Information.
 857 $!
 858 $     DEBUGGER = "DEBUG"
 859 $!
 860 $!  Else...
 861 $!
 862 $   ELSE
 863 $!
 864 $!    Tell The User Entered An Invalid Option..
 865 $!
 866 $     WRITE SYS$OUTPUT ""
 867 $     WRITE SYS$OUTPUT "The Option ",P3," Is Invalid.  The Valid Options Are:"
 868 $     WRITE SYS$OUTPUT ""
 869 $     WRITE SYS$OUTPUT "    DEBUG    :  Compile With The Debugger Information."
 870 $     WRITE SYS$OUTPUT "    NODEBUG  :  Compile Without The Debugger Information."
 871 $     WRITE SYS$OUTPUT ""
 872 $!
 873 $!    Time To EXIT.
 874 $!
 875 $     EXIT
 876 $!
 877 $!  End The Valid Arguement Check.
 878 $!
 879 $   ENDIF
 880 $!
 881 $! End The P3 Check.
 882 $!
 883 $ ENDIF
 884 $!
 885 $! Check To See If P4 Is Blank.
 886 $!
 887 $ IF (P4.EQS."")
 888 $ THEN
 889 $!
 890 $!  O.K., The User Didn't Specify A Compiler, Let's Try To
 891 $!  Find Out Which One To Use.
 892 $!
 893 $!  Check To See If We Have GNU C.
 894 $!
 895 $   IF (F$TRNLNM("GNU_CC").NES."")
 896 $   THEN
 897 $!
 898 $!    Looks Like GNUC, Set To Use GNUC.
 899 $!
 900 $     COMPILER = "GNUC"
 901 $!
 902 $!    Tell The User We Are Using GNUC.
 903 $!
 904 $     WRITE SYS$OUTPUT "Using GNU 'C' Compiler."
 905 $!
 906 $!  End The GNU C Compiler Check.
 907 $!
 908 $   ENDIF
 909 $!
 910 $!  Check To See If We Have VAXC Or DECC.
 911 $!
 912 $   IF (F$GETSYI("CPU").GE.128).OR.(F$TRNLNM("DECC$CC_DEFAULT").EQS."/DECC")
 913 $   THEN
 914 $!
 915 $!    Looks Like DECC, Set To Use DECC.
 916 $!
 917 $     COMPILER = "DECC"
 918 $!
 919 $!    Tell The User We Are Using DECC.
 920 $!
 921 $     WRITE SYS$OUTPUT "Using DECC 'C' Compiler."
 922 $!
 923 $!  Else...
 924 $!
 925 $   ELSE
 926 $!
 927 $!    Looks Like VAXC, Set To Use VAXC.
 928 $!
 929 $     COMPILER = "VAXC"
 930 $!
 931 $!    Tell The User We Are Using VAX C.
 932 $!
 933 $     WRITE SYS$OUTPUT "Using VAXC 'C' Compiler."
 934 $!
 935 $!  End The DECC & VAXC Compiler Check.
 936 $!
 937 $   ENDIF
 938 $!
 939 $! Else...
 940 $!
 941 $ ELSE
 942 $!
 943 $!  Check To See If The User Entered A Valid Paramter.
 944 $!
 945 $   IF (P4.EQS."VAXC").OR.(P4.EQS."DECC").OR.(P4.EQS."GNUC")!.OR.(P4.EQS."LINK")
 946 $   THEN
 947 $!
 948 $!    Check To See If The User Wanted To Just LINK.
 949 $!
 950 $     IF (P4.EQS."LINK")
 951 $     THEN
 952 $!
 953 $!      Looks Like LINK-only
 954 $!
 955 $       COMPILER = "LINK"
 956 $!
 957 $!      Tell The User We Are Only Linking.
 958 $!
 959 $       WRITE SYS$OUTPUT "LINK Only.  This actually NOT YET SUPPORTED!"
 960 $!
 961 $!    End LINK Check.
 962 $!
 963 $     ENDIF
 964 $!
 965 $!    Check To See If The User Wanted DECC.
 966 $!
 967 $     IF (P4.EQS."DECC")
 968 $     THEN
 969 $!
 970 $!      Looks Like DECC, Set To Use DECC.
 971 $!
 972 $       COMPILER = "DECC"
 973 $!
 974 $!      Tell The User We Are Using DECC.
 975 $!
 976 $       WRITE SYS$OUTPUT "Using DECC 'C' Compiler."
 977 $!
 978 $!    End DECC Check.
 979 $!
 980 $     ENDIF
 981 $!
 982 $!    Check To See If We Are To Use VAXC.
 983 $!
 984 $     IF (P4.EQS."VAXC")
 985 $     THEN
 986 $!
 987 $!      Looks Like VAXC, Set To Use VAXC.
 988 $!
 989 $       COMPILER = "VAXC"
 990 $!
 991 $!      Tell The User We Are Using VAX C.
 992 $!
 993 $       WRITE SYS$OUTPUT "Using VAXC 'C' Compiler."
 994 $!
 995 $!    End VAXC Check
 996 $!
 997 $     ENDIF
 998 $!
 999 $!    Check To See If We Are To Use GNU C.
1000 $!
1001 $     IF (P4.EQS."GNUC")
1002 $     THEN
1003 $!
1004 $!      Looks Like GNUC, Set To Use GNUC.
1005 $!
1006 $       COMPILER = "GNUC"
1007 $!
1008 $!      Tell The User We Are Using GNUC.
1009 $!
1010 $       WRITE SYS$OUTPUT "Using GNU 'C' Compiler."
1011 $!
1012 $!    End The GNU C Check.
1013 $!
1014 $     ENDIF
1015 $!
1016 $!  Else The User Entered An Invalid Arguement.
1017 $!
1018 $   ELSE
1019 $!
1020 $!    Tell The User We Don't Know What They Want.
1021 $!
1022 $     WRITE SYS$OUTPUT ""
1023 $     WRITE SYS$OUTPUT "The Option ",P4," Is Invalid.  The Valid Options Are:"
1024 $     WRITE SYS$OUTPUT ""
1025 $     WRITE SYS$OUTPUT "    VAXC  :  To Compile With VAX C."
1026 $     WRITE SYS$OUTPUT "    DECC  :  To Compile With DEC C."
1027 $     WRITE SYS$OUTPUT "    GNUC  :  To Compile With GNU C."
1028 $     WRITE SYS$OUTPUT ""
1029 $!
1030 $!    Time To EXIT.
1031 $!
1032 $     EXIT
1033 $!
1034 $!  End The Valid Arguement Check.
1035 $!
1036 $   ENDIF
1037 $!
1038 $! End The P4 Check.
1039 $!
1040 $ ENDIF
1041 $!
1042 $! Time to check the contents of P5, and to make sure we get the correct library.
1043 $!
1044 $ IF P5.EQS."SOCKETSHR" .OR. P5.EQS."MULTINET" .OR. P5.EQS."UCX" -
1045      .OR. P5.EQS."TCPIP" .OR. P5.EQS."NONE"
1046 $ THEN
1047 $!
1048 $!  Check to see if SOCKETSHR was chosen
1049 $!
1050 $   IF P5.EQS."SOCKETSHR"
1051 $   THEN
1052 $!
1053 $!    Set the library to use SOCKETSHR
1054 $!
1055 $     TCPIP_LIB = "SYS$DISK:[-.VMS]SOCKETSHR_SHR.OPT/OPT"
1056 $!
1057 $!    Tell the user
1058 $!
1059 $     WRITE SYS$OUTPUT "Using SOCKETSHR for TCP/IP"
1060 $!
1061 $!    Done with SOCKETSHR
1062 $!
1063 $   ENDIF
1064 $!
1065 $!  Check to see if MULTINET was chosen
1066 $!
1067 $   IF P5.EQS."MULTINET"
1068 $   THEN
1069 $!
1070 $!    Set the library to use UCX emulation.
1071 $!
1072 $     P5 = "UCX"
1073 $!
1074 $!    Tell the user
1075 $!
1076 $     WRITE SYS$OUTPUT "Using MultiNet via UCX emulation for TCP/IP"
1077 $!
1078 $!    Done with MULTINET
1079 $!
1080 $   ENDIF
1081 $!
1082 $!  Check to see if UCX was chosen
1083 $!
1084 $   IF P5.EQS."UCX"
1085 $   THEN
1086 $!
1087 $!    Set the library to use UCX.
1088 $!
1089 $     TCPIP_LIB = "SYS$DISK:[-.VMS]UCX_SHR_DECC.OPT/OPT"
1090 $!
1091 $!    Tell the user
1092 $!
1093 $     WRITE SYS$OUTPUT "Using UCX or an emulation thereof for TCP/IP"
1094 $!
1095 $!    Done with UCX
1096 $!
1097 $   ENDIF
1098 $!
1099 $!  Check to see if TCPIP was chosen
1100 $!
1101 $   IF P5.EQS."TCPIP"
1102 $   THEN
1103 $!
1104 $!    Set the library to use TCPIP (post UCX).
1105 $!
1106 $     TCPIP_LIB = "SYS$DISK:[-.VMS]TCPIP_SHR_DECC.OPT/OPT"
1107 $!
1108 $!    Tell the user
1109 $!
1110 $     WRITE SYS$OUTPUT "Using TCPIP (post UCX) for TCP/IP"
1111 $!
1112 $!    Done with TCPIP
1113 $!
1114 $   ENDIF
1115 $!
1116 $!  Check to see if NONE was chosen
1117 $!
1118 $   IF P5.EQS."NONE"
1119 $   THEN
1120 $!
1121 $!    Do not use a TCPIP library.
1122 $!
1123 $     TCPIP_LIB = ""
1124 $!
1125 $!    Tell the user
1126 $!
1127 $     WRITE SYS$OUTPUT "A specific TCPIP library will not be used."
1128 $!
1129 $!    Done with NONE.
1130 $!
1131 $   ENDIF
1132 $!
1133 $!  Set the TCPIP_TYPE symbol
1134 $!
1135 $   TCPIP_TYPE = P5
1136 $!
1137 $!  Print info
1138 $!
1139 $   WRITE SYS$OUTPUT "TCP/IP library spec: ", TCPIP_LIB
1140 $!
1141 $!  Else The User Entered An Invalid Arguement.
1142 $!
1143 $ ELSE
1144 $   IF P5 .NES. ""
1145 $   THEN
1146 $!
1147 $!    Tell The User We Don't Know What They Want.
1148 $!
1149 $     WRITE SYS$OUTPUT ""
1150 $     WRITE SYS$OUTPUT "The Option ",P5," Is Invalid.  The Valid Options Are:"
1151 $     WRITE SYS$OUTPUT ""
1152 $     WRITE SYS$OUTPUT "    SOCKETSHR  :  To link with SOCKETSHR TCP/IP library."
1153 $     WRITE SYS$OUTPUT "    UCX        :  To link with UCX TCP/IP library."
1154 $     WRITE SYS$OUTPUT "    TCPIP      :  To link with TCPIP TCP/IP (post UCX) library."
1155 $     WRITE SYS$OUTPUT "    NONE       :  To not link with a specific TCP/IP library."
1156 $     WRITE SYS$OUTPUT ""
1157 $!
1158 $!    Time To EXIT.
1159 $!
1160 $     EXIT
1161 $   ELSE
1162 $!
1163 $! If TCPIP is not defined, then hardcode it to make
1164 $! it clear that no TCPIP is desired.
1165 $!
1166 $     IF P5 .EQS. ""
1167 $     THEN
1168 $       TCPIP_LIB = ""
1169 $       TCPIP_TYPE = "NONE"
1170 $     ELSE
1171 $!
1172 $!    Set the TCPIP_TYPE symbol
1173 $!
1174 $       TCPIP_TYPE = P5
1175 $     ENDIF
1176 $   ENDIF
1177 $!
1178 $!  Done with TCP/IP libraries
1179 $!
1180 $ ENDIF
1181 $!
1182 $! Special Threads For OpenVMS v7.1 Or Later
1183 $!
1184 $! Written By:  Richard Levitte
1185 $!              richard@levitte.org
1186 $!
1187 $!
1188 $! Check To See If We Have A Option For P6.
1189 $!
1190 $ IF (P6.EQS."")
1191 $ THEN
1192 $!
1193 $!  Get The Version Of VMS We Are Using.
1194 $!
1195 $   ISSEVEN :=
1196 $   TMP = F$ELEMENT(0,"-",F$EXTRACT(1,4,F$GETSYI("VERSION")))
1197 $   TMP = F$INTEGER(F$ELEMENT(0,".",TMP)+F$ELEMENT(1,".",TMP))
1198 $!
1199 $!  Check To See If The VMS Version Is v7.1 Or Later.
1200 $!
1201 $   IF (TMP.GE.71)
1202 $   THEN
1203 $!
1204 $!    We Have OpenVMS v7.1 Or Later, So Use The Special Threads.
1205 $!
1206 $     ISSEVEN := ,PTHREAD_USE_D4
1207 $!
1208 $!  End The VMS Version Check.
1209 $!
1210 $   ENDIF
1211 $!
1212 $! End The P6 Check.
1213 $!
1214 $ ENDIF
1215 $!
1216 $!  Time To RETURN...
1217 $!
1218 $ RETURN