diff options
| author | Ævar Arnfjörð Bjarmason <avarab@gmail.com> | 2021-02-09 22:41:53 +0100 |
|---|---|---|
| committer | Junio C Hamano <gitster@pobox.com> | 2021-02-10 13:54:34 -0800 |
| commit | 3fca1fc651c025724c7ea36aa9a83182c8dfdb58 (patch) | |
| tree | 3f383c96a1d27aef0f4425f723382c2de373ddcc /t/gitweb-lib.sh | |
| parent | test libs: rename bundle helper to "lib-bundle.sh" (diff) | |
| download | git-3fca1fc651c025724c7ea36aa9a83182c8dfdb58.tar.gz git-3fca1fc651c025724c7ea36aa9a83182c8dfdb58.zip | |
test libs: rename gitweb-lib.sh to lib-gitweb.sh
Rename gitweb-lib.sh to lib-gitweb.sh for consistency with other test
library files.
When it was introduced in 05526071cb5 (gitweb: split test suite into
library and tests, 2009-08-27) this naming pattern was more
common.
Since then all but one other such library which didn't start with
"lib-*.sh" such as t6000lib.sh has been been renamed, see
e.g. 9d488eb40e2 (Move t6000lib.sh to lib-*, 2010-05-07).
Signed-off-by: Ævar Arnfjörð Bjarmason <avarab@gmail.com>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
Diffstat (limited to 't/gitweb-lib.sh')
| -rw-r--r-- | t/gitweb-lib.sh | 123 |
1 files changed, 0 insertions, 123 deletions
diff --git a/t/gitweb-lib.sh b/t/gitweb-lib.sh deleted file mode 100644 index 1f32ca66ea..0000000000 --- a/t/gitweb-lib.sh +++ /dev/null @@ -1,123 +0,0 @@ -# Initialization and helpers for Gitweb tests, which source this -# shell library instead of test-lib.sh. -# -# Copyright (c) 2007 Jakub Narebski -# - -gitweb_init () { - safe_pwd="$(perl -MPOSIX=getcwd -e 'print quotemeta(getcwd)')" - cat >gitweb_config.perl <<EOF -#!/usr/bin/perl - -# gitweb configuration for tests - -our \$version = 'current'; -our \$GIT = 'git'; -our \$projectroot = "$safe_pwd"; -our \$project_maxdepth = 8; -our \$home_link_str = 'projects'; -our \$site_name = '[localhost]'; -our \$site_html_head_string = ''; -our \$site_header = ''; -our \$site_footer = ''; -our \$home_text = 'indextext.html'; -our @stylesheets = ('file:///$GIT_BUILD_DIR/gitweb/static/gitweb.css'); -our \$logo = 'file:///$GIT_BUILD_DIR/gitweb/static/git-logo.png'; -our \$favicon = 'file:///$GIT_BUILD_DIR/gitweb/static/git-favicon.png'; -our \$projects_list = ''; -our \$export_ok = ''; -our \$strict_export = ''; -our \$maxload = undef; - -EOF - - cat >.git/description <<EOF -$0 test repository -EOF - - # You can set the GITWEB_TEST_INSTALLED environment variable to - # the gitwebdir (the directory where gitweb is installed / deployed to) - # of an existing gitweb installation to test that installation, - # or simply to pathname of installed gitweb script. - if test -n "$GITWEB_TEST_INSTALLED" ; then - if test -d $GITWEB_TEST_INSTALLED; then - SCRIPT_NAME="$GITWEB_TEST_INSTALLED/gitweb.cgi" - else - SCRIPT_NAME="$GITWEB_TEST_INSTALLED" - fi - test -f "$SCRIPT_NAME" || - error "Cannot find gitweb at $GITWEB_TEST_INSTALLED." - say "# Testing $SCRIPT_NAME" - else # normal case, use source version of gitweb - SCRIPT_NAME="$GIT_BUILD_DIR/gitweb/gitweb.perl" - fi - export SCRIPT_NAME -} - -gitweb_run () { - GATEWAY_INTERFACE='CGI/1.1' - HTTP_ACCEPT='*/*' - REQUEST_METHOD='GET' - QUERY_STRING=$1 - PATH_INFO=$2 - REQUEST_URI=/gitweb.cgi$PATH_INFO - export GATEWAY_INTERFACE HTTP_ACCEPT REQUEST_METHOD \ - QUERY_STRING PATH_INFO REQUEST_URI - - GITWEB_CONFIG=$(pwd)/gitweb_config.perl - export GITWEB_CONFIG - - # some of git commands write to STDERR on error, but this is not - # written to web server logs, so we are not interested in that: - # we are interested only in properly formatted errors/warnings - rm -f gitweb.log && - perl -- "$SCRIPT_NAME" \ - >gitweb.output 2>gitweb.log && - perl -w -e ' - open O, ">gitweb.headers"; - while (<>) { - print O; - last if (/^\r$/ || /^$/); - } - open O, ">gitweb.body"; - while (<>) { - print O; - } - close O; - ' gitweb.output && - if grep '^[[]' gitweb.log >/dev/null 2>&1; then - test_debug 'cat gitweb.log >&2' && - false - else - true - fi - - # gitweb.log is left for debugging - # gitweb.output is used to parse HTTP output - # gitweb.headers contains only HTTP headers - # gitweb.body contains body of message, without headers -} - -. ./test-lib.sh - -if ! test_have_prereq PERL; then - skip_all='skipping gitweb tests, perl not available' - test_done -fi - -perl -MEncode -e '$e="";decode_utf8($e, Encode::FB_CROAK)' >/dev/null 2>&1 || { - skip_all='skipping gitweb tests, perl version is too old' - test_done -} - -perl -MCGI -MCGI::Util -MCGI::Carp -e 0 >/dev/null 2>&1 || { - skip_all='skipping gitweb tests, CGI & CGI::Util & CGI::Carp modules not available' - test_done -} - -perl -mTime::HiRes -e 0 >/dev/null 2>&1 || { - skip_all='skipping gitweb tests, Time::HiRes module not available' - test_done -} - -gitweb_init |
