Fossil SCM

Add fragment anchors in the changes.wiki page. Update the mkdownload.tcl script so that it works with the new unversioned-file download.

drh 2016-10-24 17:03 trunk
Commit d0c77c7ce04f9f339abea3162f25cc47ab676ca7
--- www/changes.wiki
+++ www/changes.wiki
@@ -1,7 +1,8 @@
11
<title>Change Log</title>
22
3
+<a name='v1_36'></a>
34
<h2>Changes for Version 1.36 (2016-10-24)</h2>
45
56
* Add support for [./unvers.wiki|unversioned content],
67
the [/help?cmd=unversioned|fossil unversioned] command and the
78
[/help?cmd=/uv|/uv] and [/uvlist] web pages.
@@ -28,10 +29,11 @@
2829
able to pull from their parent but not push.
2930
* Added the -nocomplain option to the TH1 "query" command.
3031
* Added support for the chng=GLOBLIST query parameter on the
3132
[/help?cmd=/timeline|/timeline] webpage.
3233
34
+<a name='v1_35'></a>
3335
<h2>Changes for Version 1.35 (2016-06-14)</h2>
3436
3537
* Enable symlinks by default on all non-Windows platforms.
3638
* Enhance the [/md_rules|Markdown formatting] so that hyperlinks that begin
3739
with "/" are relative to the root of the Fossil repository.
@@ -71,10 +73,11 @@
7173
names in place of getpass() to read passwords and passphrases
7274
* Option --baseurl now works on Windows.
7375
* Numerious documentation improvements.
7476
* Update the built-in SQLite to version 3.13.0.
7577
78
+<a name='v1_34'></a>
7679
<h2>Changes for Version 1.34 (2015-11-02)</h2>
7780
7881
* Make the [/help?cmd=clean|fossil clean] command undoable for files less
7982
than 10MiB.
8083
* Update internal Unicode character tables, used in regular expression
@@ -106,10 +109,11 @@
106109
* Change the mimetype for ".n" and ".man" files to text/plain.
107110
* Display improvements in the [/help?cmd=bisect|fossil bisect chart] command.
108111
* Updated the built-in SQLite to version 3.9.1 and activated JSON1 and FTS5
109112
support (both currently unused within Fossil).
110113
114
+<a name='v1_33'></a>
111115
<h2>Changes for Version 1.33 (2015-05-23)</h2>
112116
* Improved fork detection on [/help?cmd=update|fossil update],
113117
[/help?cmd=status|fossil status] and related commands.
114118
* Change the default skin to what used to be called "San Francisco Modern".
115119
* Add the [/repo-tabsize] web page
@@ -155,10 +159,11 @@
155159
field for direct entry of the user name to each applicable report.
156160
* Create parent directories of [/help?cmd=settings|empty-dirs] if they don't
157161
already exist.
158162
* Inhibit timeline links to wiki pages that have been deleted.
159163
164
+<a name='v1_33'></a>
160165
<h2>Changes for Version 1.32 (2015-03-14)</h2>
161166
* When creating a new repository using [/help?cmd=init|fossil init], ensure
162167
that the new repository is fully compatible with historical versions of
163168
Fossil by having a valid manifest as RID 1.
164169
* Anti-aliased rendering of arrowheads on timeline graphs.
@@ -171,10 +176,11 @@
171176
* Enhance the "ln=" query parameter on artifact displays to accept multiple
172177
ranges, separate by spaces (or "+" when URL-encoded).
173178
* Added [/help?cmd=forget|fossil forget] as an alias for
174179
[/help?cmd=rm|fossil rm].
175180
181
+<a name='v1_31'></a>
176182
<h2>Changes For Version 1.31 (2015-02-23)</h2>
177183
* Change the auxiliary schema by adding columns MLINK.ISAUX and MLINK.PMID
178184
columns to the schema, to support better drawing of file change graphs.
179185
A [/help?cmd=rebuild|fossil rebuild] is recommended but is not required.
180186
so that the new graph drawing logic can work effectively.
@@ -222,10 +228,11 @@
222228
* Allow the user of Common Table Expressions in the SQL that defaults
223229
ticket reports.
224230
* Break out the components (css, footer, and header) for the
225231
various built-in skins into separate files in the source tree.
226232
233
+<a name='v1_30'></a>
227234
<h2>Changes For Version 1.30 (2015-01-19)</h2>
228235
* Added the [/help?cmd=bundle|fossil bundle] command.
229236
* Added the [/help?cmd=purge|fossil purge] command.
230237
* Added the [/help?cmd=publish|fossil publish] command.
231238
* Added the [/help?cmd=unpublished|fossil unpublished] command.
@@ -292,10 +299,11 @@
292299
the correctness of printf-style formatting strings.
293300
* Fix CVE-2014-3566, also known as the POODLE SSL 3.0 vulnerability.
294301
* Numerous documentation fixes and improvements.
295302
* Other obscure and minor bug fixes - see the timeline for details.
296303
304
+<a name='v1_29'></a>
297305
<h2>Changes For Version 1.29 (2014-06-12)</h2>
298306
* Add the ability to display content, diffs and annotations for UTF16
299307
text files in the web interface.
300308
* Add the "SaveAs..." and "Invert" buttons
301309
to the graphical diff display that results
302310
--- www/changes.wiki
+++ www/changes.wiki
@@ -1,7 +1,8 @@
1 <title>Change Log</title>
2
 
3 <h2>Changes for Version 1.36 (2016-10-24)</h2>
4
5 * Add support for [./unvers.wiki|unversioned content],
6 the [/help?cmd=unversioned|fossil unversioned] command and the
7 [/help?cmd=/uv|/uv] and [/uvlist] web pages.
@@ -28,10 +29,11 @@
28 able to pull from their parent but not push.
29 * Added the -nocomplain option to the TH1 "query" command.
30 * Added support for the chng=GLOBLIST query parameter on the
31 [/help?cmd=/timeline|/timeline] webpage.
32
 
33 <h2>Changes for Version 1.35 (2016-06-14)</h2>
34
35 * Enable symlinks by default on all non-Windows platforms.
36 * Enhance the [/md_rules|Markdown formatting] so that hyperlinks that begin
37 with "/" are relative to the root of the Fossil repository.
@@ -71,10 +73,11 @@
71 names in place of getpass() to read passwords and passphrases
72 * Option --baseurl now works on Windows.
73 * Numerious documentation improvements.
74 * Update the built-in SQLite to version 3.13.0.
75
 
76 <h2>Changes for Version 1.34 (2015-11-02)</h2>
77
78 * Make the [/help?cmd=clean|fossil clean] command undoable for files less
79 than 10MiB.
80 * Update internal Unicode character tables, used in regular expression
@@ -106,10 +109,11 @@
106 * Change the mimetype for ".n" and ".man" files to text/plain.
107 * Display improvements in the [/help?cmd=bisect|fossil bisect chart] command.
108 * Updated the built-in SQLite to version 3.9.1 and activated JSON1 and FTS5
109 support (both currently unused within Fossil).
110
 
111 <h2>Changes for Version 1.33 (2015-05-23)</h2>
112 * Improved fork detection on [/help?cmd=update|fossil update],
113 [/help?cmd=status|fossil status] and related commands.
114 * Change the default skin to what used to be called "San Francisco Modern".
115 * Add the [/repo-tabsize] web page
@@ -155,10 +159,11 @@
155 field for direct entry of the user name to each applicable report.
156 * Create parent directories of [/help?cmd=settings|empty-dirs] if they don't
157 already exist.
158 * Inhibit timeline links to wiki pages that have been deleted.
159
 
160 <h2>Changes for Version 1.32 (2015-03-14)</h2>
161 * When creating a new repository using [/help?cmd=init|fossil init], ensure
162 that the new repository is fully compatible with historical versions of
163 Fossil by having a valid manifest as RID 1.
164 * Anti-aliased rendering of arrowheads on timeline graphs.
@@ -171,10 +176,11 @@
171 * Enhance the "ln=" query parameter on artifact displays to accept multiple
172 ranges, separate by spaces (or "+" when URL-encoded).
173 * Added [/help?cmd=forget|fossil forget] as an alias for
174 [/help?cmd=rm|fossil rm].
175
 
176 <h2>Changes For Version 1.31 (2015-02-23)</h2>
177 * Change the auxiliary schema by adding columns MLINK.ISAUX and MLINK.PMID
178 columns to the schema, to support better drawing of file change graphs.
179 A [/help?cmd=rebuild|fossil rebuild] is recommended but is not required.
180 so that the new graph drawing logic can work effectively.
@@ -222,10 +228,11 @@
222 * Allow the user of Common Table Expressions in the SQL that defaults
223 ticket reports.
224 * Break out the components (css, footer, and header) for the
225 various built-in skins into separate files in the source tree.
226
 
227 <h2>Changes For Version 1.30 (2015-01-19)</h2>
228 * Added the [/help?cmd=bundle|fossil bundle] command.
229 * Added the [/help?cmd=purge|fossil purge] command.
230 * Added the [/help?cmd=publish|fossil publish] command.
231 * Added the [/help?cmd=unpublished|fossil unpublished] command.
@@ -292,10 +299,11 @@
292 the correctness of printf-style formatting strings.
293 * Fix CVE-2014-3566, also known as the POODLE SSL 3.0 vulnerability.
294 * Numerous documentation fixes and improvements.
295 * Other obscure and minor bug fixes - see the timeline for details.
296
 
297 <h2>Changes For Version 1.29 (2014-06-12)</h2>
298 * Add the ability to display content, diffs and annotations for UTF16
299 text files in the web interface.
300 * Add the "SaveAs..." and "Invert" buttons
301 to the graphical diff display that results
302
--- www/changes.wiki
+++ www/changes.wiki
@@ -1,7 +1,8 @@
1 <title>Change Log</title>
2
3 <a name='v1_36'></a>
4 <h2>Changes for Version 1.36 (2016-10-24)</h2>
5
6 * Add support for [./unvers.wiki|unversioned content],
7 the [/help?cmd=unversioned|fossil unversioned] command and the
8 [/help?cmd=/uv|/uv] and [/uvlist] web pages.
@@ -28,10 +29,11 @@
29 able to pull from their parent but not push.
30 * Added the -nocomplain option to the TH1 "query" command.
31 * Added support for the chng=GLOBLIST query parameter on the
32 [/help?cmd=/timeline|/timeline] webpage.
33
34 <a name='v1_35'></a>
35 <h2>Changes for Version 1.35 (2016-06-14)</h2>
36
37 * Enable symlinks by default on all non-Windows platforms.
38 * Enhance the [/md_rules|Markdown formatting] so that hyperlinks that begin
39 with "/" are relative to the root of the Fossil repository.
@@ -71,10 +73,11 @@
73 names in place of getpass() to read passwords and passphrases
74 * Option --baseurl now works on Windows.
75 * Numerious documentation improvements.
76 * Update the built-in SQLite to version 3.13.0.
77
78 <a name='v1_34'></a>
79 <h2>Changes for Version 1.34 (2015-11-02)</h2>
80
81 * Make the [/help?cmd=clean|fossil clean] command undoable for files less
82 than 10MiB.
83 * Update internal Unicode character tables, used in regular expression
@@ -106,10 +109,11 @@
109 * Change the mimetype for ".n" and ".man" files to text/plain.
110 * Display improvements in the [/help?cmd=bisect|fossil bisect chart] command.
111 * Updated the built-in SQLite to version 3.9.1 and activated JSON1 and FTS5
112 support (both currently unused within Fossil).
113
114 <a name='v1_33'></a>
115 <h2>Changes for Version 1.33 (2015-05-23)</h2>
116 * Improved fork detection on [/help?cmd=update|fossil update],
117 [/help?cmd=status|fossil status] and related commands.
118 * Change the default skin to what used to be called "San Francisco Modern".
119 * Add the [/repo-tabsize] web page
@@ -155,10 +159,11 @@
159 field for direct entry of the user name to each applicable report.
160 * Create parent directories of [/help?cmd=settings|empty-dirs] if they don't
161 already exist.
162 * Inhibit timeline links to wiki pages that have been deleted.
163
164 <a name='v1_33'></a>
165 <h2>Changes for Version 1.32 (2015-03-14)</h2>
166 * When creating a new repository using [/help?cmd=init|fossil init], ensure
167 that the new repository is fully compatible with historical versions of
168 Fossil by having a valid manifest as RID 1.
169 * Anti-aliased rendering of arrowheads on timeline graphs.
@@ -171,10 +176,11 @@
176 * Enhance the "ln=" query parameter on artifact displays to accept multiple
177 ranges, separate by spaces (or "+" when URL-encoded).
178 * Added [/help?cmd=forget|fossil forget] as an alias for
179 [/help?cmd=rm|fossil rm].
180
181 <a name='v1_31'></a>
182 <h2>Changes For Version 1.31 (2015-02-23)</h2>
183 * Change the auxiliary schema by adding columns MLINK.ISAUX and MLINK.PMID
184 columns to the schema, to support better drawing of file change graphs.
185 A [/help?cmd=rebuild|fossil rebuild] is recommended but is not required.
186 so that the new graph drawing logic can work effectively.
@@ -222,10 +228,11 @@
228 * Allow the user of Common Table Expressions in the SQL that defaults
229 ticket reports.
230 * Break out the components (css, footer, and header) for the
231 various built-in skins into separate files in the source tree.
232
233 <a name='v1_30'></a>
234 <h2>Changes For Version 1.30 (2015-01-19)</h2>
235 * Added the [/help?cmd=bundle|fossil bundle] command.
236 * Added the [/help?cmd=purge|fossil purge] command.
237 * Added the [/help?cmd=publish|fossil publish] command.
238 * Added the [/help?cmd=unpublished|fossil unpublished] command.
@@ -292,10 +299,11 @@
299 the correctness of printf-style formatting strings.
300 * Fix CVE-2014-3566, also known as the POODLE SSL 3.0 vulnerability.
301 * Numerous documentation fixes and improvements.
302 * Other obscure and minor bug fixes - see the timeline for details.
303
304 <a name='v1_29'></a>
305 <h2>Changes For Version 1.29 (2014-06-12)</h2>
306 * Add the ability to display content, diffs and annotations for UTF16
307 text files in the web interface.
308 * Add the "SaveAs..." and "Invert" buttons
309 to the graphical diff display that results
310
+46 -54
--- www/mkdownload.tcl
+++ www/mkdownload.tcl
@@ -1,41 +1,18 @@
11
#!/usr/bin/tclsh
22
#
3
-# Run this script to build the "download.html" page. Also generate
4
-# the fossil_download_checksums.html page.
3
+# Run this script to build andn install the "download.html" page of
4
+# unversioned comment.
5
+#
6
+# Also generate the fossil_download_checksums.html page.
57
#
68
#
79
set out [open download.html w]
810
fconfigure $out -encoding utf-8 -translation lf
911
puts $out \
1012
{<!DOCTYPE html>
11
-<html>
12
- <head>
13
- <base href="https://www.fossil-scm.org/download.html" />
14
- <title>Fossil: Download</title>
15
- <link rel="alternate" type="application/rss+xml" title="RSS Feed"
16
- href="/fossil/timeline.rss" />
17
- <link rel="stylesheet" href="/fossil/style.css?default" type="text/css"
18
- media="screen" />
19
- </head>
20
-
21
- <body>
22
- <div class="header">
23
- <div class="title"><h1>Fossil</h1>Download</div>
24
- </div>
25
- <div class="mainmenu">
26
-<a href='/fossil/doc/trunk/www/index.wiki'>Home</a>
27
-<a href='/fossil/timeline?y=ci'>Timeline</a>
28
-<a href='/fossil/dir?ci=tip'>Code</a>
29
-<a href='/fossil/doc/trunk/www/permutedindex.html'>Docs</a>
30
-<a href='/fossil/brlist'>Branches</a>
31
-<a href='/fossil/ticket'>Tickets</a>
32
-<a href='/fossil/wiki'>Wiki</a>
33
-<a href='/download.html' class='active'>Download</a>
34
-</div>
35
-<div class="content">
36
-<p>
13
+<div class='fossil-doc' data-title='Download Page'>
3714
3815
<center><font size=4>}
3916
puts $out \
4017
"<b>To install Fossil &rarr;</b> download the stand-alone executable"
4118
puts $out \
@@ -45,29 +22,43 @@
4522
<a href="http://download.opensuse.org/repositories/home:/rmax:/fossil/">
4623
here.</a>
4724
Cryptographic checksums for download files are
4825
<a href="http://www.hwaci.com/fossil_download_checksums.html">here</a>.
4926
</small></p>
50
-</center>
51
-
5227
<table cellpadding="10">
5328
}
5429
55
-# Find all all unique timestamps.
30
+# Find all unique timestamps.
5631
#
57
-foreach file [glob -nocomplain download/fossil-*.zip] {
58
- if {[regexp -- {-(\d\.\d+).zip$} $file all version]} {
32
+set in [open {|fossil uv list} rb]
33
+while {[gets $in line]>0} {
34
+ set fn [lindex $line 5]
35
+ set filesize($fn) [lindex $line 3]
36
+ if {[regexp -- {-(\d\.\d+)\.(tar\.gz|zip)$} $fn all version]} {
37
+ set filehash($fn) [lindex $line 1]
5938
set avers($version) 1
6039
}
6140
}
41
+close $in
42
+
43
+set vdate(1.36) 2016-10-24
44
+set vdate(1.35) 2016-06-14
45
+set vdate(1.34) 2016-11-02
6246
6347
# Do all versions from newest to oldest
6448
#
6549
foreach vers [lsort -decr -real [array names avers]] {
66
- set hr "/fossil/timeline?c=version-$vers;y=ci"
50
+ # set hr "../timeline?c=version-$vers;y=ci"
51
+ set v2 v[string map {. _} $vers]
52
+ set hr "../doc/trunk/www/changes.wiki#$v2"
6753
puts $out "<tr><td colspan=6 align=left><hr>"
68
- puts $out "<center><b><a href=\"$hr\">Version $vers</a></b></center>"
54
+ puts $out "<center><b><a href=\"$hr\">Version $vers</a>"
55
+ if {[info exists vdate($vers)]} {
56
+ set hr2 "../timeline?c=version-$vers&amp;y=ci"
57
+ puts $out " (<a href='$hr2'>$vdate($vers)</a>)"
58
+ }
59
+ puts $out "</b></center>"
6960
puts $out "</td></tr>"
7061
puts $out "<tr>"
7162
7263
foreach {prefix img desc} {
7364
fossil-linux-x86 linux.gif {Linux 3.x x86}
@@ -76,15 +67,15 @@
7667
fossil-w32 win32.gif {Windows}
7768
fossil-src src.gif {Source Tarball}
7869
} {
7970
set basename download/$prefix-$vers
8071
set filename $basename.tar.gz
81
- if {![file exists $basename.tar.gz]} {
72
+ if {![info exists filesize($basename.tar.gz)]} {
8273
set filename $basename.zip
8374
}
84
- if {[file exists $filename]} {
85
- set size [file size $filename]
75
+ if {[info exists filesize($filename)]} {
76
+ set size [set filesize($filename)]
8677
set units bytes
8778
if {$size>1024*1024} {
8879
set size [format %.2f [expr {$size/(1024.0*1024.0)}]]
8980
set units MiB
9081
} elseif {$size>1024} {
@@ -97,26 +88,23 @@
9788
} else {
9889
puts $out "<td>&nbsp;</td>"
9990
}
10091
}
10192
puts $out "</tr>"
102
- if {[file exists download/releasenotes-$vers.html]} {
103
- puts $out "<tr><td colspan=6 align=left>"
104
- set rn [open download/releasenotes-$vers.html]
105
- fconfigure $rn -encoding utf-8
106
- puts $out "[read $rn]"
107
- close $rn
108
- puts $out "</td></tr>"
109
- }
93
+#
94
+# if {[info exists filesize(download/releasenotes-$vers.html)]} {
95
+# puts $out "<tr><td colspan=6 align=left>"
96
+# set rn [|open uv cat download/releasenotes-$vers.html]
97
+# fconfigure $rn -encoding utf-8
98
+# puts $out "[read $rn]"
99
+# close $rn
100
+# puts $out "</td></tr>"
101
+# }
110102
}
111103
puts $out "<tr><td colspan=5><hr></td></tr>"
112104
113
-puts $out {</table></div>
114
-</body>
115
-</html>
116
-}
117
-
105
+puts $out {</table></center></div>}
118106
close $out
119107
120108
# Generate the checksum page
121109
#
122110
set out [open fossil_download_checksums.html w]
@@ -128,11 +116,15 @@
128116
<p>The following table shows the SHA1 checksums for the precompiled
129117
binaries available on the
130118
<a href="/download.html">Fossil website</a>.</p>
131119
<pre>}
132120
133
-foreach file [lsort [glob -nocomplain download/fossil-*.zip]] {
134
- set sha1sum [lindex [exec sha1sum $file] 0]
135
- puts $out "$sha1sum [file tail $file]"
121
+foreach {line} [split [exec fossil sql "SELECT hash, name FROM unversioned\
122
+ WHERE name GLOB '*.tar.gz' OR\
123
+ name GLOB '*.zip'"] \n] {
124
+ set x [split $line |]
125
+ set hash [lindex $x 0]
126
+ set nm [file tail [lindex $x 1]]
127
+ puts $out "$hash $nm"
136128
}
137129
puts $out {</pre></body></html>}
138130
close $out
139131
--- www/mkdownload.tcl
+++ www/mkdownload.tcl
@@ -1,41 +1,18 @@
1 #!/usr/bin/tclsh
2 #
3 # Run this script to build the "download.html" page. Also generate
4 # the fossil_download_checksums.html page.
 
 
5 #
6 #
7 set out [open download.html w]
8 fconfigure $out -encoding utf-8 -translation lf
9 puts $out \
10 {<!DOCTYPE html>
11 <html>
12 <head>
13 <base href="https://www.fossil-scm.org/download.html" />
14 <title>Fossil: Download</title>
15 <link rel="alternate" type="application/rss+xml" title="RSS Feed"
16 href="/fossil/timeline.rss" />
17 <link rel="stylesheet" href="/fossil/style.css?default" type="text/css"
18 media="screen" />
19 </head>
20
21 <body>
22 <div class="header">
23 <div class="title"><h1>Fossil</h1>Download</div>
24 </div>
25 <div class="mainmenu">
26 <a href='/fossil/doc/trunk/www/index.wiki'>Home</a>
27 <a href='/fossil/timeline?y=ci'>Timeline</a>
28 <a href='/fossil/dir?ci=tip'>Code</a>
29 <a href='/fossil/doc/trunk/www/permutedindex.html'>Docs</a>
30 <a href='/fossil/brlist'>Branches</a>
31 <a href='/fossil/ticket'>Tickets</a>
32 <a href='/fossil/wiki'>Wiki</a>
33 <a href='/download.html' class='active'>Download</a>
34 </div>
35 <div class="content">
36 <p>
37
38 <center><font size=4>}
39 puts $out \
40 "<b>To install Fossil &rarr;</b> download the stand-alone executable"
41 puts $out \
@@ -45,29 +22,43 @@
45 <a href="http://download.opensuse.org/repositories/home:/rmax:/fossil/">
46 here.</a>
47 Cryptographic checksums for download files are
48 <a href="http://www.hwaci.com/fossil_download_checksums.html">here</a>.
49 </small></p>
50 </center>
51
52 <table cellpadding="10">
53 }
54
55 # Find all all unique timestamps.
56 #
57 foreach file [glob -nocomplain download/fossil-*.zip] {
58 if {[regexp -- {-(\d\.\d+).zip$} $file all version]} {
 
 
 
 
59 set avers($version) 1
60 }
61 }
 
 
 
 
 
62
63 # Do all versions from newest to oldest
64 #
65 foreach vers [lsort -decr -real [array names avers]] {
66 set hr "/fossil/timeline?c=version-$vers;y=ci"
 
 
67 puts $out "<tr><td colspan=6 align=left><hr>"
68 puts $out "<center><b><a href=\"$hr\">Version $vers</a></b></center>"
 
 
 
 
 
69 puts $out "</td></tr>"
70 puts $out "<tr>"
71
72 foreach {prefix img desc} {
73 fossil-linux-x86 linux.gif {Linux 3.x x86}
@@ -76,15 +67,15 @@
76 fossil-w32 win32.gif {Windows}
77 fossil-src src.gif {Source Tarball}
78 } {
79 set basename download/$prefix-$vers
80 set filename $basename.tar.gz
81 if {![file exists $basename.tar.gz]} {
82 set filename $basename.zip
83 }
84 if {[file exists $filename]} {
85 set size [file size $filename]
86 set units bytes
87 if {$size>1024*1024} {
88 set size [format %.2f [expr {$size/(1024.0*1024.0)}]]
89 set units MiB
90 } elseif {$size>1024} {
@@ -97,26 +88,23 @@
97 } else {
98 puts $out "<td>&nbsp;</td>"
99 }
100 }
101 puts $out "</tr>"
102 if {[file exists download/releasenotes-$vers.html]} {
103 puts $out "<tr><td colspan=6 align=left>"
104 set rn [open download/releasenotes-$vers.html]
105 fconfigure $rn -encoding utf-8
106 puts $out "[read $rn]"
107 close $rn
108 puts $out "</td></tr>"
109 }
 
110 }
111 puts $out "<tr><td colspan=5><hr></td></tr>"
112
113 puts $out {</table></div>
114 </body>
115 </html>
116 }
117
118 close $out
119
120 # Generate the checksum page
121 #
122 set out [open fossil_download_checksums.html w]
@@ -128,11 +116,15 @@
128 <p>The following table shows the SHA1 checksums for the precompiled
129 binaries available on the
130 <a href="/download.html">Fossil website</a>.</p>
131 <pre>}
132
133 foreach file [lsort [glob -nocomplain download/fossil-*.zip]] {
134 set sha1sum [lindex [exec sha1sum $file] 0]
135 puts $out "$sha1sum [file tail $file]"
 
 
 
 
136 }
137 puts $out {</pre></body></html>}
138 close $out
139
--- www/mkdownload.tcl
+++ www/mkdownload.tcl
@@ -1,41 +1,18 @@
1 #!/usr/bin/tclsh
2 #
3 # Run this script to build andn install the "download.html" page of
4 # unversioned comment.
5 #
6 # Also generate the fossil_download_checksums.html page.
7 #
8 #
9 set out [open download.html w]
10 fconfigure $out -encoding utf-8 -translation lf
11 puts $out \
12 {<!DOCTYPE html>
13 <div class='fossil-doc' data-title='Download Page'>
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
14
15 <center><font size=4>}
16 puts $out \
17 "<b>To install Fossil &rarr;</b> download the stand-alone executable"
18 puts $out \
@@ -45,29 +22,43 @@
22 <a href="http://download.opensuse.org/repositories/home:/rmax:/fossil/">
23 here.</a>
24 Cryptographic checksums for download files are
25 <a href="http://www.hwaci.com/fossil_download_checksums.html">here</a>.
26 </small></p>
 
 
27 <table cellpadding="10">
28 }
29
30 # Find all unique timestamps.
31 #
32 set in [open {|fossil uv list} rb]
33 while {[gets $in line]>0} {
34 set fn [lindex $line 5]
35 set filesize($fn) [lindex $line 3]
36 if {[regexp -- {-(\d\.\d+)\.(tar\.gz|zip)$} $fn all version]} {
37 set filehash($fn) [lindex $line 1]
38 set avers($version) 1
39 }
40 }
41 close $in
42
43 set vdate(1.36) 2016-10-24
44 set vdate(1.35) 2016-06-14
45 set vdate(1.34) 2016-11-02
46
47 # Do all versions from newest to oldest
48 #
49 foreach vers [lsort -decr -real [array names avers]] {
50 # set hr "../timeline?c=version-$vers;y=ci"
51 set v2 v[string map {. _} $vers]
52 set hr "../doc/trunk/www/changes.wiki#$v2"
53 puts $out "<tr><td colspan=6 align=left><hr>"
54 puts $out "<center><b><a href=\"$hr\">Version $vers</a>"
55 if {[info exists vdate($vers)]} {
56 set hr2 "../timeline?c=version-$vers&amp;y=ci"
57 puts $out " (<a href='$hr2'>$vdate($vers)</a>)"
58 }
59 puts $out "</b></center>"
60 puts $out "</td></tr>"
61 puts $out "<tr>"
62
63 foreach {prefix img desc} {
64 fossil-linux-x86 linux.gif {Linux 3.x x86}
@@ -76,15 +67,15 @@
67 fossil-w32 win32.gif {Windows}
68 fossil-src src.gif {Source Tarball}
69 } {
70 set basename download/$prefix-$vers
71 set filename $basename.tar.gz
72 if {![info exists filesize($basename.tar.gz)]} {
73 set filename $basename.zip
74 }
75 if {[info exists filesize($filename)]} {
76 set size [set filesize($filename)]
77 set units bytes
78 if {$size>1024*1024} {
79 set size [format %.2f [expr {$size/(1024.0*1024.0)}]]
80 set units MiB
81 } elseif {$size>1024} {
@@ -97,26 +88,23 @@
88 } else {
89 puts $out "<td>&nbsp;</td>"
90 }
91 }
92 puts $out "</tr>"
93 #
94 # if {[info exists filesize(download/releasenotes-$vers.html)]} {
95 # puts $out "<tr><td colspan=6 align=left>"
96 # set rn [|open uv cat download/releasenotes-$vers.html]
97 # fconfigure $rn -encoding utf-8
98 # puts $out "[read $rn]"
99 # close $rn
100 # puts $out "</td></tr>"
101 # }
102 }
103 puts $out "<tr><td colspan=5><hr></td></tr>"
104
105 puts $out {</table></center></div>}
 
 
 
 
106 close $out
107
108 # Generate the checksum page
109 #
110 set out [open fossil_download_checksums.html w]
@@ -128,11 +116,15 @@
116 <p>The following table shows the SHA1 checksums for the precompiled
117 binaries available on the
118 <a href="/download.html">Fossil website</a>.</p>
119 <pre>}
120
121 foreach {line} [split [exec fossil sql "SELECT hash, name FROM unversioned\
122 WHERE name GLOB '*.tar.gz' OR\
123 name GLOB '*.zip'"] \n] {
124 set x [split $line |]
125 set hash [lindex $x 0]
126 set nm [file tail [lindex $x 1]]
127 puts $out "$hash $nm"
128 }
129 puts $out {</pre></body></html>}
130 close $out
131

Keyboard Shortcuts

Open search /
Next entry (timeline) j
Previous entry (timeline) k
Open focused entry Enter
Show this help ?
Toggle theme Top nav button