blob: f6170f58083eb2dbb6ca8c8fc919e083a7c9f96f [file] [log] [blame]
Zachary Ware91a9c782016-09-05 11:55:42 -05001#! /usr/bin/env python3
2# Script for preparing OpenSSL for building on Windows.
3# Uses Perl to create nmake makefiles and otherwise prepare the way
4# for building on 32 or 64 bit platforms.
5
6# Script originally authored by Mark Hammond.
7# Major revisions by:
8# Martin v. Löwis
9# Christian Heimes
10# Zachary Ware
11
12# THEORETICALLY, you can:
13# * Unpack the latest OpenSSL release where $(opensslDir) in
14# PCbuild\pyproject.props expects it to be.
15# * Install ActivePerl and ensure it is somewhere on your path.
16# * Run this script with the OpenSSL source dir as the only argument.
17#
18# it should configure OpenSSL such that it is ready to be built by
19# ssl.vcxproj on 32 or 64 bit platforms.
20
21import os
22import re
23import sys
24import subprocess
25from shutil import copy
26
27# Find all "foo.exe" files on the PATH.
28def find_all_on_path(filename, extras=None):
29 entries = os.environ["PATH"].split(os.pathsep)
30 ret = []
31 for p in entries:
32 fname = os.path.abspath(os.path.join(p, filename))
33 if os.path.isfile(fname) and fname not in ret:
34 ret.append(fname)
35 if extras:
36 for p in extras:
37 fname = os.path.abspath(os.path.join(p, filename))
38 if os.path.isfile(fname) and fname not in ret:
39 ret.append(fname)
40 return ret
41
42
43# Find a suitable Perl installation for OpenSSL.
44# cygwin perl does *not* work. ActivePerl does.
45# Being a Perl dummy, the simplest way I can check is if the "Win32" package
46# is available.
47def find_working_perl(perls):
48 for perl in perls:
49 try:
50 subprocess.check_output([perl, "-e", "use Win32;"])
51 except subprocess.CalledProcessError:
52 continue
53 else:
54 return perl
55
56 if perls:
57 print("The following perl interpreters were found:")
58 for p in perls:
59 print(" ", p)
60 print(" None of these versions appear suitable for building OpenSSL")
61 else:
62 print("NO perl interpreters were found on this machine at all!")
63 print(" Please install ActivePerl and ensure it appears on your path")
64
65
66def create_asms(makefile, tmp_d):
67 #create a custom makefile out of the provided one
68 asm_makefile = os.path.splitext(makefile)[0] + '.asm.mak'
69 with open(makefile) as fin, open(asm_makefile, 'w') as fout:
70 for line in fin:
71 # Keep everything up to the install target (it's convenient)
72 if line.startswith('install: all'):
73 break
74 fout.write(line)
75 asms = []
76 for line in fin:
77 if '.asm' in line and line.strip().endswith('.pl'):
78 asms.append(line.split(':')[0])
79 while line.strip():
80 fout.write(line)
81 line = next(fin)
82 fout.write('\n')
83
84 fout.write('asms: $(TMP_D) ')
85 fout.write(' '.join(asms))
86 fout.write('\n')
87 os.system('nmake /f {} PERL=perl TMP_D={} asms'.format(asm_makefile, tmp_d))
88
89
90def copy_includes(makefile, suffix):
91 dir = 'include'+suffix+'\\openssl'
92 os.makedirs(dir, exist_ok=True)
93 copy_if_different = r'$(PERL) $(SRC_D)\util\copy-if-different.pl'
94 with open(makefile) as fin:
95 for line in fin:
96 if copy_if_different in line:
97 perl, script, src, dest = line.split()
98 if not '$(INCO_D)' in dest:
99 continue
100 # We're in the root of the source tree
101 src = src.replace('$(SRC_D)', '.').strip('"')
102 dest = dest.strip('"').replace('$(INCO_D)', dir)
103 print('copying', src, 'to', dest)
104 copy(src, dest)
105
106
107def run_configure(configure, do_script):
108 print("perl Configure "+configure+" no-idea no-mdc2")
109 os.system("perl Configure "+configure+" no-idea no-mdc2")
110 print(do_script)
111 os.system(do_script)
112
113
114def prep(arch):
115 makefile_template = "ms\\nt{}.mak"
116 generated_makefile = makefile_template.format('')
117 if arch == "x86":
118 configure = "VC-WIN32"
119 do_script = "ms\\do_nasm"
120 suffix = "32"
121 elif arch == "amd64":
122 configure = "VC-WIN64A"
123 do_script = "ms\\do_win64a"
124 suffix = "64"
125 #os.environ["VSEXTCOMP_USECL"] = "MS_OPTERON"
126 else:
127 raise ValueError('Unrecognized platform: %s' % arch)
128
129 print("Creating the makefiles...")
130 sys.stdout.flush()
131 # run configure, copy includes, create asms
132 run_configure(configure, do_script)
133 makefile = makefile_template.format(suffix)
134 try:
135 os.unlink(makefile)
136 except FileNotFoundError:
137 pass
138 os.rename(generated_makefile, makefile)
139 copy_includes(makefile, suffix)
140
141 print('creating asms...')
142 create_asms(makefile, 'tmp'+suffix)
143
144
145def main():
146 if len(sys.argv) == 1:
147 print("Not enough arguments: directory containing OpenSSL",
148 "sources must be supplied")
149 sys.exit(1)
150
151 if len(sys.argv) > 2:
152 print("Too many arguments supplied, all we need is the directory",
153 "containing OpenSSL sources")
154 sys.exit(1)
155
156 ssl_dir = sys.argv[1]
157
158 if not os.path.isdir(ssl_dir):
159 print(ssl_dir, "is not an existing directory!")
160 sys.exit(1)
161
162 # perl should be on the path, but we also look in "\perl" and "c:\\perl"
163 # as "well known" locations
164 perls = find_all_on_path("perl.exe", [r"\perl\bin",
165 r"C:\perl\bin",
166 r"\perl64\bin",
167 r"C:\perl64\bin",
168 ])
169 perl = find_working_perl(perls)
170 if perl:
171 print("Found a working perl at '%s'" % (perl,))
172 else:
173 sys.exit(1)
174 if not find_all_on_path('nmake.exe'):
175 print('Could not find nmake.exe, try running env.bat')
176 sys.exit(1)
177 if not find_all_on_path('nasm.exe'):
178 print('Could not find nasm.exe, please add to PATH')
179 sys.exit(1)
180 sys.stdout.flush()
181
182 # Put our working Perl at the front of our path
183 os.environ["PATH"] = os.path.dirname(perl) + \
184 os.pathsep + \
185 os.environ["PATH"]
186
187 old_cwd = os.getcwd()
188 try:
189 os.chdir(ssl_dir)
190 for arch in ['amd64', 'x86']:
191 prep(arch)
192 finally:
193 os.chdir(old_cwd)
194
195if __name__=='__main__':
196 main()