X-Git-Url: https://mattmccutchen.net/rsync/rsync.git/blobdiff_plain/86eb9f95955d3957c2dfdcbc36492076385c96fd..800a4485f3148765bca7cbc5d3f61be2cc7af276:/packaging/release-rsync diff --git a/packaging/release-rsync b/packaging/release-rsync index 8e2a9810..5412426c 100755 --- a/packaging/release-rsync +++ b/packaging/release-rsync @@ -11,18 +11,27 @@ use Date::Format; my $dest = $ENV{HOME} . '/samba-rsync-ftp'; -my $cl_today = time2str('* %a %b %d %Y', time); -my $ztoday = time2str('%d %b %Y', time); +my $now = time; +my $cl_today = time2str('* %a %b %d %Y', $now); +my $year = time2str('%Y', $now); +my $ztoday = time2str('%d %b %Y', $now); (my $today = $ztoday) =~ s/^0//; my $curdir = Cwd::cwd; -open(IN, '<', 'prepare-source.mak') or die "Couldn't open prepare-source.mak: $!\n"; -$_ = join('', ); +my @extra_files; +open(IN, '<', 'Makefile.in') or die "Couldn't open Makefile.in: $!\n"; +while () { + if (s/^GENFILES=//) { + while (s/\\$//) { + $_ .= ; + } + @extra_files = split(' ', $_); + last; + } +} close IN; -my @extra_files = m{\n([^\s:]+):.*\n\t\S}g; - my $break = <); close IN; die "The checkout is not clean:\n", $status unless $status =~ /\nnothing to commit \(working directory clean\)/; die "The checkout is not on the master branch.\n" unless $status =~ /^# On branch master\n/; -my $lastversion; +my $confversion; open(IN, '<', 'configure.in') or die $!; while () { if (/^RSYNC_VERSION=(.*)/) { - $lastversion = $1; + $confversion = $1; last; } } close IN; -if ($lastversion =~ /dev$/) { - open(IN, '<', 'OLDNEWS') or die $!; - $_ = ; - close IN; - ($lastversion) = /(\d+\.\d+\.\d+)/; -} +die "Unable to find RSYNC_VERSION in configure.in\n" unless defined $confversion; + +open(IN, '<', 'OLDNEWS') or die $!; +$_ = ; +close IN; +my($lastversion) = /(\d+\.\d+\.\d+)/; -my $version = $lastversion; +my $version = $confversion; $version =~ s/dev/pre1/ || $version =~ s/pre(\d+)/ 'pre' . ($1 + 1) /e; print "Please enter the version number of this release: [$version] "; @@ -68,7 +77,10 @@ if ($_ eq '.') { } elsif ($_ ne '') { $version = $_; } -$version =~ s/[-.]*pre[-.]*/pre/; + +if ($version =~ s/[-.]*pre[-.]*/pre/ && $confversion !~ /dev$/) { + $lastversion = $confversion; +} print "Enter the previous version to produce a patch against: [$lastversion] "; chomp($_ = ); @@ -116,36 +128,53 @@ EOT print " "; $_ = ; -print $break; - -my @tweak_files = ( glob('packaging/*.spec'), glob('packaging/*/*.spec'), - glob('*.yo'), qw( configure.in ) ); +(my $finalversion = $version) =~ s/pre\d+//; +my %specvars = ( 'Version:' => $version, 'Release:' => $release, + 'Released' => "$version." ); +my @tweak_files = ( glob('packaging/*.spec'), glob('packaging/*/*.spec'), glob('*.yo'), + qw( configure.in rsync.h NEWS OLDNEWS options.c ) ); -if ($version !~ /pre/) { - push(@tweak_files, qw( rsync.h NEWS OLDNEWS )); -} foreach my $fn (@tweak_files) { open(IN, '<', $fn) or die $!; undef $/; $_ = ; $/ = "\n"; close IN; if ($fn =~ /configure/) { - s/^RSYNC_VERSION=.*/RSYNC_VERSION=$version/m; + s/^RSYNC_VERSION=.*/RSYNC_VERSION=$version/m + or die "Unable to update RSYNC_VERSION in $fn\n"; } elsif ($fn =~ /\.spec/) { - s/^(Version:) .*/$1 $version/m; - s/^(Release:) .*/$1 $release/m; - s/^(Released) .*/$1 $version./m; - s/^\* \w\w\w \w\w\w \d\d \d\d\d\d (.*)/$cl_today $1/m; + while (my($str, $val) = each %specvars) { + s/^\Q$str\E .*/$str $val/m + or die "Unable to update $str in $fn\n"; + } + s/^\* \w\w\w \w\w\w \d\d \d\d\d\d (.*)/$cl_today $1/m + or die "Unable to update ChangeLog header in $fn\n"; } elsif ($fn =~ /\.yo/) { - s/^(manpage\([^)]+\)\(\d+\)\()[^)]+(\).*)/$1$today$2/m; - s/^(This man ?page is current for version) \S+ (of rsync)/$1 $version $2/m; - } elsif ($fn eq 'NEWS') { - s/^(NEWS for rsync \Q$version\E) \(UNRELEASED\)\s*\n/$1 ($today)\n/mi - or die "Couldn't update NEWS file with release date!\n"; + s/^(manpage\([^)]+\)\(\d+\)\()[^)]+(\).*)/$1$today$2/m + or die "Unable to update date in manpage() header in $fn\n"; + s/^(This man ?page is current for version) \S+ (of rsync)/$1 $version $2/m + or die "Unable to update current version info in $fn\n"; } elsif ($fn eq 'rsync.h') { - s/(#define\s+SUBPROTOCOL_VERSION)\s+\d+/$1 0/; + s/(#define\s+SUBPROTOCOL_VERSION)\s+\d+/$1 0/ + or die "Unable to find SUBPROTOCOL_VERSION define in $fn\n"; + next if $version =~ /pre/; + } elsif ($fn eq 'NEWS') { + s/^(NEWS for rsync \Q$finalversion\E) \(UNRELEASED\)\s*\n/$1 ($today)\n/mi + or die "The first line of $fn is not in the right format. It must be:\n" + . "NEWS for rsync $finalversion (UNRELEASED)\n"; + next if $version =~ /pre/; } elsif ($fn eq 'OLDNEWS') { - s/^\t\S\S\s\S\S\S\s\d\d\d\d(\t\Q$version\E)/\t$ztoday$1/m - or die "Couldn't update OLDNEWS file with release date!\n"; + s/^\t\S\S\s\S\S\S\s\d\d\d\d(\t\Q$finalversion\E)/\t$ztoday$1/m + or die "Unable to find \"?? ??? $year\t$finalversion\" line in $fn\n"; + next if $version =~ /pre/; + } elsif ($fn eq 'options.c') { + if (s/(Copyright \(C\) 2002-)(\d+)( Wayne Davison)/$1$year$3/ + && $2 ne $year) { + die "Copyright comments need to be updated to $year in all files!\n"; + } + # Adjust the year in the --version output. + s/(rprintf\(f, "Copyright \(C\) 1996-)(\d+)/$1$year/ + or die "Unable to find Copyright string in --version output of $fn\n"; + next if $2 eq $year; } else { die "Unrecognized file in \@tweak_files: $fn\n"; } @@ -154,10 +183,8 @@ foreach my $fn (@tweak_files) { close OUT; } -system "./prepare-source && touch proto.h"; - print $break; -system "git-diff --color |less -p '^diff .*'"; +system "git diff --color | less -p '^diff .*'"; my $srctar_name = "rsync-$version.tar.gz"; my $pattar_name = "rsync-patches-$version.tar.gz"; @@ -178,7 +205,7 @@ About to: - create patches tar, "$pattar_name" - create release diffs, "$diff_name" - update patch branches and generate patch/* files - - update README, *NEWS, TODO, and changelog + - update README, *NEWS, TODO, and ChangeLog - update rsync*.html man pages - gpg-sign the release files @@ -186,16 +213,15 @@ EOT print " "; $_ = ; +system "git commit -a -m 'Preparing for release of $version'" and exit 1; +print "\nSign the tag:"; +system "git tag -s -m 'Version $version.' v$version" and exit 1; + +# Extract some files from the old tar before we do the shuffle. @_ = @extra_files; -map { s#^#a/# } @_; -$_[0] =~ s/configure\.sh/configure/; # XXX remove soon +map { s#^#rsync-$lastversion/# } @_; system "tar xzf $lasttar_file @_"; -rename("a/configure", "a/configure.sh"); # XXX remove soon - -system "rsync -a @extra_files rsync-$version/"; - -system "git-commit -a -m 'Preparing for release of $version'" and exit 1; -system "git-tag -s -m 'Version $version.' v$version" and exit 1; +rename("rsync-$lastversion", 'a'); # When creating a pre-release after a normal release, there's nothing to move. if ($diffdir ne $dest) { @@ -237,36 +263,41 @@ if ($diffdir ne $dest) { chdir($curdir) or die $!; } -print "Creating $srctar_file ...\n"; -system "git-archive --format=tar --prefix=rsync-$version/ v$version >$dest/srctmp.tar"; -system "fakeroot tar rf $dest/srctmp.tar rsync-$version/*; gzip -9 <$dest/srctmp.tar >$srctar_file"; -unlink("$dest/srctmp.tar"); - print "Creating $diff_file ...\n"; -rename("rsync-$version", 'b'); -my $sed_script = 's/^((---|\+\+\+) [^\t]+)\t.*/\1/'; -system "(diff -up a b | sed -r '$sed_script'; git-diff v$lastversion v$version) | gzip -9 >$diff_file"; -system "rm -rf a b"; +system "./config.status Makefile; make gen; rsync -a @extra_files b/"; +my $sed_script = 's:^((---|\+\+\+) [ab]/[^\t]+)\t.*:\1:'; +system "(git diff v$lastversion v$version; diff -upN a b | sed -r '$sed_script') | gzip -9 >$diff_file"; +system "rm -rf a"; +rename('b', "rsync-$version"); -system "support/patch-update --gen"; +print "Creating $srctar_file ...\n"; +system "git archive --format=tar --prefix=rsync-$version/ v$version | tar xf -"; +system "support/git-set-file-times --prefix=rsync-$version/"; +system "fakeroot tar czf $srctar_file rsync-$version; rm -rf rsync-$version"; -symlink('.', "rsync-$version"); -system "tar czf $pattar_file rsync-$version/patches"; -unlink("rsync-$version"); +mkdir("rsync-$version", 0755); +mkdir("rsync-$version/patches", 0755); +system "support/patch-update --skip-check --gen=rsync-$version/patches"; +system "fakeroot tar chzf $pattar_file rsync-$version/patches; rm -rf rsync-$version"; print "Updating the other files in $dest ...\n"; system "rsync -a README NEWS OLDNEWS TODO $dest"; unlink("$dest/rsync-$version-NEWS"); link("$dest/NEWS", "$dest/rsync-$version-NEWS"); -system "git-log --name-status | gzip -9 >$dest/changelog.gz"; +system "git log --name-status | gzip -9 >$dest/ChangeLog.gz"; system "yodl2html -o $dest/rsync.html rsync.yo"; system "yodl2html -o $dest/rsyncd.conf.html rsyncd.conf.yo"; chdir($dest) or die $!; -system "gpg -ba $srctar_name; gpg -ba $pattar_name; gpg -ba $diff_name"; -print $break, <