|
64202
|
1 |
/* Title: Pure/Admin/build_release.scala
|
|
|
2 |
Author: Makarius
|
|
|
3 |
|
|
|
4 |
Build full Isabelle distribution from repository.
|
|
|
5 |
*/
|
|
|
6 |
|
|
|
7 |
package isabelle
|
|
|
8 |
|
|
|
9 |
|
|
|
10 |
object Build_Release
|
|
|
11 |
{
|
|
64203
|
12 |
sealed case class Release_Info(
|
|
|
13 |
date: Date, name: String, dist_dir: Path, dist_archive: Path, dist_library_archive: Path)
|
|
|
14 |
|
|
64202
|
15 |
def build_release(base_dir: Path,
|
|
|
16 |
progress: Progress = Ignore_Progress,
|
|
|
17 |
rev: String = "",
|
|
|
18 |
official_release: Boolean = false,
|
|
|
19 |
release_name: String = "",
|
|
|
20 |
build_library: Boolean = false,
|
|
|
21 |
parallel_jobs: Int = 1,
|
|
64203
|
22 |
remote_mac: String = ""): Release_Info =
|
|
64202
|
23 |
{
|
|
|
24 |
/* release info */
|
|
|
25 |
|
|
64203
|
26 |
val release_info =
|
|
|
27 |
{
|
|
|
28 |
val date = Date.now()
|
|
|
29 |
val name = if (release_name != "") release_name else "Isabelle_" + Date.Format.date(date)
|
|
|
30 |
val dist_dir = base_dir + Path.explode("dist-" + name)
|
|
|
31 |
val dist_archive = dist_dir + Path.explode(name + ".tar.gz")
|
|
|
32 |
val dist_library_archive = dist_dir + Path.explode(name + "_library.tar.gz")
|
|
|
33 |
Release_Info(date, name, dist_dir, dist_archive, dist_library_archive)
|
|
|
34 |
}
|
|
64202
|
35 |
|
|
|
36 |
|
|
|
37 |
/* make distribution */
|
|
|
38 |
|
|
64203
|
39 |
val jobs_option = " -j" + parallel_jobs.toString
|
|
|
40 |
|
|
|
41 |
if (release_info.dist_archive.is_file)
|
|
|
42 |
progress.echo("Release archive " + release_info.dist_archive + " already exists")
|
|
|
43 |
else {
|
|
|
44 |
progress.echo("Producing release archive " + release_info.dist_archive + " ...")
|
|
|
45 |
progress.bash(
|
|
|
46 |
"isabelle makedist -d " + File.bash_path(base_dir) + jobs_option +
|
|
|
47 |
(if (official_release) " -O" else "") +
|
|
|
48 |
(if (release_name != "") " -r " + File.bash_string(release_name) else "") +
|
|
|
49 |
(if (rev != "") " " + File.bash_string(rev) else ""),
|
|
|
50 |
echo = true).check
|
|
|
51 |
}
|
|
64202
|
52 |
|
|
|
53 |
|
|
|
54 |
/* make application bundles */
|
|
|
55 |
|
|
64203
|
56 |
val platform_bundles =
|
|
|
57 |
List("linux" -> (release_info.name + "_app.tar.gz"),
|
|
|
58 |
"windows" -> (release_info.name + "-win32.exe"),
|
|
|
59 |
"windows64" -> (release_info.name + "-win64.exe"),
|
|
|
60 |
"macos" -> (release_info.name + ".dmg"))
|
|
|
61 |
|
|
|
62 |
for ((platform_family, bundle) <- platform_bundles) {
|
|
|
63 |
val bundle_archive =
|
|
|
64 |
release_info.dist_dir +
|
|
|
65 |
Path.explode(
|
|
|
66 |
if (platform_family == "macos" && remote_mac.isEmpty)
|
|
|
67 |
release_info.name + "_dmg.tar.gz"
|
|
|
68 |
else bundle)
|
|
|
69 |
if (bundle_archive.is_file)
|
|
|
70 |
progress.echo("Application bundle " + bundle_archive + " already exists")
|
|
|
71 |
else {
|
|
|
72 |
progress.echo("\n*** " + platform_family + ": " + bundle_archive + " ***")
|
|
|
73 |
progress.bash(
|
|
|
74 |
"isabelle makedist_bundle " + File.bash_path(release_info.dist_archive) +
|
|
|
75 |
" " + File.bash_string(platform_family) +
|
|
|
76 |
(if (remote_mac == "") "" else " " + File.bash_string(remote_mac)),
|
|
|
77 |
echo = true).check
|
|
|
78 |
}
|
|
64202
|
79 |
}
|
|
|
80 |
|
|
|
81 |
|
|
|
82 |
/* minimal website */
|
|
|
83 |
|
|
64203
|
84 |
File.write(release_info.dist_dir + Path.explode("index.html"),
|
|
64202
|
85 |
"""<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 3.2//EN">
|
|
|
86 |
<html>
|
|
|
87 |
<head>
|
|
64203
|
88 |
<title>""" + HTML.output(release_info.name) + """</title>
|
|
64202
|
89 |
</head>
|
|
|
90 |
|
|
|
91 |
<body>
|
|
64203
|
92 |
<h1>""" + HTML.output(release_info.name) + """</h1>
|
|
64202
|
93 |
<ul>
|
|
64203
|
94 |
""" +
|
|
|
95 |
cat_lines(platform_bundles.map({ case (a, b) =>
|
|
|
96 |
"<li><a href=" + quote(HTML.output(a)) + ">" + HTML.output(b) + "</a></li>" })) +
|
|
|
97 |
"""
|
|
64202
|
98 |
</ul>
|
|
|
99 |
</body>
|
|
|
100 |
|
|
|
101 |
</html>
|
|
|
102 |
""")
|
|
|
103 |
|
|
|
104 |
|
|
|
105 |
/* HTML library */
|
|
|
106 |
|
|
64203
|
107 |
if (build_library) {
|
|
|
108 |
if (release_info.dist_library_archive.is_file)
|
|
|
109 |
progress.echo("Library archive " + release_info.dist_library_archive + " already exists")
|
|
|
110 |
else {
|
|
|
111 |
progress.bash("\"$ISABELLE_HOME/Admin/Release/build_library\"" + jobs_option + " " +
|
|
|
112 |
File.bash_path(release_info.dist_dir +
|
|
|
113 |
Path.explode(release_info.name + "_" +
|
|
|
114 |
Isabelle_System.getenv_strict("ISABELLE_PLATFORM_FAMILY") + ".tar.gz"))).check
|
|
|
115 |
}
|
|
|
116 |
}
|
|
|
117 |
|
|
|
118 |
|
|
|
119 |
release_info
|
|
64202
|
120 |
}
|
|
|
121 |
|
|
|
122 |
|
|
|
123 |
|
|
|
124 |
/** command line entry point **/
|
|
|
125 |
|
|
|
126 |
def main(args: Array[String])
|
|
|
127 |
{
|
|
|
128 |
Command_Line.tool0 {
|
|
|
129 |
var remote_mac = ""
|
|
|
130 |
var official_release = false
|
|
|
131 |
var release_name = ""
|
|
|
132 |
var parallel_jobs = 1
|
|
|
133 |
var build_library = false
|
|
|
134 |
var rev = ""
|
|
|
135 |
|
|
|
136 |
val getopts = Getopts("""
|
|
|
137 |
Usage: Admin/build_release [OPTIONS] BASE_DIR
|
|
|
138 |
|
|
|
139 |
Options are:
|
|
|
140 |
-M USER@HOST remote Mac OS X for dmg build
|
|
|
141 |
-O official release (not release-candidate)
|
|
|
142 |
-R RELEASE proper release with name
|
|
|
143 |
-j INT maximum number of parallel jobs (default 1)
|
|
|
144 |
-l build library
|
|
|
145 |
-r REV Mercurial changeset id (default: RELEASE or tip)
|
|
|
146 |
|
|
|
147 |
Build Isabelle release in base directory, using the local repository clone.
|
|
|
148 |
""",
|
|
|
149 |
"M:" -> (arg => remote_mac = arg),
|
|
|
150 |
"O" -> (_ => official_release = true),
|
|
|
151 |
"R:" -> (arg => release_name = arg),
|
|
|
152 |
"j:" -> (arg => parallel_jobs = Value.Int.parse(arg)),
|
|
|
153 |
"l" -> (_ => build_library))
|
|
|
154 |
|
|
|
155 |
val more_args = getopts(args)
|
|
|
156 |
val base_dir = more_args match { case List(base_dir) => base_dir case _ => getopts.usage() }
|
|
|
157 |
|
|
|
158 |
val progress = new Console_Progress()
|
|
|
159 |
|
|
|
160 |
build_release(Path.explode(base_dir), progress = progress, rev = rev,
|
|
|
161 |
official_release = official_release, release_name = release_name,
|
|
|
162 |
build_library = build_library, parallel_jobs = parallel_jobs, remote_mac = remote_mac)
|
|
|
163 |
}
|
|
|
164 |
}
|
|
|
165 |
}
|