Sixth batch
[git/git.git] / t / lib-git-daemon.sh
1 # Shell library to run git-daemon in tests. Ends the test early if
2 # GIT_TEST_GIT_DAEMON is not set.
3 #
4 # Usage:
5 #
6 # . ./test-lib.sh
7 # . "$TEST_DIRECTORY"/lib-git-daemon.sh
8 # start_git_daemon
9 #
10 # test_expect_success '...' '
11 # ...
12 # '
13 #
14 # test_expect_success ...
15 #
16 # test_done
17
18 if ! git env--helper --type=bool --default=true --exit-code GIT_TEST_GIT_DAEMON
19 then
20 skip_all="git-daemon testing disabled (unset GIT_TEST_GIT_DAEMON to enable)"
21 test_done
22 fi
23
24 if test_have_prereq !PIPE
25 then
26 test_skip_or_die GIT_TEST_GIT_DAEMON "file system does not support FIFOs"
27 fi
28
29 test_set_port LIB_GIT_DAEMON_PORT
30
31 GIT_DAEMON_PID=
32 GIT_DAEMON_PIDFILE="$PWD"/daemon.pid
33 GIT_DAEMON_DOCUMENT_ROOT_PATH="$PWD"/repo
34 GIT_DAEMON_HOST_PORT=127.0.0.1:$LIB_GIT_DAEMON_PORT
35 GIT_DAEMON_URL=git://$GIT_DAEMON_HOST_PORT
36
37 registered_stop_git_daemon_atexit_handler=
38 start_git_daemon() {
39 if test -n "$GIT_DAEMON_PID"
40 then
41 error "start_git_daemon already called"
42 fi
43
44 mkdir -p "$GIT_DAEMON_DOCUMENT_ROOT_PATH"
45
46 # One of the test scripts stops and then re-starts 'git daemon'.
47 # Don't register and then run the same atexit handlers several times.
48 if test -z "$registered_stop_git_daemon_atexit_handler"
49 then
50 test_atexit 'stop_git_daemon'
51 registered_stop_git_daemon_atexit_handler=AlreadyDone
52 fi
53
54 say >&3 "Starting git daemon ..."
55 mkfifo git_daemon_output
56 ${LIB_GIT_DAEMON_COMMAND:-git daemon} \
57 --listen=127.0.0.1 --port="$LIB_GIT_DAEMON_PORT" \
58 --reuseaddr --verbose --pid-file="$GIT_DAEMON_PIDFILE" \
59 --base-path="$GIT_DAEMON_DOCUMENT_ROOT_PATH" \
60 "$@" "$GIT_DAEMON_DOCUMENT_ROOT_PATH" \
61 >&3 2>git_daemon_output &
62 GIT_DAEMON_PID=$!
63 {
64 read -r line <&7
65 printf "%s\n" "$line" >&4
66 cat <&7 >&4 &
67 } 7<git_daemon_output &&
68
69 # Check expected output
70 if test x"$(expr "$line" : "\[[0-9]*\] \(.*\)")" != x"Ready to rumble"
71 then
72 kill "$GIT_DAEMON_PID"
73 wait "$GIT_DAEMON_PID"
74 unset GIT_DAEMON_PID
75 test_skip_or_die GIT_TEST_GIT_DAEMON \
76 "git daemon failed to start"
77 fi
78 }
79
80 stop_git_daemon() {
81 if test -z "$GIT_DAEMON_PID"
82 then
83 return
84 fi
85
86 # kill git-daemon child of git
87 say >&3 "Stopping git daemon ..."
88 kill "$GIT_DAEMON_PID"
89 wait "$GIT_DAEMON_PID" >&3 2>&4
90 ret=$?
91 if ! test_match_signal 15 $ret
92 then
93 error "git daemon exited with status: $ret"
94 fi
95 kill "$(cat "$GIT_DAEMON_PIDFILE")" 2>/dev/null
96 GIT_DAEMON_PID=
97 rm -f git_daemon_output "$GIT_DAEMON_PIDFILE"
98 }
99
100 # A stripped-down version of a netcat client, that connects to a "host:port"
101 # given in $1, sends its stdin followed by EOF, then dumps the response (until
102 # EOF) to stdout.
103 fake_nc() {
104 if ! test_declared_prereq FAKENC
105 then
106 echo >&4 "fake_nc: need to declare FAKENC prerequisite"
107 return 127
108 fi
109 perl -Mstrict -MIO::Socket::INET -e '
110 my $s = IO::Socket::INET->new(shift)
111 or die "unable to open socket: $!";
112 print $s <STDIN>;
113 $s->shutdown(1);
114 print <$s>;
115 ' "$@"
116 }
117
118 test_lazy_prereq FAKENC '
119 perl -MIO::Socket::INET -e "exit 0"
120 '