git-svn: clean up caching of SVN::Ra functions
[git/dscho.git] / git-am.sh
blobc9f66e278454374714794477be7ff8b93cd05a0f
1 #!/bin/sh
3 # Copyright (c) 2005, 2006 Junio C Hamano
5 USAGE='[--signoff] [--dotest=<dir>] [--utf8 | --no-utf8] [--binary] [--3way]
6 [--interactive] [--whitespace=<option>] [-C<n>] [-p<n>] <mbox>...
7 or, when resuming [--skip | --resolved]'
8 . git-sh-setup
9 set_reflog_action am
10 require_work_tree
12 git var GIT_COMMITTER_IDENT >/dev/null || exit
14 stop_here () {
15 echo "$1" >"$dotest/next"
16 exit 1
19 stop_here_user_resolve () {
20 if [ -n "$resolvemsg" ]; then
21 echo "$resolvemsg"
22 stop_here $1
24 cmdline=$(basename $0)
25 if test '' != "$interactive"
26 then
27 cmdline="$cmdline -i"
29 if test '' != "$threeway"
30 then
31 cmdline="$cmdline -3"
33 if test '.dotest' != "$dotest"
34 then
35 cmdline="$cmdline -d=$dotest"
37 echo "When you have resolved this problem run \"$cmdline --resolved\"."
38 echo "If you would prefer to skip this patch, instead run \"$cmdline --skip\"."
40 stop_here $1
43 go_next () {
44 rm -f "$dotest/$msgnum" "$dotest/msg" "$dotest/msg-clean" \
45 "$dotest/patch" "$dotest/info"
46 echo "$next" >"$dotest/next"
47 this=$next
50 cannot_fallback () {
51 echo "$1"
52 echo "Cannot fall back to three-way merge."
53 exit 1
56 fall_back_3way () {
57 O_OBJECT=`cd "$GIT_OBJECT_DIRECTORY" && pwd`
59 rm -fr "$dotest"/patch-merge-*
60 mkdir "$dotest/patch-merge-tmp-dir"
62 # First see if the patch records the index info that we can use.
63 git-apply -z --index-info "$dotest/patch" \
64 >"$dotest/patch-merge-index-info" &&
65 GIT_INDEX_FILE="$dotest/patch-merge-tmp-index" \
66 git-update-index -z --index-info <"$dotest/patch-merge-index-info" &&
67 GIT_INDEX_FILE="$dotest/patch-merge-tmp-index" \
68 git-write-tree >"$dotest/patch-merge-base+" ||
69 cannot_fallback "Repository lacks necessary blobs to fall back on 3-way merge."
71 echo Using index info to reconstruct a base tree...
72 if GIT_INDEX_FILE="$dotest/patch-merge-tmp-index" \
73 git-apply $binary --cached <"$dotest/patch"
74 then
75 mv "$dotest/patch-merge-base+" "$dotest/patch-merge-base"
76 mv "$dotest/patch-merge-tmp-index" "$dotest/patch-merge-index"
77 else
78 cannot_fallback "Did you hand edit your patch?
79 It does not apply to blobs recorded in its index."
82 test -f "$dotest/patch-merge-index" &&
83 his_tree=$(GIT_INDEX_FILE="$dotest/patch-merge-index" git-write-tree) &&
84 orig_tree=$(cat "$dotest/patch-merge-base") &&
85 rm -fr "$dotest"/patch-merge-* || exit 1
87 echo Falling back to patching base and 3-way merge...
89 # This is not so wrong. Depending on which base we picked,
90 # orig_tree may be wildly different from ours, but his_tree
91 # has the same set of wildly different changes in parts the
92 # patch did not touch, so recursive ends up canceling them,
93 # saying that we reverted all those changes.
95 eval GITHEAD_$his_tree='"$SUBJECT"'
96 export GITHEAD_$his_tree
97 git-merge-recursive $orig_tree -- HEAD $his_tree || {
98 if test -d "$GIT_DIR/rr-cache"
99 then
100 git-rerere
102 echo Failed to merge in the changes.
103 exit 1
105 unset GITHEAD_$his_tree
108 prec=4
109 dotest=.dotest sign= utf8=t keep= skip= interactive= resolved= binary= resolvemsg=
110 git_apply_opt=
112 while case "$#" in 0) break;; esac
114 case "$1" in
115 -d=*|--d=*|--do=*|--dot=*|--dote=*|--dotes=*|--dotest=*)
116 dotest=`expr "z$1" : 'z-[^=]*=\(.*\)'`; shift ;;
117 -d|--d|--do|--dot|--dote|--dotes|--dotest)
118 case "$#" in 1) usage ;; esac; shift
119 dotest="$1"; shift;;
121 -i|--i|--in|--int|--inte|--inter|--intera|--interac|--interact|\
122 --interacti|--interactiv|--interactive)
123 interactive=t; shift ;;
125 -b|--b|--bi|--bin|--bina|--binar|--binary)
126 binary=t; shift ;;
128 -3|--3|--3w|--3wa|--3way)
129 threeway=t; shift ;;
130 -s|--s|--si|--sig|--sign|--signo|--signof|--signoff)
131 sign=t; shift ;;
132 -u|--u|--ut|--utf|--utf8)
133 utf8=t; shift ;; # this is now default
134 --no-u|--no-ut|--no-utf|--no-utf8)
135 utf8=; shift ;;
136 -k|--k|--ke|--kee|--keep)
137 keep=t; shift ;;
139 -r|--r|--re|--res|--reso|--resol|--resolv|--resolve|--resolved)
140 resolved=t; shift ;;
142 --sk|--ski|--skip)
143 skip=t; shift ;;
145 --whitespace=*|-C*|-p*)
146 git_apply_opt="$git_apply_opt $1"; shift ;;
148 --resolvemsg=*)
149 resolvemsg=$(echo "$1" | sed -e "s/^--resolvemsg=//"); shift ;;
152 shift; break ;;
154 usage ;;
156 break ;;
157 esac
158 done
160 # If the dotest directory exists, but we have finished applying all the
161 # patches in them, clear it out.
162 if test -d "$dotest" &&
163 last=$(cat "$dotest/last") &&
164 next=$(cat "$dotest/next") &&
165 test $# != 0 &&
166 test "$next" -gt "$last"
167 then
168 rm -fr "$dotest"
171 if test -d "$dotest"
172 then
173 case "$#,$skip$resolved" in
174 0,*t*)
175 # Explicit resume command and we do not have file, so
176 # we are happy.
177 : ;;
179 # No file input but without resume parameters; catch
180 # user error to feed us a patch from standard input
181 # when there is already .dotest. This is somewhat
182 # unreliable -- stdin could be /dev/null for example
183 # and the caller did not intend to feed us a patch but
184 # wanted to continue unattended.
185 tty -s
188 false
190 esac ||
191 die "previous dotest directory $dotest still exists but mbox given."
192 resume=yes
193 else
194 # Make sure we are not given --skip nor --resolved
195 test ",$skip,$resolved," = ,,, ||
196 die "Resolve operation not in progress, we are not resuming."
198 # Start afresh.
199 mkdir -p "$dotest" || exit
201 git-mailsplit -d"$prec" -o"$dotest" -b -- "$@" > "$dotest/last" || {
202 rm -fr "$dotest"
203 exit 1
206 # -b, -s, -u, -k and --whitespace flags are kept for the
207 # resuming session after a patch failure.
208 # -3 and -i can and must be given when resuming.
209 echo "$binary" >"$dotest/binary"
210 echo " $ws" >"$dotest/whitespace"
211 echo "$sign" >"$dotest/sign"
212 echo "$utf8" >"$dotest/utf8"
213 echo "$keep" >"$dotest/keep"
214 echo 1 >"$dotest/next"
217 case "$resolved" in
219 files=$(git-diff-index --cached --name-only HEAD) || exit
220 if [ "$files" ]; then
221 echo "Dirty index: cannot apply patches (dirty: $files)" >&2
222 exit 1
224 esac
226 if test "$(cat "$dotest/binary")" = t
227 then
228 binary=--allow-binary-replacement
230 if test "$(cat "$dotest/utf8")" = t
231 then
232 utf8=-u
233 else
234 utf8=-n
236 if test "$(cat "$dotest/keep")" = t
237 then
238 keep=-k
240 ws=`cat "$dotest/whitespace"`
241 if test "$(cat "$dotest/sign")" = t
242 then
243 SIGNOFF=`git-var GIT_COMMITTER_IDENT | sed -e '
244 s/>.*/>/
245 s/^/Signed-off-by: /'
247 else
248 SIGNOFF=
251 last=`cat "$dotest/last"`
252 this=`cat "$dotest/next"`
253 if test "$skip" = t
254 then
255 if test -d "$GIT_DIR/rr-cache"
256 then
257 git-rerere clear
259 this=`expr "$this" + 1`
260 resume=
263 if test "$this" -gt "$last"
264 then
265 echo Nothing to do.
266 rm -fr "$dotest"
267 exit
270 while test "$this" -le "$last"
272 msgnum=`printf "%0${prec}d" $this`
273 next=`expr "$this" + 1`
274 test -f "$dotest/$msgnum" || {
275 resume=
276 go_next
277 continue
280 # If we are not resuming, parse and extract the patch information
281 # into separate files:
282 # - info records the authorship and title
283 # - msg is the rest of commit log message
284 # - patch is the patch body.
286 # When we are resuming, these files are either already prepared
287 # by the user, or the user can tell us to do so by --resolved flag.
288 case "$resume" in
290 git-mailinfo $keep $utf8 "$dotest/msg" "$dotest/patch" \
291 <"$dotest/$msgnum" >"$dotest/info" ||
292 stop_here $this
293 test -s $dotest/patch || {
294 echo "Patch is empty. Was it split wrong?"
295 stop_here $this
297 git-stripspace < "$dotest/msg" > "$dotest/msg-clean"
299 esac
301 GIT_AUTHOR_NAME="$(sed -n '/^Author/ s/Author: //p' "$dotest/info")"
302 GIT_AUTHOR_EMAIL="$(sed -n '/^Email/ s/Email: //p' "$dotest/info")"
303 GIT_AUTHOR_DATE="$(sed -n '/^Date/ s/Date: //p' "$dotest/info")"
305 if test -z "$GIT_AUTHOR_EMAIL"
306 then
307 echo "Patch does not have a valid e-mail address."
308 stop_here $this
311 export GIT_AUTHOR_NAME GIT_AUTHOR_EMAIL GIT_AUTHOR_DATE
313 SUBJECT="$(sed -n '/^Subject/ s/Subject: //p' "$dotest/info")"
314 case "$keep_subject" in -k) SUBJECT="[PATCH] $SUBJECT" ;; esac
316 case "$resume" in
318 if test '' != "$SIGNOFF"
319 then
320 LAST_SIGNED_OFF_BY=`
321 sed -ne '/^Signed-off-by: /p' \
322 "$dotest/msg-clean" |
323 tail -n 1
325 ADD_SIGNOFF=`
326 test "$LAST_SIGNED_OFF_BY" = "$SIGNOFF" || {
327 test '' = "$LAST_SIGNED_OFF_BY" && echo
328 echo "$SIGNOFF"
330 else
331 ADD_SIGNOFF=
334 echo "$SUBJECT"
335 if test -s "$dotest/msg-clean"
336 then
337 echo
338 cat "$dotest/msg-clean"
340 if test '' != "$ADD_SIGNOFF"
341 then
342 echo "$ADD_SIGNOFF"
344 } >"$dotest/final-commit"
347 case "$resolved$interactive" in
349 # This is used only for interactive view option.
350 git-diff-index -p --cached HEAD >"$dotest/patch"
352 esac
353 esac
355 resume=
356 if test "$interactive" = t
357 then
358 test -t 0 ||
359 die "cannot be interactive without stdin connected to a terminal."
360 action=again
361 while test "$action" = again
363 echo "Commit Body is:"
364 echo "--------------------------"
365 cat "$dotest/final-commit"
366 echo "--------------------------"
367 printf "Apply? [y]es/[n]o/[e]dit/[v]iew patch/[a]ccept all "
368 read reply
369 case "$reply" in
370 [yY]*) action=yes ;;
371 [aA]*) action=yes interactive= ;;
372 [nN]*) action=skip ;;
373 [eE]*) "${VISUAL:-${EDITOR:-vi}}" "$dotest/final-commit"
374 action=again ;;
375 [vV]*) action=again
376 LESS=-S ${PAGER:-less} "$dotest/patch" ;;
377 *) action=again ;;
378 esac
379 done
380 else
381 action=yes
384 if test $action = skip
385 then
386 go_next
387 continue
390 if test -x "$GIT_DIR"/hooks/applypatch-msg
391 then
392 "$GIT_DIR"/hooks/applypatch-msg "$dotest/final-commit" ||
393 stop_here $this
396 echo
397 echo "Applying '$SUBJECT'"
398 echo
400 case "$resolved" in
402 git-apply $git_apply_opt $binary --index "$dotest/patch"
403 apply_status=$?
406 # Resolved means the user did all the hard work, and
407 # we do not have to do any patch application. Just
408 # trust what the user has in the index file and the
409 # working tree.
410 resolved=
411 git-diff-index --quiet --cached HEAD && {
412 echo "No changes - did you forget to use 'git add'?"
413 stop_here_user_resolve $this
415 unmerged=$(git-ls-files -u)
416 if test -n "$unmerged"
417 then
418 echo "You still have unmerged paths in your index"
419 echo "did you forget to use 'git add'?"
420 stop_here_user_resolve $this
422 apply_status=0
423 if test -d "$GIT_DIR/rr-cache"
424 then
425 git rerere
428 esac
430 if test $apply_status = 1 && test "$threeway" = t
431 then
432 if (fall_back_3way)
433 then
434 # Applying the patch to an earlier tree and merging the
435 # result may have produced the same tree as ours.
436 git-diff-index --quiet --cached HEAD && {
437 echo No changes -- Patch already applied.
438 go_next
439 continue
441 # clear apply_status -- we have successfully merged.
442 apply_status=0
445 if test $apply_status != 0
446 then
447 echo Patch failed at $msgnum.
448 stop_here_user_resolve $this
451 if test -x "$GIT_DIR"/hooks/pre-applypatch
452 then
453 "$GIT_DIR"/hooks/pre-applypatch || stop_here $this
456 tree=$(git-write-tree) &&
457 echo Wrote tree $tree &&
458 parent=$(git-rev-parse --verify HEAD) &&
459 commit=$(git-commit-tree $tree -p $parent <"$dotest/final-commit") &&
460 echo Committed: $commit &&
461 git-update-ref -m "$GIT_REFLOG_ACTION: $SUBJECT" HEAD $commit $parent ||
462 stop_here $this
464 if test -x "$GIT_DIR"/hooks/post-applypatch
465 then
466 "$GIT_DIR"/hooks/post-applypatch
469 go_next
470 done
472 rm -fr "$dotest"