X-Git-Url: https://mattmccutchen.net/rsync/rsync.git/blobdiff_plain/01e293f1b52bd16b5b487f5003cce4948786c474..ae598f3847bd83b81effb6cc38719e790ed4c1cf:/packaging/patch-update diff --git a/packaging/patch-update b/packaging/patch-update index 30a29bce..135b7e48 100755 --- a/packaging/patch-update +++ b/packaging/patch-update @@ -11,6 +11,7 @@ use Getopt::Long; my $patches_dir = 'patches'; my $tmp_dir = "patches.$$"; +my $make_gen_cmd = 'make -f prepare-source.mak conf && ./config.status && make gen'; &Getopt::Long::Configure('bundling'); &usage if !&GetOptions( @@ -35,6 +36,17 @@ if (!$skip_branch_check && !$is_clean) { die "The checkout is not clean:\n", $status; } +my $master_commit; +open PIPE, '-|', "git log -1 --no-color $master_branch" or die $!; +while () { + if (/^commit (\S+)/) { + $master_commit = $1; + last; + } +} +close PIPE; +die "Unable to determine commit hash for master branch: $master_branch\n" unless defined $master_commit; + my @extra_files; open(IN, '<', 'Makefile.in') or die "Couldn't open Makefile.in: $!\n"; while () { @@ -51,7 +63,7 @@ close IN; if ($incl_generated_files) { die "'$tmp_dir' must not exist in the current directory.\n" if -e $tmp_dir; mkdir($tmp_dir, 0700) or die "Unable to mkdir($tmp_dir): $!\n"; - system "./config.status Makefile && make gen && rsync -a @extra_files $tmp_dir/master/" and exit 1; + system "$make_gen_cmd && rsync -a @extra_files $tmp_dir/master/" and exit 1; } our $last_touch = time; @@ -124,13 +136,15 @@ sub update_patch my($patch) = @_; my $parent = $parent{$patch}; + my $based_on; if (defined $parent) { unless ($completed{$parent}++) { update_patch($parent); } - $parent = "patch/$parent"; + $based_on = $parent = "patch/$parent"; } else { $parent = $master_branch; + $based_on = $master_commit; } print "======== $patch ========\n"; @@ -138,9 +152,9 @@ sub update_patch sleep 1 while $incl_generated_files && $last_touch >= time; system "git checkout patch/$patch" and return 0; - my $ok = system("git merge $parent") == 0; + my $ok = system("git merge $based_on") == 0; if (!$ok || $launch_shell) { - print qq|"git merge $parent" incomplete -- please fix.\n| if !$ok; + print qq|"git merge $based_on" incomplete -- please fix.\n| if !$ok; $ENV{PS1} = "[$parent] patch/$patch: "; while (1) { if (system($ENV{SHELL}) != 0) { @@ -156,14 +170,14 @@ sub update_patch } open(OUT, '>', "$patches_dir/$patch.diff") or die $!; - print OUT $description{$patch}, "\n"; + print OUT $description{$patch}, "\nbased-on: $based_on\n"; if ($incl_generated_files) { - system "./config.status Makefile && make gen && rsync -a @extra_files $tmp_dir/$patch/" and exit 1; + system "$make_gen_cmd && rsync -a @extra_files $tmp_dir/$patch/" and exit 1; } $last_touch = time; - open(PIPE, '-|', 'git', 'diff', $parent) or die $!; + open(PIPE, '-|', 'git', 'diff', $based_on) or die $!; DIFF: while () { while (m{^diff --git a/PATCH}) { while () { @@ -213,9 +227,15 @@ sub check_git_status sub usage { die <