xref: /minix3/crypto/external/bsd/openssl/dist/crypto/install-crypto.com (revision 0a6a1f1d05b60e214de2f05a7310ddd1f0e590e7)
1ebfedea0SLionel Sambuc$! INSTALL.COM -- Installs the files in a given directory tree
2ebfedea0SLionel Sambuc$!
3ebfedea0SLionel Sambuc$! Author: Richard Levitte <richard@levitte.org>
4ebfedea0SLionel Sambuc$! Time of creation: 22-MAY-1998 10:13
5ebfedea0SLionel Sambuc$!
6ebfedea0SLionel Sambuc$! Changes by Zoltan Arpadffy <zoli@polarhome.com>
7ebfedea0SLionel Sambuc$!
8ebfedea0SLionel Sambuc$! P1  root of the directory tree
9ebfedea0SLionel Sambuc$! P2  "64" for 64-bit pointers.
10ebfedea0SLionel Sambuc$!
11ebfedea0SLionel Sambuc$!
12ebfedea0SLionel Sambuc$! Announce/identify.
13ebfedea0SLionel Sambuc$!
14ebfedea0SLionel Sambuc$ proc = f$environment( "procedure")
15ebfedea0SLionel Sambuc$ write sys$output "@@@ "+ -
16ebfedea0SLionel Sambuc   f$parse( proc, , , "name")+ f$parse( proc, , , "type")
17ebfedea0SLionel Sambuc$!
18ebfedea0SLionel Sambuc$ on error then goto tidy
19ebfedea0SLionel Sambuc$ on control_c then goto tidy
20ebfedea0SLionel Sambuc$!
21ebfedea0SLionel Sambuc$ if (p1 .eqs. "")
22ebfedea0SLionel Sambuc$ then
23ebfedea0SLionel Sambuc$   write sys$output "First argument missing."
24ebfedea0SLionel Sambuc$   write sys$output -
25ebfedea0SLionel Sambuc     "It should be the directory where you want things installed."
26ebfedea0SLionel Sambuc$     exit
27ebfedea0SLionel Sambuc$ endif
28ebfedea0SLionel Sambuc$!
29ebfedea0SLionel Sambuc$ if (f$getsyi( "cpu") .lt. 128)
30ebfedea0SLionel Sambuc$ then
31ebfedea0SLionel Sambuc$   arch = "VAX"
32ebfedea0SLionel Sambuc$ else
33ebfedea0SLionel Sambuc$   arch = f$edit( f$getsyi( "arch_name"), "upcase")
34ebfedea0SLionel Sambuc$   if (arch .eqs. "") then arch = "UNK"
35ebfedea0SLionel Sambuc$ endif
36ebfedea0SLionel Sambuc$!
37ebfedea0SLionel Sambuc$ archd = arch
38ebfedea0SLionel Sambuc$ lib32 = "32"
39ebfedea0SLionel Sambuc$ shr = "_SHR32"
40ebfedea0SLionel Sambuc$!
41ebfedea0SLionel Sambuc$ if (p2 .nes. "")
42ebfedea0SLionel Sambuc$ then
43ebfedea0SLionel Sambuc$   if (p2 .eqs. "64")
44ebfedea0SLionel Sambuc$   then
45ebfedea0SLionel Sambuc$     archd = arch+ "_64"
46ebfedea0SLionel Sambuc$     lib32 = ""
47ebfedea0SLionel Sambuc$     shr = "_SHR"
48ebfedea0SLionel Sambuc$   else
49ebfedea0SLionel Sambuc$     if (p2 .nes. "32")
50ebfedea0SLionel Sambuc$     then
51ebfedea0SLionel Sambuc$       write sys$output "Second argument invalid."
52ebfedea0SLionel Sambuc$       write sys$output "It should be "32", "64", or nothing."
53ebfedea0SLionel Sambuc$       exit
54ebfedea0SLionel Sambuc$     endif
55ebfedea0SLionel Sambuc$   endif
56ebfedea0SLionel Sambuc$ endif
57ebfedea0SLionel Sambuc$!
58ebfedea0SLionel Sambuc$ root = f$parse( p1, "[]A.;0", , , "syntax_only, no_conceal") - "A.;0"
59ebfedea0SLionel Sambuc$ root_dev = f$parse( root, , , "device", "syntax_only")
60ebfedea0SLionel Sambuc$ root_dir = f$parse( root, , , "directory", "syntax_only") - -
61ebfedea0SLionel Sambuc   "[000000." - "][" - "[" - "]"
62ebfedea0SLionel Sambuc$ root = root_dev + "[" + root_dir
63ebfedea0SLionel Sambuc$!
64ebfedea0SLionel Sambuc$ define /nolog wrk_sslroot 'root'.] /trans=conc
65ebfedea0SLionel Sambuc$ define /nolog wrk_sslinclude wrk_sslroot:[include]
66ebfedea0SLionel Sambuc$ define /nolog wrk_sslxlib wrk_sslroot:['arch'_lib]
67ebfedea0SLionel Sambuc$!
68ebfedea0SLionel Sambuc$ if f$parse("wrk_sslroot:[000000]") .eqs. "" then -
69ebfedea0SLionel Sambuc   create /directory /log wrk_sslroot:[000000]
70ebfedea0SLionel Sambuc$ if f$parse("wrk_sslinclude:") .eqs. "" then -
71ebfedea0SLionel Sambuc   create /directory /log wrk_sslinclude:
72ebfedea0SLionel Sambuc$ if f$parse("wrk_sslxlib:") .eqs. "" then -
73ebfedea0SLionel Sambuc   create /directory /log wrk_sslxlib:
74ebfedea0SLionel Sambuc$!
75ebfedea0SLionel Sambuc$ sdirs := , -
76ebfedea0SLionel Sambuc   'archd', -
77ebfedea0SLionel Sambuc   objects, -
78*0a6a1f1dSLionel Sambuc   md4, md5, sha, mdc2, hmac, ripemd, whrlpool, -
79*0a6a1f1dSLionel Sambuc   des, aes, rc2, rc4, idea, bf, cast, camellia, seed, -
80ebfedea0SLionel Sambuc   bn, ec, rsa, dsa, ecdsa, dh, ecdh, dso, engine, -
81ebfedea0SLionel Sambuc   buffer, bio, stack, lhash, rand, err, -
82ebfedea0SLionel Sambuc   evp, asn1, pem, x509, x509v3, conf, txt_db, pkcs7, pkcs12, comp, ocsp, -
83ebfedea0SLionel Sambuc   ui, krb5, -
84*0a6a1f1dSLionel Sambuc   cms, pqueue, ts, jpake, srp, store, cmac
85ebfedea0SLionel Sambuc$!
86ebfedea0SLionel Sambuc$ exheader_ := crypto.h, opensslv.h, ebcdic.h, symhacks.h, ossl_typ.h
87ebfedea0SLionel Sambuc$ exheader_'archd' := opensslconf.h
88ebfedea0SLionel Sambuc$ exheader_objects := objects.h, obj_mac.h
89ebfedea0SLionel Sambuc$ exheader_md2 := md2.h
90ebfedea0SLionel Sambuc$ exheader_md4 := md4.h
91ebfedea0SLionel Sambuc$ exheader_md5 := md5.h
92ebfedea0SLionel Sambuc$ exheader_sha := sha.h
93ebfedea0SLionel Sambuc$ exheader_mdc2 := mdc2.h
94ebfedea0SLionel Sambuc$ exheader_hmac := hmac.h
95ebfedea0SLionel Sambuc$ exheader_ripemd := ripemd.h
96ebfedea0SLionel Sambuc$ exheader_whrlpool := whrlpool.h
97ebfedea0SLionel Sambuc$ exheader_des := des.h, des_old.h
98ebfedea0SLionel Sambuc$ exheader_aes := aes.h
99ebfedea0SLionel Sambuc$ exheader_rc2 := rc2.h
100ebfedea0SLionel Sambuc$ exheader_rc4 := rc4.h
101ebfedea0SLionel Sambuc$ exheader_rc5 := rc5.h
102ebfedea0SLionel Sambuc$ exheader_idea := idea.h
103ebfedea0SLionel Sambuc$ exheader_bf := blowfish.h
104ebfedea0SLionel Sambuc$ exheader_cast := cast.h
105ebfedea0SLionel Sambuc$ exheader_camellia := camellia.h
106ebfedea0SLionel Sambuc$ exheader_seed := seed.h
107ebfedea0SLionel Sambuc$ exheader_modes := modes.h
108ebfedea0SLionel Sambuc$ exheader_bn := bn.h
109ebfedea0SLionel Sambuc$ exheader_ec := ec.h
110ebfedea0SLionel Sambuc$ exheader_rsa := rsa.h
111ebfedea0SLionel Sambuc$ exheader_dsa := dsa.h
112ebfedea0SLionel Sambuc$ exheader_ecdsa := ecdsa.h
113ebfedea0SLionel Sambuc$ exheader_dh := dh.h
114ebfedea0SLionel Sambuc$ exheader_ecdh := ecdh.h
115ebfedea0SLionel Sambuc$ exheader_dso := dso.h
116ebfedea0SLionel Sambuc$ exheader_engine := engine.h
117ebfedea0SLionel Sambuc$ exheader_buffer := buffer.h
118ebfedea0SLionel Sambuc$ exheader_bio := bio.h
119ebfedea0SLionel Sambuc$ exheader_stack := stack.h, safestack.h
120ebfedea0SLionel Sambuc$ exheader_lhash := lhash.h
121ebfedea0SLionel Sambuc$ exheader_rand := rand.h
122ebfedea0SLionel Sambuc$ exheader_err := err.h
123ebfedea0SLionel Sambuc$ exheader_evp := evp.h
124ebfedea0SLionel Sambuc$ exheader_asn1 := asn1.h, asn1_mac.h, asn1t.h
125ebfedea0SLionel Sambuc$ exheader_pem := pem.h, pem2.h
126ebfedea0SLionel Sambuc$ exheader_x509 := x509.h, x509_vfy.h
127ebfedea0SLionel Sambuc$ exheader_x509v3 := x509v3.h
128ebfedea0SLionel Sambuc$ exheader_conf := conf.h, conf_api.h
129ebfedea0SLionel Sambuc$ exheader_txt_db := txt_db.h
130ebfedea0SLionel Sambuc$ exheader_pkcs7 := pkcs7.h
131ebfedea0SLionel Sambuc$ exheader_pkcs12 := pkcs12.h
132ebfedea0SLionel Sambuc$ exheader_comp := comp.h
133ebfedea0SLionel Sambuc$ exheader_ocsp := ocsp.h
134ebfedea0SLionel Sambuc$ exheader_ui := ui.h, ui_compat.h
135ebfedea0SLionel Sambuc$ exheader_krb5 := krb5_asn.h
136ebfedea0SLionel Sambuc$! exheader_store := store.h, str_compat.h
137ebfedea0SLionel Sambuc$ exheader_store := store.h
138ebfedea0SLionel Sambuc$ exheader_cms := cms.h
139ebfedea0SLionel Sambuc$ exheader_pqueue := pqueue.h
140ebfedea0SLionel Sambuc$ exheader_ts := ts.h
141ebfedea0SLionel Sambuc$ exheader_jpake := jpake.h
142*0a6a1f1dSLionel Sambuc$ exheader_srp := srp.h
143*0a6a1f1dSLionel Sambuc$ exheader_store := store.h
144*0a6a1f1dSLionel Sambuc$ exheader_cmac := cmac.h
145ebfedea0SLionel Sambuc$ libs := ssl_libcrypto
146ebfedea0SLionel Sambuc$!
147ebfedea0SLionel Sambuc$ exe_dir := [-.'archd'.exe.crypto]
148ebfedea0SLionel Sambuc$!
149ebfedea0SLionel Sambuc$! Header files.
150ebfedea0SLionel Sambuc$!
151ebfedea0SLionel Sambuc$ i = 0
152ebfedea0SLionel Sambuc$ loop_sdirs:
153ebfedea0SLionel Sambuc$   d = f$edit( f$element( i, ",", sdirs), "trim")
154ebfedea0SLionel Sambuc$   i = i + 1
155ebfedea0SLionel Sambuc$   if d .eqs. "," then goto loop_sdirs_end
156ebfedea0SLionel Sambuc$   tmp = exheader_'d'
157ebfedea0SLionel Sambuc$   if (d .nes. "") then d = "."+ d
158ebfedea0SLionel Sambuc$   copy /protection = w:re ['d']'tmp' wrk_sslinclude: /log
159ebfedea0SLionel Sambuc$ goto loop_sdirs
160ebfedea0SLionel Sambuc$ loop_sdirs_end:
161ebfedea0SLionel Sambuc$!
162ebfedea0SLionel Sambuc$! Object libraries, shareable images.
163ebfedea0SLionel Sambuc$!
164ebfedea0SLionel Sambuc$ i = 0
165ebfedea0SLionel Sambuc$ loop_lib:
166ebfedea0SLionel Sambuc$   e = f$edit( f$element( i, ",", libs), "trim")
167ebfedea0SLionel Sambuc$   i = i + 1
168ebfedea0SLionel Sambuc$   if e .eqs. "," then goto loop_lib_end
169ebfedea0SLionel Sambuc$   set noon
170ebfedea0SLionel Sambuc$   file = exe_dir+ e+ lib32+ ".olb"
171ebfedea0SLionel Sambuc$   if f$search( file) .nes. ""
172ebfedea0SLionel Sambuc$   then
173ebfedea0SLionel Sambuc$     copy /protection = w:re 'file' wrk_sslxlib: /log
174ebfedea0SLionel Sambuc$   endif
175ebfedea0SLionel Sambuc$!
176ebfedea0SLionel Sambuc$   file = exe_dir+ e+ shr+ ".exe"
177ebfedea0SLionel Sambuc$   if f$search( file) .nes. ""
178ebfedea0SLionel Sambuc$   then
179ebfedea0SLionel Sambuc$     copy /protection = w:re 'file' wrk_sslxlib: /log
180ebfedea0SLionel Sambuc$   endif
181ebfedea0SLionel Sambuc$   set on
182ebfedea0SLionel Sambuc$ goto loop_lib
183ebfedea0SLionel Sambuc$ loop_lib_end:
184ebfedea0SLionel Sambuc$!
185ebfedea0SLionel Sambuc$ tidy:
186ebfedea0SLionel Sambuc$!
187ebfedea0SLionel Sambuc$ call deass wrk_sslroot
188ebfedea0SLionel Sambuc$ call deass wrk_sslinclude
189ebfedea0SLionel Sambuc$ call deass wrk_sslxlib
190ebfedea0SLionel Sambuc$!
191ebfedea0SLionel Sambuc$ exit
192ebfedea0SLionel Sambuc$!
193ebfedea0SLionel Sambuc$ deass: subroutine
194ebfedea0SLionel Sambuc$ if (f$trnlnm( p1, "LNM$PROCESS") .nes. "")
195ebfedea0SLionel Sambuc$ then
196ebfedea0SLionel Sambuc$   deassign /process 'p1'
197ebfedea0SLionel Sambuc$ endif
198ebfedea0SLionel Sambuc$ endsubroutine
199ebfedea0SLionel Sambuc$!
200