crypto/heimdal-0.6.3/lib/des/vms.com

   1 $! --- VMS.com ---
   2 $!
   3 $ GoSub defines
   4 $ GoSub linker_options
   5 $ If (P1 .nes. "")
   6 $ Then
   7 $   GoSub 'P1'
   8 $ Else
   9 $   GoSub lib
  10 $   GoSub destest
  11 $   GoSub rpw
  12 $   GoSub speed
  13 $   GoSub des
  14 $ EndIF
  15 $!
  16 $ Exit
  17 $!
  18 $!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  19 $!
  20 $DEFINES:
  21 $ OPT_FILE := "VAX_LINKER_OPTIONS.OPT"
  22 $!
  23 $ CC_OPTS := "/NODebug/OPTimize/NOWarn"
  24 $!
  25 $ LINK_OPTS := "/NODebug/NOTraceback/Contiguous"
  26 $!
  27 $ OBJS  = "cbc_cksm.obj,cbc_enc.obj,ecb_enc.obj,pcbc_enc.obj," + -
  28           "qud_cksm.obj,rand_key.obj,read_pwd.obj,set_key.obj,"      + -
  29           "str2key.obj,enc_read.obj,enc_writ.obj,fcrypt.obj,"           + -
  30           "cfb_enc.obj,3ecb_enc.obj,ofb_enc.obj"
  31
  32
  33 $!
  34 $ LIBDES = "cbc_cksm.c,cbc_enc.c,ecb_enc.c,enc_read.c,"           + -
  35            "enc_writ.c,pcbc_enc.c,qud_cksm.c,rand_key.c,"         + -
  36            "read_pwd.c,set_key.c,str2key.c,fcrypt.c,"                + -
  37            "cfb_enc.c,3ecb_enc.c,ofb_enc.c"
  38 $ Return
  39 $!
  40 $!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  41 $!
  42 $LINKER_OPTIONS:
  43 $ If (f$search(OPT_FILE) .eqs. "")
  44 $ Then
  45 $   Create 'OPT_FILE'
  46 $DECK
  47 ! Default system options file to link against the sharable C runtime library
  48 !
  49 Sys$Share:VAXcRTL.exe/Share
  50 $EOD
  51 $ EndIF
  52 $ Return
  53 $!
  54 $!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  55 $!
  56 $LIB:
  57 $ CC 'CC_OPTS' 'LIBDES'
  58 $ If (f$search("LIBDES.OLB") .nes. "")
  59 $ Then Library /Object /Replace libdes 'OBJS'
  60 $ Else Library /Create /Object  libdes 'OBJS'
  61 $ EndIF
  62 $ Return
  63 $!
  64 $!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  65 $!
  66 $DESTEST:
  67 $ CC 'CC_OPTS' destest
  68 $ Link 'link_opts' /Exec=destest destest.obj,libdes/LIBRARY,'opt_file'/Option
  69 $ Return
  70 $!
  71 $!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  72 $!
  73 $RPW:
  74 $ CC 'CC_OPTS' rpw
  75 $ Link 'link_opts' /Exec=rpw  rpw.obj,libdes/LIBRARY,'opt_file'/Option
  76 $ Return
  77 $!
  78 $!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  79 $!
  80 $SPEED:
  81 $ CC 'CC_OPTS' speed
  82 $ Link 'link_opts' /Exec=speed speed.obj,libdes/LIBRARY,'opt_file'/Option
  83 $ Return
  84 $!
  85 $!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  86 $!
  87 $DES:
  88 $ CC 'CC_OPTS' des
  89 $ Link 'link_opts' /Exec=des des.obj,libdes/LIBRARY,'opt_file'/Option
  90 $ Return