|
|
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.