]> git.ipfire.org Git - thirdparty/git.git/blame - t/test-lib-functions.sh
Merge branch 'jk/fsck-indices-in-worktrees'
[thirdparty/git.git] / t / test-lib-functions.sh
CommitLineData
c74c7203
JN
1# Library of functions shared by all tests scripts, included by
2# test-lib.sh.
12a29b1a
TR
3#
4# Copyright (c) 2005 Junio C Hamano
5#
6# This program is free software: you can redistribute it and/or modify
7# it under the terms of the GNU General Public License as published by
8# the Free Software Foundation, either version 2 of the License, or
9# (at your option) any later version.
10#
11# This program is distributed in the hope that it will be useful,
12# but WITHOUT ANY WARRANTY; without even the implied warranty of
13# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14# GNU General Public License for more details.
15#
16# You should have received a copy of the GNU General Public License
17# along with this program. If not, see http://www.gnu.org/licenses/ .
18
19# The semantics of the editor variables are that of invoking
20# sh -c "$EDITOR \"$@\"" files ...
21#
22# If our trash directory contains shell metacharacters, they will be
23# interpreted if we just set $EDITOR directly, so do a little dance with
24# environment variables to work around this.
25#
26# In particular, quoting isn't enough, as the path may contain the same quote
27# that we're using.
28test_set_editor () {
29 FAKE_EDITOR="$1"
30 export FAKE_EDITOR
31 EDITOR='"$FAKE_EDITOR"'
32 export EDITOR
33}
34
666b6e11
PW
35# Like test_set_editor but sets GIT_SEQUENCE_EDITOR instead of EDITOR
36test_set_sequence_editor () {
37 FAKE_SEQUENCE_EDITOR="$1"
38 export FAKE_SEQUENCE_EDITOR
39 GIT_SEQUENCE_EDITOR='"$FAKE_SEQUENCE_EDITOR"'
40 export GIT_SEQUENCE_EDITOR
41}
42
12a29b1a
TR
43test_decode_color () {
44 awk '
45 function name(n) {
46 if (n == 0) return "RESET";
47 if (n == 1) return "BOLD";
991eb4fc
SB
48 if (n == 2) return "FAINT";
49 if (n == 3) return "ITALIC";
097b681b 50 if (n == 7) return "REVERSE";
12a29b1a
TR
51 if (n == 30) return "BLACK";
52 if (n == 31) return "RED";
53 if (n == 32) return "GREEN";
54 if (n == 33) return "YELLOW";
55 if (n == 34) return "BLUE";
56 if (n == 35) return "MAGENTA";
57 if (n == 36) return "CYAN";
58 if (n == 37) return "WHITE";
59 if (n == 40) return "BLACK";
60 if (n == 41) return "BRED";
61 if (n == 42) return "BGREEN";
62 if (n == 43) return "BYELLOW";
63 if (n == 44) return "BBLUE";
64 if (n == 45) return "BMAGENTA";
65 if (n == 46) return "BCYAN";
66 if (n == 47) return "BWHITE";
67 }
68 {
69 while (match($0, /\033\[[0-9;]*m/) != 0) {
70 printf "%s<", substr($0, 1, RSTART-1);
71 codes = substr($0, RSTART+2, RLENGTH-3);
72 if (length(codes) == 0)
73 printf "%s", name(0)
74 else {
75 n = split(codes, ary, ";");
76 sep = "";
77 for (i = 1; i <= n; i++) {
78 printf "%s%s", sep, name(ary[i]);
79 sep = ";"
80 }
81 }
82 printf ">";
83 $0 = substr($0, RSTART + RLENGTH, length($0) - RSTART - RLENGTH + 1);
84 }
85 print
86 }
87 '
88}
89
b249e39f
JH
90lf_to_nul () {
91 perl -pe 'y/\012/\000/'
92}
93
12a29b1a 94nul_to_q () {
94221d22 95 perl -pe 'y/\000/Q/'
12a29b1a
TR
96}
97
98q_to_nul () {
94221d22 99 perl -pe 'y/Q/\000/'
12a29b1a
TR
100}
101
102q_to_cr () {
103 tr Q '\015'
104}
105
106q_to_tab () {
107 tr Q '\011'
108}
109
250b3c6c
JH
110qz_to_tab_space () {
111 tr QZ '\011\040'
12a29b1a
TR
112}
113
114append_cr () {
115 sed -e 's/$/Q/' | tr Q '\015'
116}
117
118remove_cr () {
119 tr '\015' Q | sed -e 's/Q$//'
120}
121
122# In some bourne shell implementations, the "unset" builtin returns
123# nonzero status when a variable to be unset was not set in the first
124# place.
125#
126# Use sane_unset when that should not be considered an error.
127
128sane_unset () {
129 unset "$@"
130 return 0
131}
132
133test_tick () {
134 if test -z "${test_tick+set}"
135 then
136 test_tick=1112911993
137 else
138 test_tick=$(($test_tick + 60))
139 fi
140 GIT_COMMITTER_DATE="$test_tick -0700"
141 GIT_AUTHOR_DATE="$test_tick -0700"
142 export GIT_COMMITTER_DATE GIT_AUTHOR_DATE
143}
144
59210dd5 145# Stop execution and start a shell. This is useful for debugging tests.
12a29b1a
TR
146#
147# Be sure to remove all invocations of this command before submitting.
add5240f
PB
148# WARNING: the shell invoked by this helper does not have the same environment
149# as the one running the tests (shell variables and functions are not
150# available, and the options below further modify the environment). As such,
151# commands copied from a test script might behave differently than when
152# running the test.
153#
154# Usage: test_pause [options]
155# -t
156# Use your original TERM instead of test-lib.sh's "dumb".
157# This usually restores color output in the invoked shell.
158# -s
159# Invoke $SHELL instead of $TEST_SHELL_PATH.
160# -h
161# Use your original HOME instead of test-lib.sh's "$TRASH_DIRECTORY".
162# This allows you to use your regular shell environment and Git aliases.
163# CAUTION: running commands copied from a test script into the paused shell
164# might result in files in your HOME being overwritten.
165# -a
166# Shortcut for -t -s -h
12a29b1a
TR
167
168test_pause () {
add5240f
PB
169 PAUSE_TERM=$TERM &&
170 PAUSE_SHELL=$TEST_SHELL_PATH &&
171 PAUSE_HOME=$HOME &&
172 while test $# != 0
173 do
174 case "$1" in
175 -t)
176 PAUSE_TERM="$USER_TERM"
177 ;;
178 -s)
179 PAUSE_SHELL="$SHELL"
180 ;;
181 -h)
182 PAUSE_HOME="$USER_HOME"
183 ;;
184 -a)
185 PAUSE_TERM="$USER_TERM"
186 PAUSE_SHELL="$SHELL"
187 PAUSE_HOME="$USER_HOME"
188 ;;
189 *)
190 break
191 ;;
192 esac
193 shift
194 done &&
195 TERM="$PAUSE_TERM" HOME="$PAUSE_HOME" "$PAUSE_SHELL" <&6 >&5 2>&7
12a29b1a
TR
196}
197
84243646
EN
198# Wrap git with a debugger. Adding this to a command can make it easier
199# to understand what is going on in a failing test.
6a94088c 200#
01c38103
PB
201# Usage: debug [options] <git command>
202# -d <debugger>
203# --debugger=<debugger>
204# Use <debugger> instead of GDB
205# -t
206# Use your original TERM instead of test-lib.sh's "dumb".
207# This usually restores color output in the debugger.
208# WARNING: the command being debugged might behave differently than when
209# running the test.
210#
84243646
EN
211# Examples:
212# debug git checkout master
213# debug --debugger=nemiver git $ARGS
214# debug -d "valgrind --tool=memcheck --track-origins=yes" git $ARGS
6a94088c 215debug () {
01c38103
PB
216 GIT_DEBUGGER=1 &&
217 DEBUG_TERM=$TERM &&
218 while test $# != 0
219 do
220 case "$1" in
221 -t)
222 DEBUG_TERM="$USER_TERM"
223 ;;
224 -d)
225 GIT_DEBUGGER="$2" &&
226 shift
227 ;;
228 --debugger=*)
229 GIT_DEBUGGER="${1#*=}"
230 ;;
231 *)
232 break
233 ;;
234 esac
235 shift
236 done &&
237
238 dotfiles=".gdbinit .lldbinit"
239
240 for dotfile in $dotfiles
241 do
242 dotfile="$USER_HOME/$dotfile" &&
243 test -f "$dotfile" && cp "$dotfile" "$HOME" || :
244 done &&
245
246 TERM="$DEBUG_TERM" GIT_DEBUGGER="${GIT_DEBUGGER}" "$@" <&6 >&5 2>&7 &&
247
248 for dotfile in $dotfiles
249 do
250 rm -f "$HOME/$dotfile"
251 done
6a94088c
JS
252}
253
f21426e1
ÆAB
254# Usage: test_commit [options] <message> [<file> [<contents> [<tag>]]]
255# -C <dir>:
256# Run all git commands in directory <dir>
76b8b8d0
ÆAB
257# --notick
258# Do not call test_tick before making a commit
3373518c 259# --append
cb8fb7f8 260# Use ">>" instead of ">" when writing "<contents>" to "<file>"
47c88d16
ÆAB
261# --printf
262# Use "printf" instead of "echo" when writing "<contents>" to
263# "<file>", use this to write escape sequences such as "\0", a
264# trailing "\n" won't be added automatically. This option
265# supports nothing but the FORMAT of printf(1), i.e. no custom
266# ARGUMENT(s).
76b8b8d0
ÆAB
267# --signoff
268# Invoke "git commit" with --signoff
f9f30a03
DL
269# --author <author>
270# Invoke "git commit" with --author <author>
5144219b
ÆAB
271# --no-tag
272# Do not tag the resulting commit
6cf8d96f
ÆAB
273# --annotate
274# Create an annotated tag with "--annotate -m <message>". Calls
275# test_tick between making the commit and tag, unless --notick
276# is given.
12a29b1a
TR
277#
278# This will commit a file with the given contents and the given commit
4c994194 279# message, and tag the resulting commit with the given tag name.
12a29b1a 280#
4c994194 281# <file>, <contents>, and <tag> all default to <message>.
12a29b1a
TR
282
283test_commit () {
455f0adf
PB
284 local notick= &&
285 local echo=echo &&
286 local append= &&
287 local author= &&
288 local signoff= &&
289 local indir= &&
290 local tag=light &&
5ed75e2a
MV
291 while test $# != 0
292 do
293 case "$1" in
294 --notick)
295 notick=yes
296 ;;
47c88d16
ÆAB
297 --printf)
298 echo=printf
299 ;;
3373518c
ÆAB
300 --append)
301 append=yes
302 ;;
999cfc4f
ÆAB
303 --author)
304 author="$2"
305 shift
306 ;;
5ed75e2a
MV
307 --signoff)
308 signoff="$1"
309 ;;
e8b63005
AK
310 --date)
311 notick=yes
312 GIT_COMMITTER_DATE="$2"
313 GIT_AUTHOR_DATE="$2"
314 shift
315 ;;
6f94351b
SB
316 -C)
317 indir="$2"
318 shift
319 ;;
3803a3a0 320 --no-tag)
6cf8d96f
ÆAB
321 tag=none
322 ;;
323 --annotate)
324 tag=annotate
3803a3a0 325 ;;
5ed75e2a
MV
326 *)
327 break
328 ;;
329 esac
9a0231b3 330 shift
5ed75e2a 331 done &&
6f94351b 332 indir=${indir:+"$indir"/} &&
455f0adf 333 local file=${2:-"$1.t"} &&
3373518c
ÆAB
334 if test -n "$append"
335 then
47c88d16 336 $echo "${3-$1}" >>"$indir$file"
3373518c 337 else
47c88d16 338 $echo "${3-$1}" >"$indir$file"
3373518c 339 fi &&
e3c36758 340 git ${indir:+ -C "$indir"} add -- "$file" &&
9a0231b3
JH
341 if test -z "$notick"
342 then
343 test_tick
344 fi &&
999cfc4f
ÆAB
345 git ${indir:+ -C "$indir"} commit \
346 ${author:+ --author "$author"} \
347 $signoff -m "$1" &&
6cf8d96f
ÆAB
348 case "$tag" in
349 none)
350 ;;
351 light)
3803a3a0 352 git ${indir:+ -C "$indir"} tag "${4:-$1}"
6cf8d96f
ÆAB
353 ;;
354 annotate)
355 if test -z "$notick"
356 then
357 test_tick
358 fi &&
359 git ${indir:+ -C "$indir"} tag -a -m "$1" "${4:-$1}"
360 ;;
361 esac
12a29b1a
TR
362}
363
364# Call test_merge with the arguments "<message> <commit>", where <commit>
365# can be a tag pointing to the commit-to-merge.
366
367test_merge () {
94ba1513
DL
368 label="$1" &&
369 shift &&
12a29b1a 370 test_tick &&
94ba1513
DL
371 git merge -m "$label" "$@" &&
372 git tag "$label"
12a29b1a
TR
373}
374
b1c36cb8
JK
375# Efficiently create <nr> commits, each with a unique number (from 1 to <nr>
376# by default) in the commit message.
377#
378# Usage: test_commit_bulk [options] <nr>
379# -C <dir>:
380# Run all git commands in directory <dir>
381# --ref=<n>:
382# ref on which to create commits (default: HEAD)
383# --start=<n>:
384# number commit messages from <n> (default: 1)
385# --message=<msg>:
386# use <msg> as the commit mesasge (default: "commit %s")
387# --filename=<fn>:
388# modify <fn> in each commit (default: %s.t)
389# --contents=<string>:
390# place <string> in each file (default: "content %s")
391# --id=<string>:
392# shorthand to use <string> and %s in message, filename, and contents
393#
394# The message, filename, and contents strings are evaluated by printf, with the
395# first "%s" replaced by the current commit number. So you can do:
396#
397# test_commit_bulk --filename=file --contents="modification %s"
398#
399# to have every commit touch the same file, but with unique content.
400#
401test_commit_bulk () {
402 tmpfile=.bulk-commit.input
403 indir=.
404 ref=HEAD
405 n=1
406 message='commit %s'
407 filename='%s.t'
408 contents='content %s'
409 while test $# -gt 0
410 do
411 case "$1" in
412 -C)
413 indir=$2
414 shift
415 ;;
416 --ref=*)
417 ref=${1#--*=}
418 ;;
419 --start=*)
420 n=${1#--*=}
421 ;;
422 --message=*)
423 message=${1#--*=}
424 ;;
425 --filename=*)
426 filename=${1#--*=}
427 ;;
428 --contents=*)
429 contents=${1#--*=}
430 ;;
431 --id=*)
432 message="${1#--*=} %s"
433 filename="${1#--*=}-%s.t"
434 contents="${1#--*=} %s"
435 ;;
436 -*)
437 BUG "invalid test_commit_bulk option: $1"
438 ;;
439 *)
440 break
441 ;;
442 esac
443 shift
444 done
445 total=$1
446
447 add_from=
fc42f20e 448 if git -C "$indir" rev-parse --quiet --verify "$ref"
b1c36cb8
JK
449 then
450 add_from=t
451 fi
452
453 while test "$total" -gt 0
454 do
455 test_tick &&
456 echo "commit $ref"
457 printf 'author %s <%s> %s\n' \
458 "$GIT_AUTHOR_NAME" \
459 "$GIT_AUTHOR_EMAIL" \
460 "$GIT_AUTHOR_DATE"
461 printf 'committer %s <%s> %s\n' \
462 "$GIT_COMMITTER_NAME" \
463 "$GIT_COMMITTER_EMAIL" \
464 "$GIT_COMMITTER_DATE"
465 echo "data <<EOF"
466 printf "$message\n" $n
467 echo "EOF"
468 if test -n "$add_from"
469 then
470 echo "from $ref^0"
471 add_from=
472 fi
473 printf "M 644 inline $filename\n" $n
474 echo "data <<EOF"
475 printf "$contents\n" $n
476 echo "EOF"
477 echo
478 n=$((n + 1))
479 total=$((total - 1))
480 done >"$tmpfile"
481
482 git -C "$indir" \
483 -c fastimport.unpacklimit=0 \
484 fast-import <"$tmpfile" || return 1
485
486 # This will be left in place on failure, which may aid debugging.
487 rm -f "$tmpfile"
488
489 # If we updated HEAD, then be nice and update the index and working
490 # tree, too.
491 if test "$ref" = "HEAD"
492 then
493 git -C "$indir" checkout -f HEAD || return 1
494 fi
495
496}
497
12a29b1a
TR
498# This function helps systems where core.filemode=false is set.
499# Use it instead of plain 'chmod +x' to set or unset the executable bit
500# of a file in the working directory and add it to the index.
501
502test_chmod () {
503 chmod "$@" &&
504 git update-index --add "--chmod=$@"
505}
506
ea8bbf2a
MT
507# Get the modebits from a file or directory, ignoring the setgid bit (g+s).
508# This bit is inherited by subdirectories at their creation. So we remove it
509# from the returning string to prevent callers from having to worry about the
510# state of the bit in the test directory.
511#
73de1c93 512test_modebits () {
ea8bbf2a
MT
513 ls -ld "$1" | sed -e 's|^\(..........\).*|\1|' \
514 -e 's|^\(......\)S|\1-|' -e 's|^\(......\)s|\1x|'
73de1c93
CC
515}
516
12a29b1a
TR
517# Unset a configuration variable, but don't fail if it doesn't exist.
518test_unconfig () {
5fafc07f
JK
519 config_dir=
520 if test "$1" = -C
521 then
522 shift
523 config_dir=$1
524 shift
525 fi
526 git ${config_dir:+-C "$config_dir"} config --unset-all "$@"
12a29b1a
TR
527 config_status=$?
528 case "$config_status" in
529 5) # ok, nothing to unset
530 config_status=0
531 ;;
532 esac
533 return $config_status
534}
535
536# Set git config, automatically unsetting it after the test is over.
537test_config () {
5fafc07f
JK
538 config_dir=
539 if test "$1" = -C
540 then
541 shift
542 config_dir=$1
543 shift
544 fi
545 test_when_finished "test_unconfig ${config_dir:+-C '$config_dir'} '$1'" &&
546 git ${config_dir:+-C "$config_dir"} config "$@"
12a29b1a
TR
547}
548
549test_config_global () {
550 test_when_finished "test_unconfig --global '$1'" &&
551 git config --global "$@"
552}
553
554write_script () {
555 {
556 echo "#!${2-"$SHELL_PATH"}" &&
557 cat
558 } >"$1" &&
559 chmod +x "$1"
560}
561
7da7f63c
ÆAB
562# Usage: test_hook [options] <hook-name> <<-\EOF
563#
564# -C <dir>:
565# Run all git commands in directory <dir>
566# --setup
567# Setup a hook for subsequent tests, i.e. don't remove it in a
568# "test_when_finished"
569# --clobber
570# Overwrite an existing <hook-name>, if it exists. Implies
571# --setup (i.e. the "test_when_finished" is assumed to have been
572# set up already).
66865d12
ÆAB
573# --disable
574# Disable (chmod -x) an existing <hook-name>, which must exist.
575# --remove
576# Remove (rm -f) an existing <hook-name>, which must exist.
7da7f63c
ÆAB
577test_hook () {
578 setup= &&
579 clobber= &&
66865d12
ÆAB
580 disable= &&
581 remove= &&
7da7f63c
ÆAB
582 indir= &&
583 while test $# != 0
584 do
585 case "$1" in
586 -C)
587 indir="$2" &&
588 shift
589 ;;
590 --setup)
591 setup=t
592 ;;
593 --clobber)
594 clobber=t
595 ;;
66865d12
ÆAB
596 --disable)
597 disable=t
598 ;;
599 --remove)
600 remove=t
601 ;;
7da7f63c
ÆAB
602 -*)
603 BUG "invalid argument: $1"
604 ;;
605 *)
606 break
607 ;;
608 esac &&
609 shift
610 done &&
611
612 git_dir=$(git -C "$indir" rev-parse --absolute-git-dir) &&
613 hook_dir="$git_dir/hooks" &&
614 hook_file="$hook_dir/$1" &&
66865d12
ÆAB
615 if test -n "$disable$remove"
616 then
617 test_path_is_file "$hook_file" &&
618 if test -n "$disable"
619 then
620 chmod -x "$hook_file"
621 elif test -n "$remove"
622 then
623 rm -f "$hook_file"
624 fi &&
625 return 0
626 fi &&
7da7f63c
ÆAB
627 if test -z "$clobber"
628 then
629 test_path_is_missing "$hook_file"
630 fi &&
631 if test -z "$setup$clobber"
632 then
633 test_when_finished "rm \"$hook_file\""
634 fi &&
635 write_script "$hook_file"
636}
637
12a29b1a
TR
638# Use test_set_prereq to tell that a particular prerequisite is available.
639# The prerequisite can later be checked for in two ways:
640#
641# - Explicitly using test_have_prereq.
642#
643# - Implicitly by specifying the prerequisite tag in the calls to
5beca49a 644# test_expect_{success,failure}
12a29b1a
TR
645#
646# The single parameter is the prerequisite tag (a simple word, in all
647# capital letters by convention).
648
7d0ee47c
JS
649test_unset_prereq () {
650 ! test_have_prereq "$1" ||
651 satisfied_prereq="${satisfied_prereq% $1 *} ${satisfied_prereq#* $1 }"
652}
653
12a29b1a 654test_set_prereq () {
c7400399 655 if test -n "$GIT_TEST_FAIL_PREREQS_INTERNAL"
dfe1a17d
ÆAB
656 then
657 case "$1" in
658 # The "!" case is handled below with
659 # test_unset_prereq()
660 !*)
661 ;;
0011f94a 662 # List of things we can't easily pretend to not support
dfe1a17d
ÆAB
663 SYMLINKS)
664 ;;
665 # Inspecting whether GIT_TEST_FAIL_PREREQS is on
666 # should be unaffected.
667 FAIL_PREREQS)
668 ;;
669 *)
670 return
671 esac
672 fi
673
7d0ee47c
JS
674 case "$1" in
675 !*)
676 test_unset_prereq "${1#!}"
677 ;;
678 *)
679 satisfied_prereq="$satisfied_prereq$1 "
680 ;;
681 esac
12a29b1a 682}
f3cfc3b2 683satisfied_prereq=" "
04083f27
JH
684lazily_testable_prereq= lazily_tested_prereq=
685
686# Usage: test_lazy_prereq PREREQ 'script'
687test_lazy_prereq () {
688 lazily_testable_prereq="$lazily_testable_prereq$1 "
689 eval test_prereq_lazily_$1=\$2
690}
691
692test_run_lazy_prereq_ () {
693 script='
53ff3b96 694mkdir -p "$TRASH_DIRECTORY/prereq-test-dir-'"$1"'" &&
04083f27 695(
53ff3b96 696 cd "$TRASH_DIRECTORY/prereq-test-dir-'"$1"'" &&'"$2"'
04083f27
JH
697)'
698 say >&3 "checking prerequisite: $1"
699 say >&3 "$script"
700 test_eval_ "$script"
701 eval_ret=$?
53ff3b96 702 rm -rf "$TRASH_DIRECTORY/prereq-test-dir-$1"
04083f27
JH
703 if test "$eval_ret" = 0; then
704 say >&3 "prerequisite $1 ok"
705 else
706 say >&3 "prerequisite $1 not satisfied"
707 fi
708 return $eval_ret
709}
12a29b1a
TR
710
711test_have_prereq () {
712 # prerequisites can be concatenated with ','
713 save_IFS=$IFS
714 IFS=,
715 set -- $*
716 IFS=$save_IFS
717
718 total_prereq=0
719 ok_prereq=0
720 missing_prereq=
721
722 for prerequisite
723 do
bdccd3c1
JK
724 case "$prerequisite" in
725 !*)
726 negative_prereq=t
727 prerequisite=${prerequisite#!}
728 ;;
729 *)
730 negative_prereq=
731 esac
732
04083f27
JH
733 case " $lazily_tested_prereq " in
734 *" $prerequisite "*)
735 ;;
736 *)
737 case " $lazily_testable_prereq " in
738 *" $prerequisite "*)
739 eval "script=\$test_prereq_lazily_$prerequisite" &&
740 if test_run_lazy_prereq_ "$prerequisite" "$script"
741 then
742 test_set_prereq $prerequisite
743 fi
744 lazily_tested_prereq="$lazily_tested_prereq$prerequisite "
745 esac
746 ;;
747 esac
748
12a29b1a 749 total_prereq=$(($total_prereq + 1))
f3cfc3b2 750 case "$satisfied_prereq" in
12a29b1a 751 *" $prerequisite "*)
bdccd3c1
JK
752 satisfied_this_prereq=t
753 ;;
754 *)
755 satisfied_this_prereq=
756 esac
757
758 case "$satisfied_this_prereq,$negative_prereq" in
759 t,|,t)
12a29b1a
TR
760 ok_prereq=$(($ok_prereq + 1))
761 ;;
762 *)
bdccd3c1
JK
763 # Keep a list of missing prerequisites; restore
764 # the negative marker if necessary.
765 prerequisite=${negative_prereq:+!}$prerequisite
5024ade1
FS
766
767 # Abort if this prereq was marked as required
768 if test -n "$GIT_TEST_REQUIRE_PREREQ"
769 then
770 case " $GIT_TEST_REQUIRE_PREREQ " in
771 *" $prerequisite "*)
772 BAIL_OUT "required prereq $prerequisite failed"
773 ;;
774 esac
775 fi
776
12a29b1a
TR
777 if test -z "$missing_prereq"
778 then
779 missing_prereq=$prerequisite
780 else
781 missing_prereq="$prerequisite,$missing_prereq"
782 fi
783 esac
784 done
785
786 test $total_prereq = $ok_prereq
787}
788
789test_declared_prereq () {
790 case ",$test_prereq," in
791 *,$1,*)
792 return 0
793 ;;
794 esac
795 return 1
796}
797
d93d5d51
JH
798test_verify_prereq () {
799 test -z "$test_prereq" ||
800 expr >/dev/null "$test_prereq" : '[A-Z0-9_,!]*$' ||
165293af 801 BUG "'$test_prereq' does not look like a prereq"
d93d5d51
JH
802}
803
12a29b1a 804test_expect_failure () {
0f5ae593 805 test_start_ "$@"
12a29b1a
TR
806 test "$#" = 3 && { test_prereq=$1; shift; } || test_prereq=
807 test "$#" = 2 ||
165293af 808 BUG "not 2 or 3 parameters to test-expect-failure"
d93d5d51 809 test_verify_prereq
12a29b1a
TR
810 export test_prereq
811 if ! test_skip "$@"
812 then
110e9115 813 test -n "$test_skip_test_preamble" ||
ffe1afe6 814 say >&3 "checking known breakage of $TEST_NUMBER.$test_count '$1': $2"
12a29b1a
TR
815 if test_run_ "$2" expecting_failure
816 then
817 test_known_broken_ok_ "$1"
818 else
819 test_known_broken_failure_ "$1"
820 fi
821 fi
ae75342c 822 test_finish_
12a29b1a
TR
823}
824
825test_expect_success () {
0f5ae593 826 test_start_ "$@"
12a29b1a
TR
827 test "$#" = 3 && { test_prereq=$1; shift; } || test_prereq=
828 test "$#" = 2 ||
165293af 829 BUG "not 2 or 3 parameters to test-expect-success"
d93d5d51 830 test_verify_prereq
12a29b1a
TR
831 export test_prereq
832 if ! test_skip "$@"
833 then
110e9115 834 test -n "$test_skip_test_preamble" ||
ffe1afe6 835 say >&3 "expecting success of $TEST_NUMBER.$test_count '$1': $2"
12a29b1a
TR
836 if test_run_ "$2"
837 then
838 test_ok_ "$1"
839 else
840 test_failure_ "$@"
841 fi
842 fi
ae75342c 843 test_finish_
12a29b1a
TR
844}
845
12a29b1a 846# debugging-friendly alternatives to "test [-f|-d|-e]"
45a26864 847# The commands test the existence or non-existence of $1
12a29b1a 848test_path_is_file () {
45a26864 849 test "$#" -ne 1 && BUG "1 param"
9e8f8dea 850 if ! test -f "$1"
12a29b1a 851 then
45a26864 852 echo "File $1 doesn't exist"
12a29b1a
TR
853 false
854 fi
855}
856
456296b5
CG
857test_path_is_file_not_symlink () {
858 test "$#" -ne 1 && BUG "1 param"
859 test_path_is_file "$1" &&
860 if test -h "$1"
861 then
862 echo "$1 shouldn't be a symbolic link"
863 false
864 fi
865}
866
12a29b1a 867test_path_is_dir () {
e7884b35 868 test "$#" -ne 1 && BUG "1 param"
9e8f8dea 869 if ! test -d "$1"
12a29b1a 870 then
45a26864 871 echo "Directory $1 doesn't exist"
12a29b1a
TR
872 false
873 fi
874}
875
456296b5
CG
876test_path_is_dir_not_symlink () {
877 test "$#" -ne 1 && BUG "1 param"
878 test_path_is_dir "$1" &&
879 if test -h "$1"
880 then
881 echo "$1 shouldn't be a symbolic link"
882 false
883 fi
884}
885
7e9055bb 886test_path_exists () {
45a26864 887 test "$#" -ne 1 && BUG "1 param"
7e9055bb
EN
888 if ! test -e "$1"
889 then
45a26864 890 echo "Path $1 doesn't exist"
7e9055bb
EN
891 false
892 fi
893}
894
456296b5
CG
895test_path_is_symlink () {
896 test "$#" -ne 1 && BUG "1 param"
897 if ! test -h "$1"
898 then
899 echo "Symbolic link $1 doesn't exist"
900 false
901 fi
902}
903
0be7d9b7
JL
904# Check if the directory exists and is empty as expected, barf otherwise.
905test_dir_is_empty () {
e7884b35 906 test "$#" -ne 1 && BUG "1 param"
0be7d9b7 907 test_path_is_dir "$1" &&
81580fa0 908 if test -n "$(ls -a1 "$1" | grep -E -v '^\.\.?$')"
0be7d9b7
JL
909 then
910 echo "Directory '$1' is not empty, it contains:"
911 ls -la "$1"
912 return 1
913 fi
914}
915
21d5ad91
RA
916# Check if the file exists and has a size greater than zero
917test_file_not_empty () {
e7884b35 918 test "$#" = 2 && BUG "2 param"
21d5ad91
RA
919 if ! test -s "$1"
920 then
921 echo "'$1' is not a non-empty file."
922 false
923 fi
924}
925
12a29b1a 926test_path_is_missing () {
e7884b35 927 test "$#" -ne 1 && BUG "1 param"
9e8f8dea 928 if test -e "$1"
12a29b1a
TR
929 then
930 echo "Path exists:"
931 ls -ld "$1"
12a29b1a
TR
932 false
933 fi
934}
935
936# test_line_count checks that a file has the number of lines it
937# ought to. For example:
938#
939# test_expect_success 'produce exactly one line of output' '
940# do something >output &&
941# test_line_count = 1 output
942# '
943#
944# is like "test $(wc -l <output) = 1" except that it passes the
945# output through when the number of lines is wrong.
946
947test_line_count () {
948 if test $# != 3
949 then
165293af 950 BUG "not 3 parameters to test_line_count"
12a29b1a
TR
951 elif ! test $(wc -l <"$3") "$1" "$2"
952 then
953 echo "test_line_count: line count for $3 !$1 $2"
954 cat "$3"
955 return 1
956 fi
957}
958
cdff1bb5
ĐTCD
959# SYNOPSIS:
960# test_stdout_line_count <bin-ops> <value> <cmd> [<args>...]
961#
962# test_stdout_line_count checks that the output of a command has the number
963# of lines it ought to. For example:
964#
965# test_stdout_line_count = 3 git ls-files -u
966# test_stdout_line_count -gt 10 ls
967test_stdout_line_count () {
968 local ops val trashdir &&
969 if test "$#" -le 3
970 then
971 BUG "expect 3 or more arguments"
972 fi &&
973 ops="$1" &&
974 val="$2" &&
975 shift 2 &&
976 if ! trashdir="$(git rev-parse --git-dir)/trash"; then
977 BUG "expect to be run inside a worktree"
978 fi &&
979 mkdir -p "$trashdir" &&
980 "$@" >"$trashdir/output" &&
981 test_line_count "$ops" "$val" "$trashdir/output"
982}
983
984
53b67a80 985test_file_size () {
e7884b35 986 test "$#" -ne 1 && BUG "1 param"
53b67a80
JS
987 test-tool path-utils file-size "$1"
988}
989
bbfe5302
LS
990# Returns success if a comma separated string of keywords ($1) contains a
991# given keyword ($2).
992# Examples:
993# `list_contains "foo,bar" bar` returns 0
994# `list_contains "foo" bar` returns 1
995
996list_contains () {
997 case ",$1," in
998 *,$2,*)
999 return 0
1000 ;;
1001 esac
1002 return 1
1003}
1004
6a67c759
DL
1005# Returns success if the arguments indicate that a command should be
1006# accepted by test_must_fail(). If the command is run with env, the env
1007# and its corresponding variable settings will be stripped before we
1008# test the command being run.
1009test_must_fail_acceptable () {
1010 if test "$1" = "env"
1011 then
1012 shift
1013 while test $# -gt 0
1014 do
1015 case "$1" in
1016 *?=*)
1017 shift
1018 ;;
1019 *)
1020 break
1021 ;;
1022 esac
1023 done
1024 fi
1025
1026 case "$1" in
008217cb 1027 git|__git*|scalar|test-tool|test_terminal)
6a67c759
DL
1028 return 0
1029 ;;
1030 *)
1031 return 1
1032 ;;
1033 esac
1034}
1035
12a29b1a
TR
1036# This is not among top-level (test_expect_success | test_expect_failure)
1037# but is a prefix that can be used in the test script, like:
1038#
1039# test_expect_success 'complain and die' '
1040# do something &&
1041# do something else &&
1042# test_must_fail git checkout ../outerspace
1043# '
1044#
1045# Writing this as "! git checkout ../outerspace" is wrong, because
1046# the failure could be due to a segv. We want a controlled failure.
12e31a6b
SG
1047#
1048# Accepts the following options:
1049#
1050# ok=<signal-name>[,<...>]:
1051# Don't treat an exit caused by the given signal as error.
1052# Multiple signals can be specified as a comma separated list.
1053# Currently recognized signal names are: sigpipe, success.
1054# (Don't use 'success', use 'test_might_fail' instead.)
6a67c759
DL
1055#
1056# Do not use this to run anything but "git" and other specific testable
1057# commands (see test_must_fail_acceptable()). We are not in the
1058# business of vetting system supplied commands -- in other words, this
1059# is wrong:
1060#
1061# test_must_fail grep pattern output
1062#
1063# Instead use '!':
1064#
1065# ! grep pattern output
12a29b1a
TR
1066
1067test_must_fail () {
bbfe5302
LS
1068 case "$1" in
1069 ok=*)
1070 _test_ok=${1#ok=}
1071 shift
1072 ;;
1073 *)
1074 _test_ok=
1075 ;;
1076 esac
6a67c759
DL
1077 if ! test_must_fail_acceptable "$@"
1078 then
1079 echo >&7 "test_must_fail: only 'git' is allowed: $*"
1080 return 1
1081 fi
a5bf824f 1082 "$@" 2>&7
12a29b1a 1083 exit_code=$?
bbfe5302
LS
1084 if test $exit_code -eq 0 && ! list_contains "$_test_ok" success
1085 then
03aa3783 1086 echo >&4 "test_must_fail: command succeeded: $*"
12a29b1a 1087 return 1
2472448c 1088 elif test_match_signal 13 $exit_code && list_contains "$_test_ok" sigpipe
8bf4becf
LS
1089 then
1090 return 0
bbfe5302
LS
1091 elif test $exit_code -gt 129 && test $exit_code -le 192
1092 then
03aa3783 1093 echo >&4 "test_must_fail: died by signal $(($exit_code - 128)): $*"
12a29b1a 1094 return 1
bbfe5302
LS
1095 elif test $exit_code -eq 127
1096 then
03aa3783 1097 echo >&4 "test_must_fail: command not found: $*"
12a29b1a 1098 return 1
bbfe5302
LS
1099 elif test $exit_code -eq 126
1100 then
03aa3783 1101 echo >&4 "test_must_fail: valgrind error: $*"
eeb69131 1102 return 1
12a29b1a
TR
1103 fi
1104 return 0
a5bf824f 1105} 7>&2 2>&4
12a29b1a
TR
1106
1107# Similar to test_must_fail, but tolerates success, too. This is
1108# meant to be used in contexts like:
1109#
1110# test_expect_success 'some command works without configuration' '
1111# test_might_fail git config --unset all.configuration &&
1112# do something
1113# '
1114#
1115# Writing "git config --unset all.configuration || :" would be wrong,
1116# because we want to notice if it fails due to segv.
12e31a6b
SG
1117#
1118# Accepts the same options as test_must_fail.
12a29b1a
TR
1119
1120test_might_fail () {
a5bf824f
SG
1121 test_must_fail ok=success "$@" 2>&7
1122} 7>&2 2>&4
12a29b1a
TR
1123
1124# Similar to test_must_fail and test_might_fail, but check that a
1125# given command exited with a given exit code. Meant to be used as:
1126#
1127# test_expect_success 'Merge with d/f conflicts' '
1128# test_expect_code 1 git merge "merge msg" B master
1129# '
1130
1131test_expect_code () {
1132 want_code=$1
1133 shift
a5bf824f 1134 "$@" 2>&7
12a29b1a
TR
1135 exit_code=$?
1136 if test $exit_code = $want_code
1137 then
1138 return 0
1139 fi
1140
03aa3783 1141 echo >&4 "test_expect_code: command exited with $exit_code, we wanted $want_code $*"
12a29b1a 1142 return 1
a5bf824f 1143} 7>&2 2>&4
12a29b1a
TR
1144
1145# test_cmp is a helper function to compare actual and expected output.
1146# You can use it like:
1147#
1148# test_expect_success 'foo works' '
1149# echo expected >expected &&
1150# foo >actual &&
1151# test_cmp expected actual
1152# '
1153#
1154# This could be written as either "cmp" or "diff -u", but:
1155# - cmp's output is not nearly as easy to read as diff -u
1156# - not all diff versions understand "-u"
1157
1ab7e00e 1158test_cmp () {
e7884b35 1159 test "$#" -ne 2 && BUG "2 param"
262d5ad5 1160 eval "$GIT_TEST_CMP" '"$@"'
12a29b1a
TR
1161}
1162
a5db0b77
NTND
1163# Check that the given config key has the expected value.
1164#
1165# test_cmp_config [-C <dir>] <expected-value>
1166# [<git-config-options>...] <config-key>
1167#
1168# for example to check that the value of core.bar is foo
1169#
1170# test_cmp_config foo core.bar
1171#
1ab7e00e 1172test_cmp_config () {
a5db0b77
NTND
1173 local GD &&
1174 if test "$1" = "-C"
1175 then
1176 shift &&
1177 GD="-C $1" &&
1178 shift
1179 fi &&
1180 printf "%s\n" "$1" >expect.config &&
1181 shift &&
1182 git $GD config "$@" >actual.config &&
1183 test_cmp expect.config actual.config
1184}
1185
b93e6e36
SK
1186# test_cmp_bin - helper to compare binary files
1187
1ab7e00e 1188test_cmp_bin () {
e7884b35 1189 test "$#" -ne 2 && BUG "2 param"
262d5ad5 1190 cmp "$@"
b93e6e36
SK
1191}
1192
d162b25f
ÆAB
1193# Wrapper for grep which used to be used for
1194# GIT_TEST_GETTEXT_POISON=false. Only here as a shim for other
1195# in-flight changes. Should not be used and will be removed soon.
0f59128f 1196test_i18ngrep () {
fd29d7b9
SG
1197 eval "last_arg=\${$#}"
1198
1199 test -f "$last_arg" ||
165293af 1200 BUG "test_i18ngrep requires a file to read as the last parameter"
fd29d7b9
SG
1201
1202 if test $# -lt 2 ||
1203 { test "x!" = "x$1" && test $# -lt 3 ; }
1204 then
165293af 1205 BUG "too few parameters to test_i18ngrep"
fd29d7b9
SG
1206 fi
1207
63b1a175 1208 if test "x!" = "x$1"
0f59128f
SG
1209 then
1210 shift
63b1a175
SG
1211 ! grep "$@" && return 0
1212
03aa3783 1213 echo >&4 "error: '! grep $@' did find a match in:"
0f59128f 1214 else
63b1a175
SG
1215 grep "$@" && return 0
1216
03aa3783 1217 echo >&4 "error: 'grep $@' didn't find a match in:"
0f59128f 1218 fi
63b1a175
SG
1219
1220 if test -s "$last_arg"
1221 then
03aa3783 1222 cat >&4 "$last_arg"
63b1a175 1223 else
03aa3783 1224 echo >&4 "<File '$last_arg' is empty>"
63b1a175
SG
1225 fi
1226
1227 return 1
0f59128f
SG
1228}
1229
8ad16524
JK
1230# Call any command "$@" but be more verbose about its
1231# failure. This is handy for commands like "test" which do
1232# not output anything when they fail.
1233verbose () {
1234 "$@" && return 0
03aa3783 1235 echo >&4 "command failed: $(git rev-parse --sq-quote "$@")"
8ad16524
JK
1236 return 1
1237}
1238
ca8d148d
JH
1239# Check if the file expected to be empty is indeed empty, and barfs
1240# otherwise.
1241
1242test_must_be_empty () {
e7884b35 1243 test "$#" -ne 1 && BUG "1 param"
9eb23080
SG
1244 test_path_is_file "$1" &&
1245 if test -s "$1"
ca8d148d
JH
1246 then
1247 echo "'$1' is not empty, it contains:"
1248 cat "$1"
1249 return 1
1250 fi
1251}
1252
2c9e125b
DL
1253# Tests that its two parameters refer to the same revision, or if '!' is
1254# provided first, that its other two parameters refer to different
1255# revisions.
5d77298d 1256test_cmp_rev () {
2c9e125b
DL
1257 local op='=' wrong_result=different
1258
1259 if test $# -ge 1 && test "x$1" = 'x!'
1260 then
1261 op='!='
1262 wrong_result='the same'
1263 shift
1264 fi
30d0b6dc
SG
1265 if test $# != 2
1266 then
9e9c7dd6 1267 BUG "test_cmp_rev requires two revisions, but got $#"
30d0b6dc
SG
1268 else
1269 local r1 r2
1270 r1=$(git rev-parse --verify "$1") &&
2c9e125b
DL
1271 r2=$(git rev-parse --verify "$2") || return 1
1272
1273 if ! test "$r1" "$op" "$r2"
30d0b6dc
SG
1274 then
1275 cat >&4 <<-EOF
2c9e125b 1276 error: two revisions point to $wrong_result objects:
30d0b6dc
SG
1277 '$1': $r1
1278 '$2': $r2
1279 EOF
1280 return 1
1281 fi
1282 fi
5d77298d
MZ
1283}
1284
ed33bd8f
JS
1285# Compare paths respecting core.ignoreCase
1286test_cmp_fspath () {
1287 if test "x$1" = "x$2"
1288 then
1289 return 0
1290 fi
1291
1292 if test true != "$(git config --get --type=bool core.ignorecase)"
1293 then
1294 return 1
1295 fi
1296
1297 test "x$(echo "$1" | tr A-Z a-z)" = "x$(echo "$2" | tr A-Z a-z)"
1298}
1299
55672a39
JH
1300# Print a sequence of integers in increasing order, either with
1301# two arguments (start and end):
d17cf5f3 1302#
55672a39
JH
1303# test_seq 1 5 -- outputs 1 2 3 4 5 one line at a time
1304#
1305# or with one argument (end), in which case it starts counting
1306# from 1.
d17cf5f3
MK
1307
1308test_seq () {
1309 case $# in
1310 1) set 1 "$@" ;;
1311 2) ;;
165293af 1312 *) BUG "not 1 or 2 parameters to test_seq" ;;
d17cf5f3 1313 esac
4df43135
JH
1314 test_seq_counter__=$1
1315 while test "$test_seq_counter__" -le "$2"
1316 do
1317 echo "$test_seq_counter__"
1318 test_seq_counter__=$(( $test_seq_counter__ + 1 ))
1319 done
d17cf5f3
MK
1320}
1321
12a29b1a
TR
1322# This function can be used to schedule some commands to be run
1323# unconditionally at the end of the test to restore sanity:
1324#
1325# test_expect_success 'test core.capslock' '
1326# git config core.capslock true &&
1327# test_when_finished "git config --unset core.capslock" &&
1328# hello world
1329# '
1330#
1331# That would be roughly equivalent to
1332#
1333# test_expect_success 'test core.capslock' '
1334# git config core.capslock true &&
1335# hello world
1336# git config --unset core.capslock
1337# '
1338#
1339# except that the greeting and config --unset must both succeed for
1340# the test to pass.
1341#
1342# Note that under --immediate mode, no clean-up is done to help diagnose
1343# what went wrong.
1344
1345test_when_finished () {
0968f12a
JK
1346 # We cannot detect when we are in a subshell in general, but by
1347 # doing so on Bash is better than nothing (the test will
1348 # silently pass on other shells).
1349 test "${BASH_SUBSHELL-0}" = 0 ||
165293af 1350 BUG "test_when_finished does nothing in a subshell"
12a29b1a
TR
1351 test_cleanup="{ $*
1352 } && (exit \"\$eval_ret\"); eval_ret=\$?; $test_cleanup"
1353}
1354
900721e1
JS
1355# This function can be used to schedule some commands to be run
1356# unconditionally at the end of the test script, e.g. to stop a daemon:
1357#
1358# test_expect_success 'test git daemon' '
1359# git daemon &
1360# daemon_pid=$! &&
1361# test_atexit 'kill $daemon_pid' &&
1362# hello world
1363# '
1364#
1365# The commands will be executed before the trash directory is removed,
1366# i.e. the atexit commands will still be able to access any pidfiles or
1367# socket files.
1368#
1369# Note that these commands will be run even when a test script run
1370# with '--immediate' fails. Be careful with your atexit commands to
1371# minimize any changes to the failed state.
1372
1373test_atexit () {
1374 # We cannot detect when we are in a subshell in general, but by
1375 # doing so on Bash is better than nothing (the test will
1376 # silently pass on other shells).
1377 test "${BASH_SUBSHELL-0}" = 0 ||
9e9c7dd6 1378 BUG "test_atexit does nothing in a subshell"
900721e1
JS
1379 test_atexit_cleanup="{ $*
1380 } && (exit \"\$eval_ret\"); eval_ret=\$?; $test_atexit_cleanup"
1381}
1382
f0d4d398 1383# Deprecated wrapper for "git init", use "git init" directly instead
12a29b1a
TR
1384# Usage: test_create_repo <directory>
1385test_create_repo () {
f0d4d398 1386 git init "$@"
12a29b1a 1387}
9ce415d9
JS
1388
1389# This function helps on symlink challenged file systems when it is not
1390# important that the file system entry is a symbolic link.
1391# Use test_ln_s_add instead of "ln -s x y && git add y" to add a
1392# symbolic link entry y to the index.
1393
1394test_ln_s_add () {
1395 if test_have_prereq SYMLINKS
1396 then
1397 ln -s "$1" "$2" &&
1398 git update-index --add "$2"
1399 else
1400 printf '%s' "$1" >"$2" &&
1401 ln_s_obj=$(git hash-object -w "$2") &&
817d03e1
JS
1402 git update-index --add --cacheinfo 120000 $ln_s_obj "$2" &&
1403 # pick up stat info from the file
1404 git update-index "$2"
9ce415d9
JS
1405 fi
1406}
4d715ac0 1407
ac9afcc3
MT
1408# This function writes out its parameters, one per line
1409test_write_lines () {
1410 printf "%s\n" "$@"
1411}
1412
a0e0ec9f 1413perl () {
a5bf824f
SG
1414 command "$PERL_PATH" "$@" 2>&7
1415} 7>&2 2>&4
a3a9cff0 1416
43a2afee
SG
1417# Given the name of an environment variable with a bool value, normalize
1418# its value to a 0 (true) or 1 (false or empty string) return code.
1419#
1420# test_bool_env GIT_TEST_HTTPD <default-value>
1421#
1422# Return with code corresponding to the given default value if the variable
1423# is unset.
1424# Abort the test script if either the value of the variable or the default
1425# are not valid bool values.
1426
1427test_bool_env () {
1428 if test $# != 2
1429 then
1430 BUG "test_bool_env requires two parameters (variable name and default value)"
1431 fi
1432
4a1baacd 1433 test-tool env-helper --type=bool --default="$2" --exit-code "$1"
43a2afee
SG
1434 ret=$?
1435 case $ret in
1436 0|1) # unset or valid bool value
1437 ;;
1438 *) # invalid bool value or something unexpected
1439 error >&7 "test_bool_env requires bool values both for \$$1 and for the default fallback"
1440 ;;
1441 esac
1442 return $ret
1443}
1444
83d842dc 1445# Exit the test suite, either by skipping all remaining tests or by
3b072c57
ÆAB
1446# exiting with an error. If our prerequisite variable $1 falls back
1447# on a default assume we were opportunistically trying to set up some
1448# tests and we skip. If it is explicitly "true", then we report a failure.
83d842dc
JK
1449#
1450# The error/skip message should be given by $2.
1451#
1452test_skip_or_die () {
43a2afee 1453 if ! test_bool_env "$1" false
3b072c57 1454 then
83d842dc
JK
1455 skip_all=$2
1456 test_done
3b072c57
ÆAB
1457 fi
1458 error "$2"
83d842dc
JK
1459}
1460
d2554c72
JK
1461# Like "env FOO=BAR some-program", but run inside a subshell, which means
1462# it also works for shell functions (though those functions cannot impact
1463# the environment outside of the test_env invocation).
1464test_env () {
1465 (
1466 while test $# -gt 0
1467 do
1468 case "$1" in
1469 *=*)
1470 eval "${1%%=*}=\${1#*=}"
1471 eval "export ${1%%=*}"
1472 shift
1473 ;;
1474 *)
a5bf824f 1475 "$@" 2>&7
d2554c72
JK
1476 exit
1477 ;;
1478 esac
1479 done
1480 )
a5bf824f 1481} 7>&2 2>&4
48860819 1482
9b67c994
JK
1483# Returns true if the numeric exit code in "$2" represents the expected signal
1484# in "$1". Signals should be given numerically.
1485test_match_signal () {
1486 if test "$2" = "$((128 + $1))"
1487 then
1488 # POSIX
1489 return 0
1490 elif test "$2" = "$((256 + $1))"
1491 then
1492 # ksh
1493 return 0
1494 fi
1495 return 1
1496}
39cadeec 1497
48860819
JK
1498# Read up to "$1" bytes (or to EOF) from stdin and write them to stdout.
1499test_copy_bytes () {
1500 perl -e '
1501 my $len = $ARGV[1];
1502 while ($len > 0) {
1503 my $s;
1504 my $nread = sysread(STDIN, $s, $len);
1505 die "cannot read: $!" unless defined($nread);
f7f6dc34 1506 last unless $nread;
48860819
JK
1507 print $s;
1508 $len -= $nread;
1509 }
1510 ' - "$1"
1511}
de95302a
JK
1512
1513# run "$@" inside a non-git directory
1514nongit () {
1515 test -d non-repo ||
1516 mkdir non-repo ||
1517 return 1
1518
1519 (
1520 GIT_CEILING_DIRECTORIES=$(pwd) &&
1521 export GIT_CEILING_DIRECTORIES &&
1522 cd non-repo &&
a5bf824f 1523 "$@" 2>&7
de95302a 1524 )
a5bf824f 1525} 7>&2 2>&4
4414a150 1526
64f0109f
ÆAB
1527# These functions are historical wrappers around "test-tool pkt-line"
1528# for older tests. Use "test-tool pkt-line" itself in new tests.
1ab7e00e 1529packetize () {
88124ab2
JK
1530 if test $# -gt 0
1531 then
1532 packet="$*"
1533 printf '%04x%s' "$((4 + ${#packet}))" "$packet"
1534 else
64f0109f 1535 test-tool pkt-line pack
88124ab2 1536 fi
4414a150
JK
1537}
1538
64f0109f
ÆAB
1539packetize_raw () {
1540 test-tool pkt-line pack-raw-stdin
1541}
1542
4414a150 1543depacketize () {
64f0109f 1544 test-tool pkt-line unpack
4414a150 1545}
2c02b110 1546
5c07647d
TB
1547# Converts base-16 data into base-8. The output is given as a sequence of
1548# escaped octals, suitable for consumption by 'printf'.
1549hex2oct () {
1550 perl -ne 'printf "\\%03o", hex for /../g'
1551}
1552
2c02b110 1553# Set the hash algorithm in use to $1. Only useful when testing the testsuite.
1554test_set_hash () {
1555 test_hash_algo="$1"
1556}
1557
1558# Detect the hash algorithm in use.
1559test_detect_hash () {
02a32dbf 1560 test_hash_algo="${GIT_TEST_DEFAULT_HASH:-sha1}"
2c02b110 1561}
1562
1563# Load common hash metadata and common placeholder object IDs for use with
1564# test_oid.
1565test_oid_init () {
1566 test -n "$test_hash_algo" || test_detect_hash &&
1567 test_oid_cache <"$TEST_DIRECTORY/oid-info/hash-info" &&
1568 test_oid_cache <"$TEST_DIRECTORY/oid-info/oid"
1569}
1570
1571# Load key-value pairs from stdin suitable for use with test_oid. Blank lines
1572# and lines starting with "#" are ignored. Keys must be shell identifier
1573# characters.
1574#
1575# Examples:
1576# rawsz sha1:20
1577# rawsz sha256:32
1578test_oid_cache () {
1579 local tag rest k v &&
1580
1581 { test -n "$test_hash_algo" || test_detect_hash; } &&
1582 while read tag rest
1583 do
1584 case $tag in
1585 \#*)
1586 continue;;
1587 ?*)
1588 # non-empty
1589 ;;
1590 *)
1591 # blank line
1592 continue;;
1593 esac &&
1594
1595 k="${rest%:*}" &&
1596 v="${rest#*:}" &&
1597
1598 if ! expr "$k" : '[a-z0-9][a-z0-9]*$' >/dev/null
1599 then
165293af 1600 BUG 'bad hash algorithm'
2c02b110 1601 fi &&
1602 eval "test_oid_${k}_$tag=\"\$v\""
1603 done
1604}
1605
1606# Look up a per-hash value based on a key ($1). The value must have been loaded
1607# by test_oid_init or test_oid_cache.
1608test_oid () {
ceaa4b3a 1609 local algo="${test_hash_algo}" &&
1610
1611 case "$1" in
1612 --hash=*)
1613 algo="${1#--hash=}" &&
1614 shift;;
1615 *)
1616 ;;
1617 esac &&
1618
1619 local var="test_oid_${algo}_$1" &&
2c02b110 1620
1621 # If the variable is unset, we must be missing an entry for this
1622 # key-hash pair, so exit with an error.
1623 if eval "test -z \"\${$var+set}\""
1624 then
165293af 1625 BUG "undefined key '$1'"
2c02b110 1626 fi &&
a48a8801 1627 eval "printf '%s\n' \"\${$var}\""
2c02b110 1628}
fa840581 1629
56d88924 1630# Insert a slash into an object ID so it can be used to reference a location
1631# under ".git/objects". For example, "deadbeef..." becomes "de/adbeef..".
1632test_oid_to_path () {
1c1f6e03
JN
1633 local basename=${1#??}
1634 echo "${1%$basename}/$basename"
56d88924 1635}
1636
fb2d0db5
NS
1637# Parse oids from git ls-files --staged output
1638test_parse_ls_files_stage_oids () {
1639 awk '{print $2}' -
1640}
1641
1642# Parse oids from git ls-tree output
1643test_parse_ls_tree_oids () {
1644 awk '{print $3}' -
1645}
1646
fa840581
SG
1647# Choose a port number based on the test script's number and store it in
1648# the given variable name, unless that variable already contains a number.
1649test_set_port () {
1650 local var=$1 port
1651
1652 if test $# -ne 1 || test -z "$var"
1653 then
1654 BUG "test_set_port requires a variable name"
1655 fi
1656
1657 eval port=\$$var
1658 case "$port" in
1659 "")
1660 # No port is set in the given env var, use the test
1661 # number as port number instead.
1662 # Remove not only the leading 't', but all leading zeros
1663 # as well, so the arithmetic below won't (mis)interpret
1664 # a test number like '0123' as an octal value.
1665 port=${this_test#${this_test%%[1-9]*}}
1666 if test "${port:-0}" -lt 1024
1667 then
1668 # root-only port, use a larger one instead.
1669 port=$(($port + 10000))
1670 fi
fa840581 1671 ;;
7d661e5e 1672 *[!0-9]*|0*)
fa840581
SG
1673 error >&7 "invalid port number: $port"
1674 ;;
1675 *)
1676 # The user has specified the port.
1677 ;;
1678 esac
fb7d1e3a
SG
1679
1680 # Make sure that parallel '--stress' test jobs get different
1681 # ports.
1682 port=$(($port + ${GIT_TEST_STRESS_JOB_NR:-0}))
1683 eval $var=$port
fa840581 1684}
ea047a8e 1685
176a66a7
JS
1686# Tests for the hidden file attribute on Windows
1687test_path_is_hidden () {
1688 test_have_prereq MINGW ||
1689 BUG "test_path_is_hidden can only be used on Windows"
1690
7c2dfca7 1691 # Use the output of `attrib`, ignore the absolute path
9814d0a4 1692 case "$("$SYSTEMROOT"/system32/attrib "$1")" in *H*?:*) return 0;; esac
7c2dfca7
JS
1693 return 1
1694}
2057d750 1695
8f788eb8
ÆAB
1696# Poor man's URI escaping. Good enough for the test suite whose trash
1697# directory has a space in it. See 93c3fcbe4d4 (git-svn: attempt to
1698# mimic SVN 1.7 URL canonicalization, 2012-07-28) for prior art.
1699test_uri_escape() {
1700 sed 's/ /%20/g'
1701}
1702
2057d750
DS
1703# Check that the given command was invoked as part of the
1704# trace2-format trace on stdin.
1705#
1706# test_subcommand [!] <command> <args>... < <trace>
1707#
1708# For example, to look for an invocation of "git upload-pack
1709# /path/to/repo"
1710#
1711# GIT_TRACE2_EVENT=event.log git fetch ... &&
1712# test_subcommand git upload-pack "$PATH" <event.log
1713#
1714# If the first parameter passed is !, this instead checks that
1715# the given command was not called.
1716#
1717test_subcommand () {
1718 local negate=
1719 if test "$1" = "!"
1720 then
1721 negate=t
1722 shift
1723 fi
1724
1725 local expr=$(printf '"%s",' "$@")
1726 expr="${expr%,}"
1727
1728 if test -n "$negate"
1729 then
1730 ! grep "\[$expr\]"
1731 else
1732 grep "\[$expr\]"
1733 fi
1734}
3b144363
DS
1735
1736# Check that the given command was invoked as part of the
1737# trace2-format trace on stdin.
1738#
1739# test_region [!] <category> <label> git <command> <args>...
1740#
1741# For example, to look for trace2_region_enter("index", "do_read_index", repo)
1742# in an invocation of "git checkout HEAD~1", run
1743#
1744# GIT_TRACE2_EVENT="$(pwd)/trace.txt" GIT_TRACE2_EVENT_NESTING=10 \
1745# git checkout HEAD~1 &&
1746# test_region index do_read_index <trace.txt
1747#
1748# If the first parameter passed is !, this instead checks that
1749# the given region was not entered.
1750#
1751test_region () {
1752 local expect_exit=0
1753 if test "$1" = "!"
1754 then
1755 expect_exit=1
1756 shift
1757 fi
1758
1759 grep -e '"region_enter".*"category":"'"$1"'","label":"'"$2"\" "$3"
1760 exitcode=$?
1761
1762 if test $exitcode != $expect_exit
1763 then
1764 return 1
1765 fi
1766
1767 grep -e '"region_leave".*"category":"'"$1"'","label":"'"$2"\" "$3"
1768 exitcode=$?
1769
1770 if test $exitcode != $expect_exit
1771 then
1772 return 1
1773 fi
1774
1775 return 0
1776}
7c0afdf2 1777
7bc73e7b
DS
1778# Given a GIT_TRACE2_EVENT log over stdin, writes to stdout a list of URLs
1779# sent to git-remote-https child processes.
1780test_remote_https_urls() {
1781 grep -e '"event":"child_start".*"argv":\["git-remote-https",".*"\]' |
1782 sed -e 's/{"event":"child_start".*"argv":\["git-remote-https","//g' \
1783 -e 's/"\]}//g'
1784}
1785
7c0afdf2
JK
1786# Print the destination of symlink(s) provided as arguments. Basically
1787# the same as the readlink command, but it's not available everywhere.
1788test_readlink () {
1789 perl -le 'print readlink($_) for @ARGV' "$@"
1790}
ab6245bd
MS
1791
1792# Set mtime to a fixed "magic" timestamp in mid February 2009, before we
1793# run an operation that may or may not touch the file. If the file was
1794# touched, its timestamp will not accidentally have such an old timestamp,
1795# as long as your filesystem clock is reasonably correct. To verify the
1796# timestamp, follow up with test_is_magic_mtime.
1797#
1798# An optional increment to the magic timestamp may be specified as second
1799# argument.
1800test_set_magic_mtime () {
1801 local inc=${2:-0} &&
1802 local mtime=$((1234567890 + $inc)) &&
1803 test-tool chmtime =$mtime "$1" &&
1804 test_is_magic_mtime "$1" $inc
1805}
1806
1807# Test whether the given file has the "magic" mtime set. This is meant to
1808# be used in combination with test_set_magic_mtime.
1809#
1810# An optional increment to the magic timestamp may be specified as second
1811# argument. Usually, this should be the same increment which was used for
1812# the associated test_set_magic_mtime.
1813test_is_magic_mtime () {
1814 local inc=${2:-0} &&
1815 local mtime=$((1234567890 + $inc)) &&
1816 echo $mtime >.git/test-mtime-expect &&
1817 test-tool chmtime --get "$1" >.git/test-mtime-actual &&
1818 test_cmp .git/test-mtime-expect .git/test-mtime-actual
1819 local ret=$?
1820 rm -f .git/test-mtime-expect
1821 rm -f .git/test-mtime-actual
1822 return $ret
1823}
d796cedb
ÆAB
1824
1825# Given two filenames, parse both using 'git config --list --file'
1826# and compare the sorted output of those commands. Useful when
1827# wanting to ignore whitespace differences and sorting concerns.
1828test_cmp_config_output () {
1829 git config --list --file="$1" >config-expect &&
1830 git config --list --file="$2" >config-actual &&
1831 sort config-expect >sorted-expect &&
1832 sort config-actual >sorted-actual &&
1833 test_cmp sorted-expect sorted-actual
1834}
da9acde1
DS
1835
1836# Given a filename, extract its trailing hash as a hex string
1837test_trailing_hash () {
1838 local file="$1" &&
1839 tail -c $(test_oid rawsz) "$file" |
1840 test-tool hexdump |
1841 sed "s/ //g"
1842}