Mercurial > cpython-lru_cache-weakref

annotate PC/VC6/build_ssl.py @ 54294:dba767bc3155 legacy-trunk

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
remove mention of old ctypes version
author Benjamin Peterson <benjamin@python.org>
date Sat, 23 May 2009 20:59:09 +0000
parents 58b286e15ebc
children 534af91f3845
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
1 # Script for building the _ssl module for Windows.
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
2 # Uses Perl to setup the OpenSSL environment correctly
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
3 # and build OpenSSL, then invokes a simple nmake session
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
4 # for _ssl.pyd itself.
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
5
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
6 # THEORETICALLY, you can:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
7 # * Unpack the latest SSL release one level above your main Python source
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
8 # directory. It is likely you will already find the zlib library and
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
9 # any other external packages there.
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
10 # * Install ActivePerl and ensure it is somewhere on your path.
48226
eccd9429702e Issue #2065: VC6 related fix.
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 44476
diff changeset
11 # * Run this script from the PC/VC6 directory.
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
12 #
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
13 # it should configure and build SSL, then build the ssl Python extension
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
14 # without intervention.
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
15
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
16 import os, sys, re, shutil
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
17
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
18 # Find all "foo.exe" files on the PATH.
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
19 def find_all_on_path(filename, extras = None):
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
20 entries = os.environ["PATH"].split(os.pathsep)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
21 ret = []
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
22 for p in entries:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
23 fname = os.path.abspath(os.path.join(p, filename))
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
24 if os.path.isfile(fname) and fname not in ret:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
25 ret.append(fname)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
26 if extras:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
27 for p in extras:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
28 fname = os.path.abspath(os.path.join(p, filename))
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
29 if os.path.isfile(fname) and fname not in ret:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
30 ret.append(fname)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
31 return ret
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
32
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
33 # Find a suitable Perl installation for OpenSSL.
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
34 # cygwin perl does *not* work. ActivePerl does.
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
35 # Being a Perl dummy, the simplest way I can check is if the "Win32" package
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
36 # is available.
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
37 def find_working_perl(perls):
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
38 for perl in perls:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
39 fh = os.popen(perl + ' -e "use Win32;"')
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
40 fh.read()
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
41 rc = fh.close()
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
42 if rc:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
43 continue
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
44 return perl
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
45 print "Can not find a suitable PERL:"
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
46 if perls:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
47 print " the following perl interpreters were found:"
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
48 for p in perls:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
49 print " ", p
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
50 print " None of these versions appear suitable for building OpenSSL"
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
51 else:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
52 print " NO perl interpreters were found on this machine at all!"
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
53 print " Please install ActivePerl and ensure it appears on your path"
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
54 return None
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
55
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
56 # Locate the best SSL directory given a few roots to look into.
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
57 def find_best_ssl_dir(sources):
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
58 candidates = []
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
59 for s in sources:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
60 try:
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
61 # note: do not abspath s; the build will fail if any
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
62 # higher up directory name has spaces in it.
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
63 fnames = os.listdir(s)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
64 except os.error:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
65 fnames = []
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
66 for fname in fnames:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
67 fqn = os.path.join(s, fname)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
68 if os.path.isdir(fqn) and fname.startswith("openssl-"):
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
69 candidates.append(fqn)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
70 # Now we have all the candidates, locate the best.
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
71 best_parts = []
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
72 best_name = None
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
73 for c in candidates:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
74 parts = re.split("[.-]", os.path.basename(c))[1:]
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
75 # eg - openssl-0.9.7-beta1 - ignore all "beta" or any other qualifiers
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
76 if len(parts) >= 4:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
77 continue
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
78 if parts > best_parts:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
79 best_parts = parts
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
80 best_name = c
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
81 if best_name is not None:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
82 print "Found an SSL directory at '%s'" % (best_name,)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
83 else:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
84 print "Could not find an SSL directory in '%s'" % (sources,)
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
85 sys.stdout.flush()
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
86 return best_name
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
87
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
88 def fix_makefile(makefile):
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
89 """Fix some stuff in all makefiles
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
90 """
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
91 if not os.path.isfile(makefile):
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
92 return
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
93 # 2.4 compatibility
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
94 fin = open(makefile)
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
95 if 1: # with open(makefile) as fin:
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
96 lines = fin.readlines()
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
97 fin.close()
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
98 fout = open(makefile, 'w')
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
99 if 1: # with open(makefile, 'w') as fout:
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
100 for line in lines:
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
101 if line.startswith("PERL="):
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
102 continue
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
103 if line.startswith("CP="):
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
104 line = "CP=copy\n"
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
105 if line.startswith("MKDIR="):
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
106 line = "MKDIR=mkdir\n"
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
107 if line.startswith("CFLAG="):
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
108 line = line.strip()
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
109 for algo in ("RC5", "MDC2", "IDEA"):
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
110 noalgo = " -DOPENSSL_NO_%s" % algo
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
111 if noalgo not in line:
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
112 line = line + noalgo
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
113 line = line + '\n'
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
114 fout.write(line)
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
115 fout.close()
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
116
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
117 def run_configure(configure, do_script):
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
118 print "perl Configure "+configure
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
119 os.system("perl Configure "+configure)
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
120 print do_script
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
121 os.system(do_script)
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
122
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
123 def main():
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
124 debug = "-d" in sys.argv
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
125 build_all = "-a" in sys.argv
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
126 if 1: # Win32
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
127 arch = "x86"
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
128 configure = "VC-WIN32"
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
129 do_script = "ms\\do_nasm"
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
130 makefile="ms\\nt.mak"
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
131 m32 = makefile
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
132 configure += " no-idea no-rc5 no-mdc2"
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
133 make_flags = ""
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
134 if build_all:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
135 make_flags = "-a"
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
136 # perl should be on the path, but we also look in "\perl" and "c:\\perl"
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
137 # as "well known" locations
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
138 perls = find_all_on_path("perl.exe", ["\\perl\\bin", "C:\\perl\\bin"])
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
139 perl = find_working_perl(perls)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
140 if perl is None:
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
141 print "No Perl installation was found. Existing Makefiles are used."
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
142 else:
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
143 print "Found a working perl at '%s'" % (perl,)
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
144 sys.stdout.flush()
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
145 # Look for SSL 3 levels up from pcbuild - ie, same place zlib etc all live.
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
146 ssl_dir = find_best_ssl_dir(("..\\..\\..",))
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
147 if ssl_dir is None:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
148 sys.exit(1)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
149
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
150 old_cd = os.getcwd()
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
151 try:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
152 os.chdir(ssl_dir)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
153 # If the ssl makefiles do not exist, we invoke Perl to generate them.
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
154 # Due to a bug in this script, the makefile sometimes ended up empty
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
155 # Force a regeneration if it is.
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
156 if not os.path.isfile(makefile) or os.path.getsize(makefile)==0:
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
157 if perl is None:
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
158 print "Perl is required to build the makefiles!"
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
159 sys.exit(1)
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
160
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
161 print "Creating the makefiles..."
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
162 sys.stdout.flush()
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
163 # Put our working Perl at the front of our path
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
164 os.environ["PATH"] = os.path.dirname(perl) + \
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
165 os.pathsep + \
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
166 os.environ["PATH"]
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
167 run_configure(configure, do_script)
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
168 if debug:
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
169 print "OpenSSL debug builds aren't supported."
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
170 #if arch=="x86" and debug:
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
171 # # the do_masm script in openssl doesn't generate a debug
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
172 # # build makefile so we generate it here:
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
173 # os.system("perl util\mk1mf.pl debug "+configure+" >"+makefile)
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
174
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
175 fix_makefile(makefile)
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
176 shutil.copy(r"crypto\buildinf.h", r"crypto\buildinf_%s.h" % arch)
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
177 shutil.copy(r"crypto\opensslconf.h", r"crypto\opensslconf_%s.h" % arch)
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
178
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
179 # Now run make.
52205
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
180 shutil.copy(r"crypto\buildinf_%s.h" % arch, r"crypto\buildinf.h")
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
181 shutil.copy(r"crypto\opensslconf_%s.h" % arch, r"crypto\opensslconf.h")
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
182
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
183 #makeCommand = "nmake /nologo PERL=\"%s\" -f \"%s\"" %(perl, makefile)
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
184 makeCommand = "nmake /nologo -f \"%s\"" % makefile
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
185 print "Executing ssl makefiles:", makeCommand
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
186 sys.stdout.flush()
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
187 rc = os.system(makeCommand)
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
188 if rc:
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
189 print "Executing "+makefile+" failed"
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
190 print rc
58b286e15ebc Merged revisions 70448 via svnmerge from
Hirokazu Yamamoto <ocean-city@m2.ccsnet.ne.jp>
parents: 48226
diff changeset
191 sys.exit(rc)
31333
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
192 finally:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
193 os.chdir(old_cd)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
194 # And finally, we can build the _ssl module itself for Python.
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
195 defs = "SSL_DIR=%s" % (ssl_dir,)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
196 if debug:
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
197 defs = defs + " " + "DEBUG=1"
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
198 rc = os.system('nmake /nologo -f _ssl.mak ' + defs + " " + make_flags)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
199 sys.exit(rc)
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
200
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
201 if __name__=='__main__':
0baa2660a568 The _ssl subproject may <heh> be working w/ VC6 again.
Tim Peters <tim.peters@gmail.com>
parents:
diff changeset
202 main()