]>
Commit | Line | Data |
---|---|---|
1 | #!/bin/sh | |
2 | # Copyright 2005, Ryan Anderson <ryan@michonline.com> | |
3 | # | |
4 | # This file is licensed under the GPL v2, or a later version | |
5 | # at the discretion of Linus Torvalds. | |
6 | ||
7 | SUBDIRECTORY_OK='Yes' | |
8 | OPTIONS_KEEPDASHDASH= | |
9 | OPTIONS_STUCKLONG= | |
10 | OPTIONS_SPEC='git request-pull [options] start url [end] | |
11 | -- | |
12 | p show patch text as well | |
13 | ' | |
14 | ||
15 | . git-sh-setup | |
16 | ||
17 | GIT_PAGER= | |
18 | export GIT_PAGER | |
19 | ||
20 | patch= | |
21 | while case "$#" in 0) break ;; esac | |
22 | do | |
23 | case "$1" in | |
24 | -p) | |
25 | patch=-p ;; | |
26 | --) | |
27 | shift; break ;; | |
28 | -*) | |
29 | usage ;; | |
30 | *) | |
31 | break ;; | |
32 | esac | |
33 | shift | |
34 | done | |
35 | ||
36 | base=$1 url=$2 status=0 | |
37 | ||
38 | test -n "$base" && test -n "$url" || usage | |
39 | ||
40 | baserev=$(git rev-parse --verify --quiet "$base"^0) | |
41 | if test -z "$baserev" | |
42 | then | |
43 | die "fatal: Not a valid revision: $base" | |
44 | fi | |
45 | ||
46 | # | |
47 | # $3 must be a symbolic ref, a unique ref, or | |
48 | # a SHA object expression. It can also be of | |
49 | # the format 'local-name:remote-name'. | |
50 | # | |
51 | local=${3%:*} | |
52 | local=${local:-HEAD} | |
53 | remote=${3#*:} | |
54 | pretty_remote=${remote#refs/} | |
55 | pretty_remote=${pretty_remote#heads/} | |
56 | head=$(git symbolic-ref -q "$local") | |
57 | head=${head:-$(git show-ref --heads --tags "$local" | cut -d' ' -f2)} | |
58 | head=${head:-$(git rev-parse --quiet --verify "$local")} | |
59 | ||
60 | # None of the above? Bad. | |
61 | test -z "$head" && die "fatal: Not a valid revision: $local" | |
62 | ||
63 | # This also verifies that the resulting head is unique: | |
64 | # "git show-ref" could have shown multiple matching refs.. | |
65 | headrev=$(git rev-parse --verify --quiet "$head"^0) | |
66 | test -z "$headrev" && die "fatal: Ambiguous revision: $local" | |
67 | ||
68 | local_sha1=$(git rev-parse --verify --quiet "$head") | |
69 | ||
70 | # Was it a branch with a description? | |
71 | branch_name=${head#refs/heads/} | |
72 | if test "z$branch_name" = "z$headref" || | |
73 | ! git config "branch.$branch_name.description" >/dev/null | |
74 | then | |
75 | branch_name= | |
76 | fi | |
77 | ||
78 | merge_base=$(git merge-base $baserev $headrev) || | |
79 | die "fatal: No commits in common between $base and $head" | |
80 | ||
81 | # $head is the refname from the command line. | |
82 | # Find a ref with the same name as $head that exists at the remote | |
83 | # and points to the same commit as the local object. | |
84 | find_matching_ref=' | |
85 | my ($head,$headrev) = (@ARGV); | |
86 | my $pattern = qr{/\Q$head\E$}; | |
87 | my ($remote_sha1, $found); | |
88 | ||
89 | while (<STDIN>) { | |
90 | chomp; | |
91 | my ($sha1, $ref, $deref) = /^(\S+)\s+([^^]+)(\S*)$/; | |
92 | ||
93 | if ($sha1 eq $head) { | |
94 | $found = $remote_sha1 = $sha1; | |
95 | break; | |
96 | } | |
97 | ||
98 | if ($ref eq $head || $ref =~ $pattern) { | |
99 | if ($deref eq "") { | |
100 | # Remember the matching object on the remote side | |
101 | $remote_sha1 = $sha1; | |
102 | } | |
103 | if ($sha1 eq $headrev) { | |
104 | $found = $ref; | |
105 | break; | |
106 | } | |
107 | } | |
108 | } | |
109 | if ($found) { | |
110 | $remote_sha1 = $headrev if ! defined $remote_sha1; | |
111 | print "$remote_sha1 $found\n"; | |
112 | } | |
113 | ' | |
114 | ||
115 | set fnord $(git ls-remote "$url" | @@PERL@@ -e "$find_matching_ref" "${remote:-HEAD}" "$headrev") | |
116 | remote_sha1=$2 | |
117 | ref=$3 | |
118 | ||
119 | if test -z "$ref" | |
120 | then | |
121 | echo "warn: No match for commit $headrev found at $url" >&2 | |
122 | echo "warn: Are you sure you pushed '${remote:-HEAD}' there?" >&2 | |
123 | status=1 | |
124 | elif test "$local_sha1" != "$remote_sha1" | |
125 | then | |
126 | echo "warn: $head found at $url but points to a different object" >&2 | |
127 | echo "warn: Are you sure you pushed '${remote:-HEAD}' there?" >&2 | |
128 | status=1 | |
129 | fi | |
130 | ||
131 | # Special case: turn "for_linus" to "tags/for_linus" when it is correct | |
132 | if test "$ref" = "refs/tags/$pretty_remote" | |
133 | then | |
134 | pretty_remote=tags/$pretty_remote | |
135 | fi | |
136 | ||
137 | url=$(git ls-remote --get-url "$url") | |
138 | ||
139 | git show -s --format='The following changes since commit %H: | |
140 | ||
141 | %s (%ci) | |
142 | ||
143 | are available in the Git repository at: | |
144 | ' $merge_base && | |
145 | echo " $url $pretty_remote" && | |
146 | git show -s --format=' | |
147 | for you to fetch changes up to %H: | |
148 | ||
149 | %s (%ci) | |
150 | ||
151 | ----------------------------------------------------------------' $headrev && | |
152 | ||
153 | if test $(git cat-file -t "$head") = tag | |
154 | then | |
155 | git cat-file tag "$head" | | |
156 | sed -n -e '1,/^$/d' -e '/^-----BEGIN PGP /q' -e p | |
157 | echo | |
158 | echo "----------------------------------------------------------------" | |
159 | fi && | |
160 | ||
161 | if test -n "$branch_name" | |
162 | then | |
163 | echo "(from the branch description for $branch_name local branch)" | |
164 | echo | |
165 | git config "branch.$branch_name.description" | |
166 | echo "----------------------------------------------------------------" | |
167 | fi && | |
168 | ||
169 | git shortlog ^$baserev $headrev && | |
170 | git diff -M --stat --summary $patch $merge_base..$headrev || status=1 | |
171 | ||
172 | exit $status |