Allow rfilelist to show MD5 and PGP signature links when the

corresponding file is available.  Make sure to give an argument to
rfilelist that does NOT include those files.

diff --git a/openssl-macros.wml b/openssl-macros.wml
index 4158f0a9668c60437f383a6eb1e42eef37c11991..c7c0fb734aa5fd98f6dbf57530619de6f39a736b 100644 (file)
--- a/openssl-macros.wml
+++ b/openssl-macros.wml
@@ -347,7 +347,15 @@ sub ls {
 @L = &ls("%0");
 foreach $l (@L) {
     next if ($l =~ m|^\s*$|);
-    $l =~ s|(\s+)(\S+[^/])(\s*\n)$|$1."<a href=\"$2\">$2</a>".$3|e;
+    if ($l =~ m|(\s+)(\S+[^/])(\s*\n)$|) {
+       my $h = $`.$1;
+       my $f = $2;
+       my $t = $3;
+       my $r = "<a href=\"$f\">$f</a>";
+       if (-f "$f.md5") { $r .= " (<a href=\"$f.md5\">MD5</a>)"; }
+       if (-f "$f.asc") { $r .= " (<a href=\"$f.asc\">PGP sign</a>)"; }
+       $l = $h.$r.$t;
+    }
     $l =~ s|(\s+)(\S+/)(\s*\n)$|$1."<a href=\"$2\"><b>$2</b></a>".$3|e;
     foreach $hi (@HI) {
         $l =~ s|^(.*$hi.*)$|<font color="#cc3333">$1&nbsp;&nbsp;<b>[LATEST]</b></font>|;

diff --git a/openssl.wml b/openssl.wml
index 4158f0a9668c60437f383a6eb1e42eef37c11991..c7c0fb734aa5fd98f6dbf57530619de6f39a736b 100644 (file)
--- a/openssl.wml
+++ b/openssl.wml
@@ -347,7 +347,15 @@ sub ls {
 @L = &ls("%0");
 foreach $l (@L) {
     next if ($l =~ m|^\s*$|);
-    $l =~ s|(\s+)(\S+[^/])(\s*\n)$|$1."<a href=\"$2\">$2</a>".$3|e;
+    if ($l =~ m|(\s+)(\S+[^/])(\s*\n)$|) {
+       my $h = $`.$1;
+       my $f = $2;
+       my $t = $3;
+       my $r = "<a href=\"$f\">$f</a>";
+       if (-f "$f.md5") { $r .= " (<a href=\"$f.md5\">MD5</a>)"; }
+       if (-f "$f.asc") { $r .= " (<a href=\"$f.asc\">PGP sign</a>)"; }
+       $l = $h.$r.$t;
+    }
     $l =~ s|(\s+)(\S+/)(\s*\n)$|$1."<a href=\"$2\"><b>$2</b></a>".$3|e;
     foreach $hi (@HI) {
         $l =~ s|^(.*$hi.*)$|<font color="#cc3333">$1&nbsp;&nbsp;<b>[LATEST]</b></font>|;

diff --git a/source/index.wml b/source/index.wml
index 000141a103b749faaaaa650db3be97545afee285..16d860be4f66b995e0fb2c91f2076ad5124a410d 100644 (file)
--- a/source/index.wml
+++ b/source/index.wml
@@ -13,7 +13,7 @@ Tarballs containing a snapshot of the latest development version can be found
 under <a href="ftp://ftp.openssl.org/snapshot/">ftp://ftp.openssl.org/snapshot/</a>.
 
 <p>
-<rfilelist openssl*-[0-9].[0-9].[0-9a-z]*>
+<rfilelist openssl*-[0-9].[0-9].[0-9a-z]*.tar.gz>
 
 <h2>Mirror Locations</h2>