| 1 | # Script for building the _ssl module for Windows.
|
|---|
| 2 | # Uses Perl to setup the OpenSSL environment correctly
|
|---|
| 3 | # and build OpenSSL, then invokes a simple nmake session
|
|---|
| 4 | # for _ssl.pyd itself.
|
|---|
| 5 |
|
|---|
| 6 | # THEORETICALLY, you can:
|
|---|
| 7 | # * Unpack the latest SSL release one level above your main Python source
|
|---|
| 8 | # directory. It is likely you will already find the zlib library and
|
|---|
| 9 | # any other external packages there.
|
|---|
| 10 | # * Install ActivePerl and ensure it is somewhere on your path.
|
|---|
| 11 | # * Run this script from the PC/VC6 directory.
|
|---|
| 12 | #
|
|---|
| 13 | # it should configure and build SSL, then build the ssl Python extension
|
|---|
| 14 | # without intervention.
|
|---|
| 15 |
|
|---|
| 16 | # Modified by Christian Heimes
|
|---|
| 17 | # Now this script supports pre-generated makefiles and assembly files.
|
|---|
| 18 | # Developers don't need an installation of Perl anymore to build Python. A svn
|
|---|
| 19 | # checkout from our svn repository is enough.
|
|---|
| 20 |
|
|---|
| 21 | import os, sys, re, shutil
|
|---|
| 22 |
|
|---|
| 23 | # Find all "foo.exe" files on the PATH.
|
|---|
| 24 | def find_all_on_path(filename, extras = None):
|
|---|
| 25 | entries = os.environ["PATH"].split(os.pathsep)
|
|---|
| 26 | ret = []
|
|---|
| 27 | for p in entries:
|
|---|
| 28 | fname = os.path.abspath(os.path.join(p, filename))
|
|---|
| 29 | if os.path.isfile(fname) and fname not in ret:
|
|---|
| 30 | ret.append(fname)
|
|---|
| 31 | if extras:
|
|---|
| 32 | for p in extras:
|
|---|
| 33 | fname = os.path.abspath(os.path.join(p, filename))
|
|---|
| 34 | if os.path.isfile(fname) and fname not in ret:
|
|---|
| 35 | ret.append(fname)
|
|---|
| 36 | return ret
|
|---|
| 37 |
|
|---|
| 38 | # Find a suitable Perl installation for OpenSSL.
|
|---|
| 39 | # cygwin perl does *not* work. ActivePerl does.
|
|---|
| 40 | # Being a Perl dummy, the simplest way I can check is if the "Win32" package
|
|---|
| 41 | # is available.
|
|---|
| 42 | def find_working_perl(perls):
|
|---|
| 43 | for perl in perls:
|
|---|
| 44 | fh = os.popen('"%s" -e "use Win32;"' % perl)
|
|---|
| 45 | fh.read()
|
|---|
| 46 | rc = fh.close()
|
|---|
| 47 | if rc:
|
|---|
| 48 | continue
|
|---|
| 49 | return perl
|
|---|
| 50 | print "Can not find a suitable PERL:"
|
|---|
| 51 | if perls:
|
|---|
| 52 | print " the following perl interpreters were found:"
|
|---|
| 53 | for p in perls:
|
|---|
| 54 | print " ", p
|
|---|
| 55 | print " None of these versions appear suitable for building OpenSSL"
|
|---|
| 56 | else:
|
|---|
| 57 | print " NO perl interpreters were found on this machine at all!"
|
|---|
| 58 | print " Please install ActivePerl and ensure it appears on your path"
|
|---|
| 59 | return None
|
|---|
| 60 |
|
|---|
| 61 | # Locate the best SSL directory given a few roots to look into.
|
|---|
| 62 | def find_best_ssl_dir(sources):
|
|---|
| 63 | candidates = []
|
|---|
| 64 | for s in sources:
|
|---|
| 65 | try:
|
|---|
| 66 | # note: do not abspath s; the build will fail if any
|
|---|
| 67 | # higher up directory name has spaces in it.
|
|---|
| 68 | fnames = os.listdir(s)
|
|---|
| 69 | except os.error:
|
|---|
| 70 | fnames = []
|
|---|
| 71 | for fname in fnames:
|
|---|
| 72 | fqn = os.path.join(s, fname)
|
|---|
| 73 | if os.path.isdir(fqn) and fname.startswith("openssl-"):
|
|---|
| 74 | candidates.append(fqn)
|
|---|
| 75 | # Now we have all the candidates, locate the best.
|
|---|
| 76 | best_parts = []
|
|---|
| 77 | best_name = None
|
|---|
| 78 | for c in candidates:
|
|---|
| 79 | parts = re.split("[.-]", os.path.basename(c))[1:]
|
|---|
| 80 | # eg - openssl-0.9.7-beta1 - ignore all "beta" or any other qualifiers
|
|---|
| 81 | if len(parts) >= 4:
|
|---|
| 82 | continue
|
|---|
| 83 | if parts > best_parts:
|
|---|
| 84 | best_parts = parts
|
|---|
| 85 | best_name = c
|
|---|
| 86 | if best_name is not None:
|
|---|
| 87 | print "Found an SSL directory at '%s'" % (best_name,)
|
|---|
| 88 | else:
|
|---|
| 89 | print "Could not find an SSL directory in '%s'" % (sources,)
|
|---|
| 90 | sys.stdout.flush()
|
|---|
| 91 | return best_name
|
|---|
| 92 |
|
|---|
| 93 | def fix_makefile(makefile):
|
|---|
| 94 | """Fix some stuff in all makefiles
|
|---|
| 95 | """
|
|---|
| 96 | if not os.path.isfile(makefile):
|
|---|
| 97 | return
|
|---|
| 98 | # 2.4 compatibility
|
|---|
| 99 | fin = open(makefile)
|
|---|
| 100 | if 1: # with open(makefile) as fin:
|
|---|
| 101 | lines = fin.readlines()
|
|---|
| 102 | fin.close()
|
|---|
| 103 | fout = open(makefile, 'w')
|
|---|
| 104 | if 1: # with open(makefile, 'w') as fout:
|
|---|
| 105 | for line in lines:
|
|---|
| 106 | if line.startswith("PERL="):
|
|---|
| 107 | continue
|
|---|
| 108 | if line.startswith("CP="):
|
|---|
| 109 | line = "CP=copy\n"
|
|---|
| 110 | if line.startswith("MKDIR="):
|
|---|
| 111 | line = "MKDIR=mkdir\n"
|
|---|
| 112 | if line.startswith("CFLAG="):
|
|---|
| 113 | line = line.strip()
|
|---|
| 114 | for algo in ("RC5", "MDC2", "IDEA"):
|
|---|
| 115 | noalgo = " -DOPENSSL_NO_%s" % algo
|
|---|
| 116 | if noalgo not in line:
|
|---|
| 117 | line = line + noalgo
|
|---|
| 118 | line = line + '\n'
|
|---|
| 119 | fout.write(line)
|
|---|
| 120 | fout.close()
|
|---|
| 121 |
|
|---|
| 122 | def run_configure(configure, do_script):
|
|---|
| 123 | print "perl Configure "+configure
|
|---|
| 124 | os.system("perl Configure "+configure)
|
|---|
| 125 | print do_script
|
|---|
| 126 | os.system(do_script)
|
|---|
| 127 |
|
|---|
| 128 | def cmp(f1, f2):
|
|---|
| 129 | bufsize = 1024 * 8
|
|---|
| 130 | with open(f1, 'rb') as fp1, open(f2, 'rb') as fp2:
|
|---|
| 131 | while True:
|
|---|
| 132 | b1 = fp1.read(bufsize)
|
|---|
| 133 | b2 = fp2.read(bufsize)
|
|---|
| 134 | if b1 != b2:
|
|---|
| 135 | return False
|
|---|
| 136 | if not b1:
|
|---|
| 137 | return True
|
|---|
| 138 |
|
|---|
| 139 | def copy(src, dst):
|
|---|
| 140 | if os.path.isfile(dst) and cmp(src, dst):
|
|---|
| 141 | return
|
|---|
| 142 | shutil.copy(src, dst)
|
|---|
| 143 |
|
|---|
| 144 | def main():
|
|---|
| 145 | debug = "-d" in sys.argv
|
|---|
| 146 | build_all = "-a" in sys.argv
|
|---|
| 147 | if 1: # Win32
|
|---|
| 148 | arch = "x86"
|
|---|
| 149 | configure = "VC-WIN32"
|
|---|
| 150 | do_script = "ms\\do_nasm"
|
|---|
| 151 | makefile="ms\\nt.mak"
|
|---|
| 152 | m32 = makefile
|
|---|
| 153 | dirsuffix = "32"
|
|---|
| 154 | configure += " no-idea no-rc5 no-mdc2"
|
|---|
| 155 | make_flags = ""
|
|---|
| 156 | if build_all:
|
|---|
| 157 | make_flags = "-a"
|
|---|
| 158 | # perl should be on the path, but we also look in "\perl" and "c:\\perl"
|
|---|
| 159 | # as "well known" locations
|
|---|
| 160 | perls = find_all_on_path("perl.exe", ["\\perl\\bin", "C:\\perl\\bin"])
|
|---|
| 161 | perl = find_working_perl(perls)
|
|---|
| 162 | if perl:
|
|---|
| 163 | print "Found a working perl at '%s'" % (perl,)
|
|---|
| 164 | else:
|
|---|
| 165 | print "No Perl installation was found. Existing Makefiles are used."
|
|---|
| 166 | sys.stdout.flush()
|
|---|
| 167 | # Look for SSL 3 levels up from PC/VC6 - ie, same place zlib etc all live.
|
|---|
| 168 | ssl_dir = find_best_ssl_dir(("..\\..\\..",))
|
|---|
| 169 | if ssl_dir is None:
|
|---|
| 170 | sys.exit(1)
|
|---|
| 171 |
|
|---|
| 172 | old_cd = os.getcwd()
|
|---|
| 173 | try:
|
|---|
| 174 | os.chdir(ssl_dir)
|
|---|
| 175 | # If the ssl makefiles do not exist, we invoke Perl to generate them.
|
|---|
| 176 | # Due to a bug in this script, the makefile sometimes ended up empty
|
|---|
| 177 | # Force a regeneration if it is.
|
|---|
| 178 | if not os.path.isfile(makefile) or os.path.getsize(makefile)==0:
|
|---|
| 179 | if perl is None:
|
|---|
| 180 | print "Perl is required to build the makefiles!"
|
|---|
| 181 | sys.exit(1)
|
|---|
| 182 |
|
|---|
| 183 | print "Creating the makefiles..."
|
|---|
| 184 | sys.stdout.flush()
|
|---|
| 185 | # Put our working Perl at the front of our path
|
|---|
| 186 | os.environ["PATH"] = os.path.dirname(perl) + \
|
|---|
| 187 | os.pathsep + \
|
|---|
| 188 | os.environ["PATH"]
|
|---|
| 189 | run_configure(configure, do_script)
|
|---|
| 190 | if debug:
|
|---|
| 191 | print "OpenSSL debug builds aren't supported."
|
|---|
| 192 | #if arch=="x86" and debug:
|
|---|
| 193 | # # the do_masm script in openssl doesn't generate a debug
|
|---|
| 194 | # # build makefile so we generate it here:
|
|---|
| 195 | # os.system("perl util\mk1mf.pl debug "+configure+" >"+makefile)
|
|---|
| 196 |
|
|---|
| 197 | fix_makefile(makefile)
|
|---|
| 198 | copy(r"crypto\buildinf.h", r"crypto\buildinf_%s.h" % arch)
|
|---|
| 199 | copy(r"crypto\opensslconf.h", r"crypto\opensslconf_%s.h" % arch)
|
|---|
| 200 |
|
|---|
| 201 | # If the assembler files don't exist in tmpXX, copy them there
|
|---|
| 202 | if perl is None:
|
|---|
| 203 | if not os.path.exists("tmp"+dirsuffix):
|
|---|
| 204 | os.mkdir("tmp"+dirsuffix)
|
|---|
| 205 | for f in os.listdir("asm"+dirsuffix):
|
|---|
| 206 | if not f.endswith(".asm"): continue
|
|---|
| 207 | if os.path.isfile(r"tmp%s\%s" % (dirsuffix, f)): continue
|
|---|
| 208 | shutil.copy(r"asm%s\%s" % (dirsuffix, f), "tmp"+dirsuffix)
|
|---|
| 209 |
|
|---|
| 210 | # Now run make.
|
|---|
| 211 | copy(r"crypto\buildinf_%s.h" % arch, r"crypto\buildinf.h")
|
|---|
| 212 | copy(r"crypto\opensslconf_%s.h" % arch, r"crypto\opensslconf.h")
|
|---|
| 213 |
|
|---|
| 214 | #makeCommand = "nmake /nologo PERL=\"%s\" -f \"%s\"" %(perl, makefile)
|
|---|
| 215 | makeCommand = "nmake /nologo -f \"%s\"" % makefile
|
|---|
| 216 | print "Executing ssl makefiles:", makeCommand
|
|---|
| 217 | sys.stdout.flush()
|
|---|
| 218 | rc = os.system(makeCommand)
|
|---|
| 219 | if rc:
|
|---|
| 220 | print "Executing "+makefile+" failed"
|
|---|
| 221 | print rc
|
|---|
| 222 | sys.exit(rc)
|
|---|
| 223 | finally:
|
|---|
| 224 | os.chdir(old_cd)
|
|---|
| 225 | # And finally, we can build the _ssl module itself for Python.
|
|---|
| 226 | defs = "SSL_DIR=%s" % (ssl_dir,)
|
|---|
| 227 | if debug:
|
|---|
| 228 | defs = defs + " " + "DEBUG=1"
|
|---|
| 229 | rc = os.system('nmake /nologo -f _ssl.mak ' + defs + " " + make_flags)
|
|---|
| 230 | sys.exit(rc)
|
|---|
| 231 |
|
|---|
| 232 | if __name__=='__main__':
|
|---|
| 233 | main()
|
|---|
