~ubuntu-branches/ubuntu/maverick/openssl/maverick

« back to all changes in this revision

Viewing changes to fips/install.com

• browse files at revision 1.1.1
• compare with another revision
• download diff
• download tarball
• view history from revision 1.1.1

Show diffs side-by-side

added

removed

fips/install.com

 

1

$! INSTALL.COM -- Installs the files in a given directory tree

 

2

$!

 

3

$! Author: Richard Levitte <richard@levitte.org>

 

4

$! Time of creation: 27-MAY-2004 11:47

 

5

$!

 

6

$! P1   root of the directory tree

 

7

$!

 

8

$       IF P1 .EQS. ""

 

9

$       THEN

 

10

$           WRITE SYS$OUTPUT "First argument missing."

 

11

$           WRITE SYS$OUTPUT "Should be the directory where you want things installed."

 

12

$           EXIT

 

13

$       ENDIF

 

14

$

 

15

$       ROOT = F$PARSE(P1,"[]A.;0",,,"SYNTAX_ONLY,NO_CONCEAL") - "A.;0"

 

16

$       ROOT_DEV = F$PARSE(ROOT,,,"DEVICE","SYNTAX_ONLY")

 

17

$       ROOT_DIR = F$PARSE(ROOT,,,"DIRECTORY","SYNTAX_ONLY") -

 

18

                   - "[000000." - "][" - "[" - "]"

 

19

$       ROOT = ROOT_DEV + "[" + ROOT_DIR

 

20

$

 

21

$       DEFINE/NOLOG WRK_SSLROOT 'ROOT'.] /TRANS=CONC

 

22

$       DEFINE/NOLOG WRK_SSLINCLUDE WRK_SSLROOT:[INCLUDE]

 

23

$

 

24

$       IF F$PARSE("WRK_SSLROOT:[000000]") .EQS. "" THEN -

 

25

           CREATE/DIR/LOG WRK_SSLROOT:[000000]

 

26

$       IF F$PARSE("WRK_SSLINCLUDE:") .EQS. "" THEN -

 

27

           CREATE/DIR/LOG WRK_SSLINCLUDE:

 

28

$

 

29

$       FDIRS := ,RAND,SHA1,DES,AES,DSA,RSA

 

30

$       EXHEADER_ := fips.h

 

31

$       EXHEADER_SHA1 :=

 

32

$       EXHEADER_RAND := fips_rand.h

 

33

$       EXHEADER_DES :=

 

34

$       EXHEADER_AES :=

 

35

$       EXHEADER_DSA :=

 

36

$       EXHEADER_RSA :=

 

37

$

 

38

$       I = 0

 

39

$ LOOP_FDIRS: 

 

40

$       D = F$EDIT(F$ELEMENT(I, ",", FDIRS),"TRIM")

 

41

$       I = I + 1

 

42

$       IF D .EQS. "," THEN GOTO LOOP_FDIRS_END

 

43

$       tmp = EXHEADER_'D'

 

44

$       IF tmp .EQS. "" THEN GOTO LOOP_FDIRS

 

45

$       IF D .EQS. ""

 

46

$       THEN

 

47

$         COPY 'tmp' WRK_SSLINCLUDE: /LOG

 

48

$       ELSE

 

49

$         COPY [.'D']'tmp' WRK_SSLINCLUDE: /LOG

 

50

$       ENDIF

 

51

$       SET FILE/PROT=WORLD:RE WRK_SSLINCLUDE:'tmp'

 

52

$       GOTO LOOP_FDIRS

 

53

$ LOOP_FDIRS_END:

 

54

$

 

55

$       EXIT

• Older »

Loggerhead is a web-based interface for Breezy
Version: 2.0.1