| # Script for building the _ssl module for Windows. |
| # Uses Perl to setup the OpenSSL environment correctly |
| # and build OpenSSL, then invokes a simple nmake session |
| # for _ssl.pyd itself. |
| |
| # THEORETICALLY, you can: |
| # * Unpack the latest SSL release one level above your main Python source |
| # directory. It is likely you will already find the zlib library and |
| # any other external packages there. |
| # * Install ActivePerl and ensure it is somewhere on your path. |
| # * Run this script from the PC/VC6 directory. |
| # |
| # it should configure and build SSL, then build the ssl Python extension |
| # without intervention. |
| |
| # Modified by Christian Heimes |
| # Now this script supports pre-generated makefiles and assembly files. |
| # Developers don't need an installation of Perl anymore to build Python. A svn |
| # checkout from our svn repository is enough. |
| |
| import os, sys, re, shutil |
| |
| # Find all "foo.exe" files on the PATH. |
| def find_all_on_path(filename, extras = None): |
| entries = os.environ["PATH"].split(os.pathsep) |
| ret = [] |
| for p in entries: |
| fname = os.path.abspath(os.path.join(p, filename)) |
| if os.path.isfile(fname) and fname not in ret: |
| ret.append(fname) |
| if extras: |
| for p in extras: |
| fname = os.path.abspath(os.path.join(p, filename)) |
| if os.path.isfile(fname) and fname not in ret: |
| ret.append(fname) |
| return ret |
| |
| # Find a suitable Perl installation for OpenSSL. |
| # cygwin perl does *not* work. ActivePerl does. |
| # Being a Perl dummy, the simplest way I can check is if the "Win32" package |
| # is available. |
| def find_working_perl(perls): |
| for perl in perls: |
| fh = os.popen('"%s" -e "use Win32;"' % perl) |
| fh.read() |
| rc = fh.close() |
| if rc: |
| continue |
| return perl |
| print("Can not find a suitable PERL:") |
| if perls: |
| print(" the following perl interpreters were found:") |
| for p in perls: |
| print(" ", p) |
| print(" None of these versions appear suitable for building OpenSSL") |
| else: |
| print(" NO perl interpreters were found on this machine at all!") |
| print(" Please install ActivePerl and ensure it appears on your path") |
| return None |
| |
| # Locate the best SSL directory given a few roots to look into. |
| def find_best_ssl_dir(sources): |
| candidates = [] |
| for s in sources: |
| try: |
| # note: do not abspath s; the build will fail if any |
| # higher up directory name has spaces in it. |
| fnames = os.listdir(s) |
| except os.error: |
| fnames = [] |
| for fname in fnames: |
| fqn = os.path.join(s, fname) |
| if os.path.isdir(fqn) and fname.startswith("openssl-"): |
| candidates.append(fqn) |
| # Now we have all the candidates, locate the best. |
| best_parts = [] |
| best_name = None |
| for c in candidates: |
| parts = re.split("[.-]", os.path.basename(c))[1:] |
| # eg - openssl-0.9.7-beta1 - ignore all "beta" or any other qualifiers |
| if len(parts) >= 4: |
| continue |
| if parts > best_parts: |
| best_parts = parts |
| best_name = c |
| if best_name is not None: |
| print("Found an SSL directory at '%s'" % (best_name,)) |
| else: |
| print("Could not find an SSL directory in '%s'" % (sources,)) |
| sys.stdout.flush() |
| return best_name |
| |
| def fix_makefile(makefile): |
| """Fix some stuff in all makefiles |
| """ |
| if not os.path.isfile(makefile): |
| return |
| with open(makefile) as fin: |
| lines = fin.readlines() |
| with open(makefile, 'w') as fout: |
| for line in lines: |
| if line.startswith("PERL="): |
| continue |
| if line.startswith("CP="): |
| line = "CP=copy\n" |
| if line.startswith("MKDIR="): |
| line = "MKDIR=mkdir\n" |
| if line.startswith("CFLAG="): |
| line = line.strip() |
| for algo in ("RC5", "MDC2", "IDEA"): |
| noalgo = " -DOPENSSL_NO_%s" % algo |
| if noalgo not in line: |
| line = line + noalgo |
| line = line + '\n' |
| fout.write(line) |
| |
| def run_configure(configure, do_script): |
| print("perl Configure "+configure) |
| os.system("perl Configure "+configure) |
| print(do_script) |
| os.system(do_script) |
| |
| def cmp(f1, f2): |
| bufsize = 1024 * 8 |
| with open(f1, 'rb') as fp1, open(f2, 'rb') as fp2: |
| while True: |
| b1 = fp1.read(bufsize) |
| b2 = fp2.read(bufsize) |
| if b1 != b2: |
| return False |
| if not b1: |
| return True |
| |
| def copy(src, dst): |
| if os.path.isfile(dst) and cmp(src, dst): |
| return |
| shutil.copy(src, dst) |
| |
| def main(): |
| debug = "-d" in sys.argv |
| build_all = "-a" in sys.argv |
| if 1: # Win32 |
| arch = "x86" |
| configure = "VC-WIN32" |
| do_script = "ms\\do_nasm" |
| makefile="ms\\nt.mak" |
| m32 = makefile |
| dirsuffix = "32" |
| configure += " no-idea no-rc5 no-mdc2" |
| make_flags = "" |
| if build_all: |
| make_flags = "-a" |
| # perl should be on the path, but we also look in "\perl" and "c:\\perl" |
| # as "well known" locations |
| perls = find_all_on_path("perl.exe", ["\\perl\\bin", "C:\\perl\\bin"]) |
| perl = find_working_perl(perls) |
| if perl: |
| print("Found a working perl at '%s'" % (perl,)) |
| else: |
| print("No Perl installation was found. Existing Makefiles are used.") |
| sys.stdout.flush() |
| # Look for SSL 3 levels up from PC/VC6 - ie, same place zlib etc all live. |
| ssl_dir = find_best_ssl_dir(("..\\..\\..",)) |
| if ssl_dir is None: |
| sys.exit(1) |
| |
| old_cd = os.getcwd() |
| try: |
| os.chdir(ssl_dir) |
| # If the ssl makefiles do not exist, we invoke Perl to generate them. |
| # Due to a bug in this script, the makefile sometimes ended up empty |
| # Force a regeneration if it is. |
| if not os.path.isfile(makefile) or os.path.getsize(makefile)==0: |
| if perl is None: |
| print("Perl is required to build the makefiles!") |
| sys.exit(1) |
| |
| print("Creating the makefiles...") |
| sys.stdout.flush() |
| # Put our working Perl at the front of our path |
| os.environ["PATH"] = os.path.dirname(perl) + \ |
| os.pathsep + \ |
| os.environ["PATH"] |
| run_configure(configure, do_script) |
| if debug: |
| print("OpenSSL debug builds aren't supported.") |
| #if arch=="x86" and debug: |
| # # the do_masm script in openssl doesn't generate a debug |
| # # build makefile so we generate it here: |
| # os.system("perl util\mk1mf.pl debug "+configure+" >"+makefile) |
| |
| fix_makefile(makefile) |
| copy(r"crypto\buildinf.h", r"crypto\buildinf_%s.h" % arch) |
| copy(r"crypto\opensslconf.h", r"crypto\opensslconf_%s.h" % arch) |
| |
| # If the assembler files don't exist in tmpXX, copy them there |
| if perl is None and os.path.exists("asm"+dirsuffix): |
| if not os.path.exists("tmp"+dirsuffix): |
| os.mkdir("tmp"+dirsuffix) |
| for f in os.listdir("asm"+dirsuffix): |
| if not f.endswith(".asm"): continue |
| if os.path.isfile(r"tmp%s\%s" % (dirsuffix, f)): continue |
| shutil.copy(r"asm%s\%s" % (dirsuffix, f), "tmp"+dirsuffix) |
| |
| # Now run make. |
| copy(r"crypto\buildinf_%s.h" % arch, r"crypto\buildinf.h") |
| copy(r"crypto\opensslconf_%s.h" % arch, r"crypto\opensslconf.h") |
| |
| #makeCommand = "nmake /nologo PERL=\"%s\" -f \"%s\"" %(perl, makefile) |
| makeCommand = "nmake /nologo -f \"%s\"" % makefile |
| print("Executing ssl makefiles:", makeCommand) |
| sys.stdout.flush() |
| rc = os.system(makeCommand) |
| if rc: |
| print("Executing "+makefile+" failed") |
| print(rc) |
| sys.exit(rc) |
| finally: |
| os.chdir(old_cd) |
| # And finally, we can build the _ssl module itself for Python. |
| defs = "SSL_DIR=%s" % (ssl_dir,) |
| if debug: |
| defs = defs + " " + "DEBUG=1" |
| rc = os.system('nmake /nologo -f _ssl.mak ' + defs + " " + make_flags) |
| sys.exit(rc) |
| |
| if __name__=='__main__': |
| main() |