Change naming of local patch-related branches and unify

[rsync/rsync.git] / packaging / patch-update

diff --git a/packaging/patch-update b/packaging/patch-update
index 135b7e4..dba8e47 100755 (executable)
--- a/packaging/patch-update
+++ b/packaging/patch-update
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
 #!/usr/bin/perl

-# This script is used to turn one or more of the "patch/*" branches
+# This script is used to turn one or more of the "patch/BASE/*" branches

 # into one or more diffs in the "patches" directory.  Pass the option
 # --gen if you want generated files in the diffs.  Pass the name of
 # one or more diffs if you want to just update a subset of all the
 # into one or more diffs in the "patches" directory.  Pass the option
 # --gen if you want generated files in the diffs.  Pass the name of
 # one or more diffs if you want to just update a subset of all the


@@ -31,10 +31,8 @@ if (defined $incl_generated_files) {
 die "No '$patches_dir' directory was found.\n" unless -d $patches_dir;
 die "No '.git' directory present in the current dir.\n" unless -d '.git';
 
 die "No '$patches_dir' directory was found.\n" unless -d $patches_dir;
 die "No '.git' directory present in the current dir.\n" unless -d '.git';
 

-my($status, $is_clean, $starting_branch) = &check_git_status;
-if (!$skip_branch_check && !$is_clean) {
-    die "The checkout is not clean:\n", $status;
-}
+require 'packaging/git-status.pl';
+check_git_state($master_branch, !$skip_branch_check, 1);

 
 my $master_commit;
 open PIPE, '-|', "git log -1 --no-color $master_branch" or die $!;
 
 my $master_commit;
 open PIPE, '-|', "git log -1 --no-color $master_branch" or die $!;


@@ -72,7 +70,7 @@ my %patches;
 # Start by finding all patches so that we can load all possible parents.
 open(PIPE, '-|', 'git', 'branch', '-l') or die $!;
 while (<PIPE>) {
 # Start by finding all patches so that we can load all possible parents.
 open(PIPE, '-|', 'git', 'branch', '-l') or die $!;
 while (<PIPE>) {

-    if (m# patch/(.*)#) {
+    if (m# patch/\Q$master_branch\E/(.*)#o) {

        $patches{$1} = 1;
     }
 }
        $patches{$1} = 1;
     }
 }


@@ -82,7 +80,7 @@ my @patches = sort keys %patches;
 
 my(%parent, %description);
 foreach my $patch (@patches) {
 
 my(%parent, %description);
 foreach my $patch (@patches) {

-    my $branch = "patch/$patch";
+    my $branch = "patch/$master_branch/$patch";

     my $desc = '';
     open(PIPE, '-|', 'git', 'diff', '-U1000', "$master_branch...$branch", '--', "PATCH.$patch") or die $!;
     while (<PIPE>) {
     my $desc = '';
     open(PIPE, '-|', 'git', 'diff', '-U1000', "$master_branch...$branch", '--', "PATCH.$patch") or die $!;
     while (<PIPE>) {


@@ -126,7 +124,7 @@ if ($incl_generated_files) {
 }
 
 sleep 1 while $last_touch >= time;
 }
 
 sleep 1 while $last_touch >= time;

-system "git checkout $starting_branch" and exit 1;
+system "git checkout $master_branch" and exit 1;

 
 exit;
 
 
 exit;
 


@@ -141,7 +139,7 @@ sub update_patch
        unless ($completed{$parent}++) {
            update_patch($parent);
        }
        unless ($completed{$parent}++) {
            update_patch($parent);
        }

-       $based_on = $parent = "patch/$parent";
+       $based_on = $parent = "patch/$master_branch/$parent";

     } else {
        $parent = $master_branch;
        $based_on = $master_commit;
     } else {
        $parent = $master_branch;
        $based_on = $master_commit;


@@ -150,12 +148,13 @@ sub update_patch
     print "======== $patch ========\n";
 
     sleep 1 while $incl_generated_files && $last_touch >= time;
     print "======== $patch ========\n";
 
     sleep 1 while $incl_generated_files && $last_touch >= time;

-    system "git checkout patch/$patch" and return 0;
+    system "git checkout patch/$master_branch/$patch" and return 0;

 
     my $ok = system("git merge $based_on") == 0;
     if (!$ok || $launch_shell) {
 
     my $ok = system("git merge $based_on") == 0;
     if (!$ok || $launch_shell) {

+       my($parent_dir) = $parent =~ m{([^/]+)$};

        print qq|"git merge $based_on" incomplete -- please fix.\n| if !$ok;
        print qq|"git merge $based_on" incomplete -- please fix.\n| if !$ok;

-       $ENV{PS1} = "[$parent] patch/$patch: ";
+       $ENV{PS1} = "[$parent_dir] $patch: ";

        while (1) {
            if (system($ENV{SHELL}) != 0) {
                print "Abort? [n/y] ";
        while (1) {
            if (system($ENV{SHELL}) != 0) {
                print "Abort? [n/y] ";


@@ -163,7 +162,7 @@ sub update_patch
                next unless /^y/i;
                return 0;
            }
                next unless /^y/i;
                return 0;
            }

-           ($status, $is_clean) = &check_git_status;
+           my($cur_branch, $is_clean, $status) = check_git_status(0);

            last if $is_clean;
            print $status;
        }
            last if $is_clean;
            print $status;
        }


@@ -214,27 +213,17 @@ sub update_patch
 
 exit;
 
 
 exit;
 

-sub check_git_status
-{
-    open(IN, '-|', 'git status') or die $!;
-    my $status = join('', <IN>);
-    close IN;
-    my $is_clean = $status =~ /\nnothing to commit \(working directory clean\)/;
-    my($starting_branch) = $status =~ /^# On branch (.+)\n/;
-    ($status, $is_clean, $starting_branch);
-}
-

 sub usage
 {
     die <<EOT;
 Usage: patch-update [OPTIONS] [patches/DIFF...]
 
 Options:
 sub usage
 {
     die <<EOT;
 Usage: patch-update [OPTIONS] [patches/DIFF...]
 
 Options:

--b, --branch=BRANCH  The master branch to merge into the patch/* branches.
+-b, --branch=BRANCH  The master branch to merge into the patch/BASE/* branches.

     --gen[=DIR]      Include generated files.  Optional destination DIR
                      arg overrides the default of using the "patches" dir.
     --skip-check     Skip the check that ensures starting with a clean branch.
     --gen[=DIR]      Include generated files.  Optional destination DIR
                      arg overrides the default of using the "patches" dir.
     --skip-check     Skip the check that ensures starting with a clean branch.

--s, --shell          Launch a shell for every patch/* branch updated, not
+-s, --shell          Launch a shell for every patch/BASE/* branch updated, not

                      just when a conflict occurs.
 -h, --help           Output this help message.
 EOT
                      just when a conflict occurs.
 -h, --help           Output this help message.
 EOT