util/pl/VC-32.pl

   1 #!/usr/local/bin/perl
   2 # VCw32lib.pl - the file for Visual C++ 4.[01] for windows NT, static libraries
   3 #
   4
   5 $ssl=   "ssleay32";
   6 $crypto="libeay32";
   7
   8 $o='\\';
   9 $cp='copy nul+';        # Timestamps get stuffed otherwise
  10 $rm='del';
  11
  12 # C compiler stuff
  13 $cc='cl';
  14 if ($FLAVOR =~ /WIN64/)
  15     {
  16     # Note that we currently don't have /WX on Win64! There is a lot of
  17     # warnings, but only of two types:
  18     #
  19     # C4344: conversion from '__int64' to 'int/long', possible loss of data
  20     # C4267: conversion from 'size_t' to 'int/long', possible loss of data
  21     #
  22     # Amount of latter type is minimized by aliasing strlen to function of
  23     # own desing and limiting its return value to 2GB-1 (see e_os.h). As
  24     # per 0.9.8 release remaining warnings were explicitly examines and
  25     # considered safe to ignore.
  26     #
  27     $cflags=' /MD /W3 /Ox /Gs0 /GF /Gy /nologo -DWIN32_LEAN_AND_MEAN -DL_ENDIAN -DDSO_WIN32 -DOPENSSL_SYSNAME_WIN32 -DOPENSSL_SYSNAME_WINNT -DUNICODE -D_UNICODE';
  28     $lflags="/nologo /subsystem:console /opt:ref";
  29     }
  30 else
  31     {
  32     $cflags=' /MD /W3 /WX /G5 /Ox /O2 /Ob2 /Gs0 /GF /Gy /nologo -DOPENSSL_SYSNAME_WIN32 -DWIN32_LEAN_AND_MEAN -DL_ENDIAN -DDSO_WIN32';
  33     $lflags="/nologo /subsystem:console /machine:I386 /opt:ref";
  34     }
  35 $mlflags='';
  36
  37 $out_def="out32";
  38 $tmp_def="tmp32";
  39 $inc_def="inc32";
  40
  41 if ($debug)
  42         {
  43         $cflags=" /MDd /W3 /WX /Zi /Yd /Od /nologo -DOPENSSL_SYSNAME_WIN32 -D_DEBUG -DL_ENDIAN -DWIN32_LEAN_AND_MEAN -DDEBUG -DDSO_WIN32";
  44         $lflags.=" /debug";
  45         $mlflags.=' /debug';
  46         }
  47 $cflags .= " -DOPENSSL_SYSNAME_WINNT" if $NT == 1;
  48
  49 $obj='.obj';
  50 $ofile="/Fo";
  51
  52 # EXE linking stuff
  53 $link="link";
  54 $rsc="rc";
  55 $efile="/out:";
  56 $exep='.exe';
  57 if ($no_sock)
  58         { $ex_libs=""; }
  59 else    { $ex_libs="wsock32.lib user32.lib gdi32.lib"; }
  60 $ex_libs="$ex_libs bufferoverflowu.lib" if ($FLAVOR =~ /WIN64/);
  61
  62 # static library stuff
  63 $mklib='lib';
  64 $ranlib='';
  65 $plib="";
  66 $libp=".lib";
  67 $shlibp=($shlib)?".dll":".lib";
  68 $lfile='/out:';
  69
  70 $shlib_ex_obj="";
  71 $app_ex_obj="setargv.obj";
  72 if ($nasm) {
  73         $asm='nasmw -f win32';
  74         $afile='-o ';
  75 } else {
  76         $asm='ml /Cp /coff /c /Cx';
  77         $asm.=" /Zi" if $debug;
  78         $afile='/Fo';
  79 }
  80
  81 $bn_asm_obj='';
  82 $bn_asm_src='';
  83 $des_enc_obj='';
  84 $des_enc_src='';
  85 $bf_enc_obj='';
  86 $bf_enc_src='';
  87
  88 if (!$no_asm)
  89         {
  90         $bn_asm_obj='crypto\bn\asm\bn_win32.obj';
  91         $bn_asm_src='crypto\bn\asm\bn_win32.asm';
  92         $des_enc_obj='crypto\des\asm\d_win32.obj crypto\des\asm\y_win32.obj';
  93         $des_enc_src='crypto\des\asm\d_win32.asm crypto\des\asm\y_win32.asm';
  94         $bf_enc_obj='crypto\bf\asm\b_win32.obj';
  95         $bf_enc_src='crypto\bf\asm\b_win32.asm';
  96         $cast_enc_obj='crypto\cast\asm\c_win32.obj';
  97         $cast_enc_src='crypto\cast\asm\c_win32.asm';
  98         $rc4_enc_obj='crypto\rc4\asm\r4_win32.obj';
  99         $rc4_enc_src='crypto\rc4\asm\r4_win32.asm';
 100         $rc5_enc_obj='crypto\rc5\asm\r5_win32.obj';
 101         $rc5_enc_src='crypto\rc5\asm\r5_win32.asm';
 102         $md5_asm_obj='crypto\md5\asm\m5_win32.obj';
 103         $md5_asm_src='crypto\md5\asm\m5_win32.asm';
 104         $sha1_asm_obj='crypto\sha\asm\s1_win32.obj';
 105         $sha1_asm_src='crypto\sha\asm\s1_win32.asm';
 106         $rmd160_asm_obj='crypto\ripemd\asm\rm_win32.obj';
 107         $rmd160_asm_src='crypto\ripemd\asm\rm_win32.asm';
 108         $cflags.=" -DBN_ASM -DMD5_ASM -DSHA1_ASM -DRMD160_ASM";
 109         }
 110
 111 if ($shlib)
 112         {
 113         $mlflags.=" $lflags /dll";
 114 #       $cflags =~ s| /MD| /MT|;
 115         $lib_cflag=" -D_WINDLL";
 116         $out_def="out32dll";
 117         $tmp_def="tmp32dll";
 118         #
 119         # Engage Applink...
 120         #
 121         $app_ex_obj.=" \$(OBJ_D)\\applink.obj /implib:\$(TMP_D)\\junk.lib";
 122         $cflags.=" -DOPENSSL_USE_APPLINK -I.";
 123         # I'm open for better suggestions than overriding $banner...
 124         $banner=<<'___';
 125         @echo Building OpenSSL
 126
 127 $(OBJ_D)\applink.obj:   ms\applink.c
 128         $(CC) /Fo$(OBJ_D)\applink.obj $(APP_CFLAGS) -c ms\applink.c
 129 $(OBJ_D)\uplink.obj:    ms\uplink.c ms\applink.c
 130         $(CC) /Fo$(OBJ_D)\uplink.obj $(SHLIB_CFLAGS) -c ms\uplink.c
 131 $(INCO_D)\applink.c:    ms\applink.c
 132         $(CP) ms\applink.c $(INCO_D)\applink.c
 133
 134 EXHEADER= $(EXHEADER) $(INCO_D)\applink.c
 135
 136 LIBS_DEP=$(LIBS_DEP) $(OBJ_D)\applink.obj
 137 CRYPTOOBJ=$(OBJ_D)\uplink.obj $(CRYPTOOBJ)
 138 ___
 139         $banner.=<<'___' if ($FLAVOR =~ /WIN64/);
 140 CRYPTOOBJ=ms\uptable.obj $(CRYPTOOBJ)
 141 ___
 142         }
 143
 144 $cflags.=" /Fd$out_def";
 145
 146 sub do_lib_rule
 147         {
 148         local($objs,$target,$name,$shlib)=@_;
 149         local($ret,$Name);
 150
 151         $taget =~ s/\//$o/g if $o ne '/';
 152         ($Name=$name) =~ tr/a-z/A-Z/;
 153
 154 #       $target="\$(LIB_D)$o$target";
 155         $ret.="$target: $objs\n";
 156         if (!$shlib)
 157                 {
 158 #               $ret.="\t\$(RM) \$(O_$Name)\n";
 159                 $ex =' advapi32.lib';
 160                 $ret.="\t\$(MKLIB) $lfile$target @<<\n  $objs $ex\n<<\n";
 161                 }
 162         else
 163                 {
 164                 local($ex)=($target =~ /O_SSL/)?' $(L_CRYPTO)':'';
 165                 $ex.=' wsock32.lib gdi32.lib advapi32.lib user32.lib';
 166                 $ex.=' bufferoverflowu.lib' if ($FLAVOR =~ /WIN64/);
 167                 $ret.="\t\$(LINK) \$(MLFLAGS) $efile$target /def:ms/${Name}.def @<<\n  \$(SHLIB_EX_OBJ) $objs $ex\n<<\n";
 168                 }
 169         $ret.="\n";
 170         return($ret);
 171         }
 172
 173 sub do_link_rule
 174         {
 175         local($target,$files,$dep_libs,$libs)=@_;
 176         local($ret,$_);
 177
 178         $file =~ s/\//$o/g if $o ne '/';
 179         $n=&bname($targer);
 180         $ret.="$target: $files $dep_libs\n";
 181         $ret.="  \$(LINK) \$(LFLAGS) $efile$target @<<\n";
 182         $ret.="  \$(APP_EX_OBJ) $files $libs\n<<\n\n";
 183         return($ret);
 184         }
 185
 186 1;