gen.pl: insert the current date and version in generated man page

Reported-by: Gisle Vanem
Ref: #7780
Closes #7782

diff --git a/docs/cmdline-opts/gen.pl b/docs/cmdline-opts/gen.pl
index c058987d412b13ecd67c5235577cbc2a782c1a6c..d63aed168a0736e909ccac14254f5a6a35ca084c 100755 (executable)
--- a/docs/cmdline-opts/gen.pl
+++ b/docs/cmdline-opts/gen.pl
@@ -45,6 +45,19 @@ my %redirlong;
 my %protolong;
 my %catlong;
 
+use POSIX qw(strftime);
+my $date = strftime "%b %e %Y", localtime;
+my $version = "unknown";
+
+open(INC, "<../../include/curl/curlver.h");
+while(<INC>) {
+    if($_ =~ /^#define LIBCURL_VERSION \"([0-9.]*)/) {
+        $version = $1;
+        last;
+    }
+}
+close(INC);
+
 # get the long name version, return the man page string
 sub manpageify {
     my ($k)=@_;
@@ -365,6 +378,8 @@ sub header {
     open(F, "<:crlf", "$f");
     my @d;
     while(<F>) {
+        s/%DATE/$date/g;
+        s/%VERSION/$version/g;
         push @d, $_;
     }
     close(F);

diff --git a/docs/cmdline-opts/page-header b/docs/cmdline-opts/page-header
index 65b503fbbe50855fbc0ce08be155be67a511e21e..2a1a7dac94460481ba3545ab13c5dcd01b3e4700 100644 (file)
--- a/docs/cmdline-opts/page-header
+++ b/docs/cmdline-opts/page-header
@@ -22,7 +22,7 @@
 .\"
 .\" DO NOT EDIT. Generated by the curl project gen.pl man page generator.
 .\"
-.TH curl 1 "16 Dec 2016" "Curl 7.52.0" "Curl Manual"
+.TH curl 1 "%DATE" "curl %VERSION" "curl Manual"
 .SH NAME
 curl \- transfer a URL
 .SH SYNOPSIS