![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to pgpbuild.com CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [PGP] / pgp / vmsbuild|
Return to pgpbuild.com CVS log | Up to [PGP] / pgp / vmsbuild |
1.1 root 1: $!x='f$ver(0)'
2: $!
3: $!Program: PGPBUILD.COM
4: $!
5: $!Author: David G. North, CCP
6: $! 1333 Maywood Ct
7: $! Plano, Texas 75023-1914
8: $! (214) 881-1553
9: $! [email protected]
10: $!
11: $!Date: 94.05.19
12: $!
13: $!Revisions:
14: $! Who Date Description
15: $! D.North 940519 Public Release
16: $!
17: $!License:
18: $! Ownership of and rights to these programs is retained by the author(s).
19: $! Limited license to use and distribute the software in this library is
20: $! hereby granted under the following conditions:
21: $! 1. Any and all authorship, ownership, copyright or licensing
22: $! information is preserved within any source copies at all times.
23: $! 2. Under absolutely *NO* circumstances may any of this code be used
24: $! in any form for commercial profit without a written licensing
25: $! agreement from the author(s). This does not imply that such
26: $! a written agreement could not be obtained.
27: $! 3. Except by written agreement under condition 2, and subject to
28: $! condition 5, source shall be freely provided with all binaries.
29: $! 4. Library contents may be transferred or copied in any form so
30: $! long as conditions 1, 2, 3, and 5 are met. Nominal charges may
31: $! be assessed for media and transferral labor without such charges
32: $! being considered 'commercial profit' thereby violating condition 2.
33: $! 5. THESE ROUTINES ARE FOR U.S. INTERNAL USE ONLY. The Author WILL
34: $! NOT BE HELD ACCOUNTABLE FOR _YOUR_ EXPORTING THESE ROUTINES FROM
35: $! THE UNITED STATES. EXPORT OF THESE ROUTINES FROM THE U.S. TO ANY
36: $! FOREIGN COUNTRY MAY BE A VIOLATION OF ITAR REGULATIONS AND MAY
37: $! SUBJECT YOU TO PROSECUTION BY THE U.S. GOVERNMENT, POSSIBLY RESULTING
38: $! IN YOUR INCARCERATION.
39: $!
40: $!Extended conditions:
41: $! These routines were designed to build the RSAREF library distributed
42: $! with MIT PGP V2.6, and the MIT PGP V2.6 sources AS DISTRIBUTED. The
43: $! author explicitly denies any responsibilities regarding your rights to
44: $! posses, to use, or to modify ANYTHING called PGP or RSAREF. These
45: $! routines simply compile arbitrary source files provided
46: $! by you. The content of those source files, and the source files
47: $! resulting from the editing operations are YOUR SOLE RESPONSIBILITY with
48: $! respect to any legal ramifications that may exist.
49: $!
50: $!Warranty:
51: $! These programs are distributed in the hopes that they will be useful, but
52: $! WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
53: $! or FITNESS FOR A PARTICULAR PURPOSE.
54: $!
55: $!Revisions: When What
56: $! 94.05.16 Initial release
57: $!
58: $!Description:
59: $! Given the presense of appropriately named source files in an
60: $! appropriate adjacent directory ([-.PGP26.SRC]), this procedure
61: $! will attempt to construct a VMS executable file called PGP26.EXE.
62: $!
63: $ me = f$environment("procedure")
64: $ df = f$elem(0,"]",me)+"]"
65: $ set def 'df'
66: $ src = "[-.src]"
67: $ rsa = "[-.-.rsaref.source]"
68: $ obj = "sys$disk:[]"
69: $ cflags:=/debug/opt=noinline
70: $!
71: $! Now compile stuff
72: $!
73: $ call compile pgp
74: $ call compile config
75: $ call compile crypto
76: $ call compile keymgmt
77: $ call compile keyadd
78: $ call compile keymaint
79: $ call compile fileio
80: $ call compile mdfile
81: $ call compile more
82: $ call compile armor
83: $ call compile mpilib
84: $ call compile mpiio
85: $ call compile getopt
86: $ call compile genprime
87: $ call compile rsagen
88: $ call compile random
89: $ call compile idea
90: $ call compile passwd
91: $ call compile md5
92: $ call compile system
93: $ call compile language
94: $ macro/object='obj'vax.obj 'src'vax.mar
95: $ call compile charset
96: $ call compile rsaglue2
97: $ call compile noise
98: $ call compile randpool
99: $ call compile zbits "/define=(EXPORT,NO_ASM,NOSTORE)"
100: $ call compile zdeflate "/define=(EXPORT,NO_ASM,NOSTORE)"
101: $ call compile zglobals "/define=(EXPORT,NO_ASM,NOSTORE)"
102: $ call compile zinflate "/define=(EXPORT,NO_ASM,NOSTORE)"
103: $ call compile zip "/define=(EXPORT,NO_ASM,NOSTORE)"
104: $ call compile zipup "/define=(EXPORT,NO_ASM,NOSTORE)"
105: $ call compile zfile_io "/define=(EXPORT,NO_ASM,NOSTORE)"
106: $ call compile ztrees "/define=(EXPORT,NO_ASM,NOSTORE)"
107: $ call compile zunzip "/define=(EXPORT,NO_ASM,NOSTORE)"
108: $ exit
109: $!Last Modified: 19-MAY-1993 07:08:47.39
110: $1
111: $!
112: $ compile: subroutine !p1 is file name
113: $ sfile = f$parse("''p1'","''src'","sys$disk:[].c")
114: $ ofile = f$parse("''obj'","''p1'","sys$disk:[].obj;")
115: $ set ver
116: $ define/user c$include 'src','rsa'
117: $ define/user vaxc$include sys$share:,'src','rsa'
118: $ define/user sys sys$share:
119: $ cc 'cflags' 'p2' 'sfile'/object='ofile'
120: $!x='f$ver(0)'
121: $ endsubroutine
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.