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