util/pl/VC-32.pl

   1 #!/usr/local/bin/perl
   2 # VC-32.pl - unified script for Microsoft Visual C++, covering Win32,
   3 # Win64 and WinCE [follow $FLAVOR variable to trace the differences].
   4 #
   5
   6 $ssl=   "ssleay32";
   7 $crypto="libeay32";
   8
   9 $o='\\';
  10 $cp='copy nul+';        # Timestamps get stuffed otherwise
  11 $rm='del';
  12
  13 # C compiler stuff
  14 $cc='cl';
  15 if ($FLAVOR =~ /WIN64/)
  16     {
  17     # Note that we currently don't have /WX on Win64! There is a lot of
  18     # warnings, but only of two types:
  19     #
  20     # C4344: conversion from '__int64' to 'int/long', possible loss of data
  21     # C4267: conversion from 'size_t' to 'int/long', possible loss of data
  22     #
  23     # Amount of latter type is minimized by aliasing strlen to function of
  24     # own desing and limiting its return value to 2GB-1 (see e_os.h). As
  25     # per 0.9.8 release remaining warnings were explicitly examined and
  26     # considered safe to ignore.
  27     #
  28     $base_cflags=' /W3 /Gs0 /GF /Gy /nologo -DWIN32_LEAN_AND_MEAN -DL_ENDIAN -DDSO_WIN32 -DOPENSSL_SYSNAME_WIN32 -DOPENSSL_SYSNAME_WINNT -DUNICODE -D_UNICODE';
  29     $opt_cflags=' /MD /Ox';
  30     $dbg_cflags=' /MDd /Od -DDEBUG -D_DEBUG';
  31     $lflags="/nologo /subsystem:console /opt:ref";
  32     }
  33 elsif ($FLAVOR =~ /CE/)
  34     {
  35     # sanity check
  36     die '%OSVERSION% is not defined'    if (!defined($ENV{'OSVERSION'}));
  37     die '%PLATFORM% is not defined'     if (!defined($ENV{'PLATFORM'}));
  38     die '%TARGETCPU% is not defined'    if (!defined($ENV{'TARGETCPU'}));
  39
  40     # pull CE version from OSVERSION environment variable
  41     $wcevers = $ENV{'OSVERSION'};                       # WCENNN
  42     die '%OSVERSION% value is insane'   if ($wcevers !~ /^WCE([1-9])([0-9]{2})$/);
  43     $wcecdefs = "-D_WIN32_WCE=$1$2";            # -D_WIN32_WCE=NNN
  44     $wcelflag = "/subsystem:windowsce,$1.$2";   # ...,N.NN
  45     if ($ENV{'TARGETCPU'} =~ /^X86/)
  46     {   $wcelflag .= " /machine:X86";                   }
  47     else
  48     {   $wcelflag .= " /machine:$ENV{'TARGETCPU'}";     }
  49     $wceplatf =  $ENV{'PLATFORM'};
  50     $wceplatf =~ tr/a-z0-9 /A-Z0-9_/d;
  51     $wcecdefs .= " -DWCEPLATFORM=$wceplatf";
  52
  53     $cc='$(CC)';
  54     $base_cflags=' /W3 /WX /Gs0 /GF /Gy /nologo -DUNICODE -D_UNICODE -DOPENSSL_SYSNAME_WINCE -DWIN32_LEAN_AND_MEAN -DL_ENDIAN -DDSO_WIN32 -DNO_CHMOD -I$(WCECOMPAT)/include';
  55     $base_cflags.=" $wcecdefs";
  56     $opt_cflags=' /MD /Ox /O2 /Ob2';
  57     $dbg_clfags=' /MDd /Od -DDEBUG -D_DEBUG';
  58     $lflags="/nologo /opt:ref $wcelflag";
  59     }
  60 else    # Win32
  61     {
  62     $base_cflags=' /W3 /WX /Gs0 /GF /Gy /nologo -DOPENSSL_SYSNAME_WIN32 -DWIN32_LEAN_AND_MEAN -DL_ENDIAN -DDSO_WIN32';
  63     $opt_cflags=' /MD /Ox /O2 /Ob2';
  64     $dbg_cflags=' /MDd /Od -DDEBUG -D_DEBUG';
  65     $lflags="/nologo /subsystem:console /machine:I386 /opt:ref";
  66     }
  67 $mlflags='';
  68
  69 $out_def="out32"; $out_def.='_$(TARGETCPU)' if ($FLAVOR =~ /CE/);
  70 $tmp_def="tmp32"; $tmp_def.='_$(TARGETCPU)' if ($FLAVOR =~ /CE/);
  71 $inc_def="inc32";
  72
  73 if ($debug)
  74         {
  75         $cflags=$dbg_cflags.$base_cflags;
  76         $lflags.=" /debug";
  77         $mlflags.=' /debug';
  78         }
  79 else
  80         {
  81         $cflags=$opt_cflags.$base_cflags;
  82         }
  83
  84 $obj='.obj';
  85 $ofile="/Fo";
  86
  87 # EXE linking stuff
  88 $link="link";
  89 $rsc="rc";
  90 $efile="/out:";
  91 $exep='.exe';
  92 if ($no_sock)           { $ex_libs=''; }
  93 elsif ($FLAVOR =~ /CE/) { $ex_libs='winsock.lib'; }
  94 else                    { $ex_libs='wsock32.lib'; }
  95
  96 if ($FLAVOR =~ /CE/)
  97         {
  98         $ex_libs.=' $(WCECOMPAT)/lib/wcecompatex.lib';
  99         $ex_libs.=' /nodefaultlib:oldnames.lib coredll.lib corelibc.lib' if ($ENV{'TARGETCPU'} eq "X86");
 100         }
 101 else
 102         {
 103         $ex_libs.=' gdi32.lib advapi32.lib user32.lib';
 104         $ex_libs.=' bufferoverflowu.lib' if ($FLAVOR =~ /WIN64/);
 105         }
 106
 107 # As native NT API is pure UNICODE, our WIN-NT build defaults to UNICODE,
 108 # but gets linked with unicows.lib to ensure backward compatibility.
 109 if ($FLAVOR =~ /NT/)
 110         {
 111         $cflags.=" -DOPENSSL_SYSNAME_WINNT -DUNICODE -D_UNICODE";
 112         $ex_libs="unicows.lib $ex_libs";
 113         }
 114
 115 # static library stuff
 116 $mklib='lib';
 117 $ranlib='';
 118 $plib="";
 119 $libp=".lib";
 120 $shlibp=($shlib)?".dll":".lib";
 121 $lfile='/out:';
 122
 123 $shlib_ex_obj="";
 124 $app_ex_obj="setargv.obj" if ($FLAVOR !~ /CE/);
 125 if ($nasm) {
 126         $asm='nasmw -f win32';
 127         $afile='-o ';
 128 } else {
 129         $asm='ml /Cp /coff /c /Cx';
 130         $asm.=" /Zi" if $debug;
 131         $afile='/Fo';
 132 }
 133
 134 $bn_asm_obj='';
 135 $bn_asm_src='';
 136 $des_enc_obj='';
 137 $des_enc_src='';
 138 $bf_enc_obj='';
 139 $bf_enc_src='';
 140
 141 if (!$no_asm)
 142         {
 143         $bn_asm_obj='crypto\bn\asm\bn_win32.obj';
 144         $bn_asm_src='crypto\bn\asm\bn_win32.asm';
 145         $des_enc_obj='crypto\des\asm\d_win32.obj crypto\des\asm\y_win32.obj';
 146         $des_enc_src='crypto\des\asm\d_win32.asm crypto\des\asm\y_win32.asm';
 147         $bf_enc_obj='crypto\bf\asm\b_win32.obj';
 148         $bf_enc_src='crypto\bf\asm\b_win32.asm';
 149         $cast_enc_obj='crypto\cast\asm\c_win32.obj';
 150         $cast_enc_src='crypto\cast\asm\c_win32.asm';
 151         $rc4_enc_obj='crypto\rc4\asm\r4_win32.obj';
 152         $rc4_enc_src='crypto\rc4\asm\r4_win32.asm';
 153         $rc5_enc_obj='crypto\rc5\asm\r5_win32.obj';
 154         $rc5_enc_src='crypto\rc5\asm\r5_win32.asm';
 155         $md5_asm_obj='crypto\md5\asm\m5_win32.obj';
 156         $md5_asm_src='crypto\md5\asm\m5_win32.asm';
 157         $sha1_asm_obj='crypto\sha\asm\s1_win32.obj';
 158         $sha1_asm_src='crypto\sha\asm\s1_win32.asm';
 159         $rmd160_asm_obj='crypto\ripemd\asm\rm_win32.obj';
 160         $rmd160_asm_src='crypto\ripemd\asm\rm_win32.asm';
 161         $cflags.=" -DBN_ASM -DMD5_ASM -DSHA1_ASM -DRMD160_ASM";
 162         }
 163
 164 if ($shlib && $FLAVOR !~ /CE/)
 165         {
 166         $mlflags.=" $lflags /dll";
 167 #       $cflags =~ s| /MD| /MT|;
 168         $lib_cflag=" -D_WINDLL";
 169         $out_def="out32dll";
 170         $tmp_def="tmp32dll";
 171         #
 172         # Engage Applink...
 173         #
 174         $app_ex_obj.=" \$(OBJ_D)\\applink.obj /implib:\$(TMP_D)\\junk.lib";
 175         $cflags.=" -DOPENSSL_USE_APPLINK -I.";
 176         # I'm open for better suggestions than overriding $banner...
 177         $banner=<<'___';
 178         @echo Building OpenSSL
 179
 180 $(OBJ_D)\applink.obj:   ms\applink.c
 181         $(CC) /Fo$(OBJ_D)\applink.obj $(APP_CFLAGS) -c ms\applink.c
 182 $(OBJ_D)\uplink.obj:    ms\uplink.c ms\applink.c
 183         $(CC) /Fo$(OBJ_D)\uplink.obj $(SHLIB_CFLAGS) -c ms\uplink.c
 184 $(INCO_D)\applink.c:    ms\applink.c
 185         $(CP) ms\applink.c $(INCO_D)\applink.c
 186
 187 EXHEADER= $(EXHEADER) $(INCO_D)\applink.c
 188
 189 LIBS_DEP=$(LIBS_DEP) $(OBJ_D)\applink.obj
 190 CRYPTOOBJ=$(OBJ_D)\uplink.obj $(CRYPTOOBJ)
 191 ___
 192         $banner.=<<'___' if ($FLAVOR =~ /WIN64/);
 193 CRYPTOOBJ=ms\uptable.obj $(CRYPTOOBJ)
 194 ___
 195         }
 196 elsif ($shlib && $FLAVOR =~ /CE/)
 197         {
 198         $mlflags.=" $lflags /dll";
 199         $lib_cflag=" -D_WINDLL -D_DLL";
 200         $out_def='out32dll_$(TARGETCPU)';
 201         $tmp_def='tmp32dll_$(TARGETCPU)';
 202         }
 203
 204 $cflags.=" /Fd$out_def";
 205
 206 sub do_lib_rule
 207         {
 208         local($objs,$target,$name,$shlib)=@_;
 209         local($ret,$Name);
 210
 211         $taget =~ s/\//$o/g if $o ne '/';
 212         ($Name=$name) =~ tr/a-z/A-Z/;
 213
 214 #       $target="\$(LIB_D)$o$target";
 215         $ret.="$target: $objs\n";
 216         if (!$shlib)
 217                 {
 218 #               $ret.="\t\$(RM) \$(O_$Name)\n";
 219                 $ex =' ';
 220                 $ret.="\t\$(MKLIB) $lfile$target @<<\n  $objs $ex\n<<\n";
 221                 }
 222         else
 223                 {
 224                 local($ex)=($target =~ /O_SSL/)?' $(L_CRYPTO)':'';
 225                 if ($FLAVOR =~ /CE/)
 226                         {
 227                         $ex.=' winsock.lib $(WCECOMPAT)/lib/wcecompatex.lib';
 228                         }
 229                 else
 230                         {
 231                         $ex.=' unicows.lib' if ($FLAVOR =~ /NT/);
 232                         $ex.=' wsock32.lib gdi32.lib advapi32.lib user32.lib';
 233                         $ex.=' bufferoverflowu.lib' if ($FLAVOR =~ /WIN64/);
 234                         }
 235                 $ret.="\t\$(LINK) \$(MLFLAGS) $efile$target /def:ms/${Name}.def @<<\n  \$(SHLIB_EX_OBJ) $objs $ex\n<<\n";
 236                 }
 237         $ret.="\n";
 238         return($ret);
 239         }
 240
 241 sub do_link_rule
 242         {
 243         local($target,$files,$dep_libs,$libs)=@_;
 244         local($ret,$_);
 245
 246         $file =~ s/\//$o/g if $o ne '/';
 247         $n=&bname($targer);
 248         $ret.="$target: $files $dep_libs\n";
 249         $ret.="  \$(LINK) \$(LFLAGS) $efile$target @<<\n";
 250         $ret.="  \$(APP_EX_OBJ) $files $libs\n<<\n\n";
 251         return($ret);
 252         }
 253
 254 1;