81802afb213e6e2a6f229b31ec436da19cb247ab
[openssl.git] / 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 .= " -DWCE_$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 cryptapi.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;