1# Performance testing framework. Each perf script starts much like 2# a normal test script, except it sources this library instead of 3# test-lib.sh. See t/perf/README for documentation. 4# 5# Copyright (c) 2011 Thomas Rast 6# 7# This program is free software: you can redistribute it and/or modify 8# it under the terms of the GNU General Public License as published by 9# the Free Software Foundation, either version 2 of the License, or 10# (at your option) any later version. 11# 12# This program is distributed in the hope that it will be useful, 13# but WITHOUT ANY WARRANTY; without even the implied warranty of 14# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15# GNU General Public License for more details. 16# 17# You should have received a copy of the GNU General Public License 18# along with this program. If not, see http://www.gnu.org/licenses/ . 19 20# do the --tee work early; it otherwise confuses our careful 21# GIT_BUILD_DIR mangling 22case"$GIT_TEST_TEE_STARTED, $* "in 23done,*) 24# do not redirect again 25;; 26*' --tee '*|*' --va'*) 27mkdir-p test-results 28 BASE=test-results/$(basename "$0" .sh) 29(GIT_TEST_TEE_STARTED=done${SHELL-sh}"$0""$@"2>&1; 30echo $? >$BASE.exit) |tee$BASE.out 31test"$(cat $BASE.exit)"=0 32exit 33;; 34esac 35 36TEST_DIRECTORY=$(pwd)/.. 37TEST_OUTPUT_DIRECTORY=$(pwd) 38iftest -z"$GIT_TEST_INSTALLED";then 39 perf_results_prefix= 40else 41 perf_results_prefix=$(printf "%s" "${GIT_TEST_INSTALLED%/bin-wrappers}" | tr -c "[a-zA-Z0-9]" "[_*]")"." 42# make the tested dir absolute 43 GIT_TEST_INSTALLED=$(cd "$GIT_TEST_INSTALLED" && pwd) 44fi 45 46TEST_NO_CREATE_REPO=t 47TEST_NO_MALLOC_CHECK=t 48 49. ../test-lib.sh 50 51# Variables from test-lib that are normally internal to the tests; we 52# need to export them for test_perf subshells 53export TEST_DIRECTORY TRASH_DIRECTORY GIT_BUILD_DIR GIT_TEST_CMP 54 55MODERN_GIT=$GIT_BUILD_DIR/bin-wrappers/git 56export MODERN_GIT 57 58perf_results_dir=$TEST_OUTPUT_DIRECTORY/test-results 59mkdir-p"$perf_results_dir" 60rm-f"$perf_results_dir"/$(basename "$0" .sh).subtests 61 62iftest -z"$GIT_PERF_REPEAT_COUNT";then 63 GIT_PERF_REPEAT_COUNT=3 64fi 65die_if_build_dir_not_repo () { 66if! (cd"$TEST_DIRECTORY/.."&& 67 git rev-parse --build-dir>/dev/null 2>&1);then 68 error "No$1defined, and your build directory is not a repo" 69fi 70} 71 72iftest -z"$GIT_PERF_REPO";then 73 die_if_build_dir_not_repo '$GIT_PERF_REPO' 74 GIT_PERF_REPO=$TEST_DIRECTORY/.. 75fi 76iftest -z"$GIT_PERF_LARGE_REPO";then 77 die_if_build_dir_not_repo '$GIT_PERF_LARGE_REPO' 78 GIT_PERF_LARGE_REPO=$TEST_DIRECTORY/.. 79fi 80 81test_perf_do_repo_symlink_config_ () { 82 test_have_prereq SYMLINKS || git config core.symlinks false 83} 84 85test_perf_create_repo_from () { 86test"$#"=2|| 87 error "bug in the test script: not 2 parameters to test-create-repo" 88 repo="$1" 89source="$2" 90 source_git="$("$MODERN_GIT" -C "$source" rev-parse --git-dir)" 91 objects_dir="$("$MODERN_GIT" -C "$source" rev-parse --git-path objects)" 92mkdir-p"$repo/.git" 93( 94cd"$source"&& 95{cp-Rl"$objects_dir""$repo/.git/"2>/dev/null || 96cp-R"$objects_dir""$repo/.git/"; } && 97for stuff in"$source_git"/*;do 98case"$stuff"in 99*/objects|*/hooks|*/config|*/commondir) 100;; 101*) 102cp-R"$stuff""$repo/.git/"||exit1 103;; 104esac 105done 106) && 107( 108cd"$repo"&& 109"$MODERN_GIT" init -q&& 110 test_perf_do_repo_symlink_config_ && 111mv .git/hooks .git/hooks-disabled2>/dev/null && 112iftest -f .git/index.lock 113then 114# We may be copying a repo that can't run "git 115# status" due to a locked index. Since we have 116# a copy it's fine to remove the lock. 117rm .git/index.lock 118fi 119) || error "failed to copy repository '$source' to '$repo'" 120} 121 122# call at least one of these to establish an appropriately-sized repository 123test_perf_fresh_repo () { 124 repo="${1:-$TRASH_DIRECTORY}" 125"$MODERN_GIT" init -q"$repo"&& 126( 127cd"$repo"&& 128 test_perf_do_repo_symlink_config_ 129) 130} 131 132test_perf_default_repo () { 133 test_perf_create_repo_from "${1:-$TRASH_DIRECTORY}""$GIT_PERF_REPO" 134} 135test_perf_large_repo () { 136iftest"$GIT_PERF_LARGE_REPO"="$GIT_BUILD_DIR";then 137echo"warning: \$GIT_PERF_LARGE_REPOis \$GIT_BUILD_DIR.">&2 138echo"warning: This will work, but may not be a sufficiently large repo">&2 139echo"warning: for representative measurements.">&2 140fi 141 test_perf_create_repo_from "${1:-$TRASH_DIRECTORY}""$GIT_PERF_LARGE_REPO" 142} 143test_checkout_worktree () { 144 git checkout-index -u -a|| 145 error "git checkout-index failed" 146} 147 148# Performance tests should never fail. If they do, stop immediately 149immediate=t 150 151# Perf tests require GNU time 152case"$(uname -s)"in Darwin) GTIME="${GTIME:-gtime}";;esac 153GTIME="${GTIME:-/usr/bin/time}" 154 155test_run_perf_ () { 156 test_cleanup=: 157 test_export_="test_cleanup" 158export test_cleanup test_export_ 159"$GTIME"-f"%E %U %S"-o test_time.$i"$SHELL"-c' 160. '"$TEST_DIRECTORY"/test-lib-functions.sh' 161test_export () { 162 [$#!= 0 ] || return 0 163 test_export_="$test_export_\\|$1" 164 shift 165 test_export "$@" 166} 167'"$1"' 168ret=$? 169set | sed -n "s'"/'/'\\\\''/g"';s/^\\($test_export_\\)/export '"'&'"'/p" >test_vars 170exit$ret'>&3 2>&4 171 eval_ret=$? 172 173iftest$eval_ret=0||test -n"$expecting_failure" 174then 175 test_eval_ "$test_cleanup" 176 . ./test_vars || error "failed to load updated environment" 177fi 178iftest"$verbose"="t"&&test -n"$HARNESS_ACTIVE";then 179echo"" 180fi 181return"$eval_ret" 182} 183 184 185test_perf () { 186 test_start_ 187test"$#"=3&& { test_prereq=$1;shift; } || test_prereq= 188test"$#"=2|| 189 error "bug in the test script: not 2 or 3 parameters to test-expect-success" 190export test_prereq 191if! test_skip "$@" 192then 193 base=$(basename "$0" .sh) 194echo"$test_count">>"$perf_results_dir"/$base.subtests 195echo"$1">"$perf_results_dir"/$base.$test_count.descr 196iftest -z"$verbose";then 197printf"%s""perf$test_count-$1:" 198else 199echo"perf$test_count-$1:" 200fi 201for i in$(test_seq 1 $GIT_PERF_REPEAT_COUNT);do 202 say >&3"running:$2" 203if test_run_perf_ "$2" 204then 205iftest -z"$verbose";then 206printf" %s""$i" 207else 208echo"* timing run$i/$GIT_PERF_REPEAT_COUNT:" 209fi 210else 211test -z"$verbose"&&echo 212 test_failure_ "$@" 213break 214fi 215done 216iftest -z"$verbose";then 217echo" ok" 218else 219 test_ok_ "$1" 220fi 221 base="$perf_results_dir"/"$perf_results_prefix$(basename "$0" .sh)"."$test_count" 222"$TEST_DIRECTORY"/perf/min_time.perl test_time.* >"$base".times 223fi 224 test_finish_ 225} 226 227# We extend test_done to print timings at the end (./run disables this 228# and does it after running everything) 229test_at_end_hook_ () { 230iftest -z"$GIT_PERF_AGGREGATING_LATER";then 231(cd"$TEST_DIRECTORY"/perf && ./aggregate.perl $(basename "$0")) 232fi 233} 234 235test_export () { 236export"$@" 237}