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