usleep tests: Avoid failure due to known Cygwin 3.5.3 bug.
[gnulib.git] / tests / test-vc-list-files-cvs.sh
blob64b54c0ebc1402b1b63d2e394144301b80e86922
1 #!/bin/sh
2 # Unit tests for vc-list-files
3 # Copyright (C) 2008-2024 Free Software Foundation, Inc.
4 # This file is part of the GNUlib Library.
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 3 of the License, or
9 # (at your option) any later version.
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.
16 # You should have received a copy of the GNU General Public License
17 # along with this program. If not, see <https://www.gnu.org/licenses/>. */
19 : "${srcdir=.}"
20 . "$srcdir/init.sh"; path_prepend_ .
22 tmpdir=vc-cvs
23 repo=`pwd`/$tmpdir/repo
25 fail=0
26 for i in with-cvsu without; do
27 # On the first iteration, test using cvsu, if it's in your path.
28 # On the second iteration, ensure that cvsu fails, so we'll
29 # exercise the awk-using code.
30 if test $i = without; then
31 printf '%s\n' '#!/bin/sh' 'exit 1' > cvsu
32 chmod a+x cvsu
33 PATH=`pwd`:$PATH
34 export PATH
36 ok=0
37 mkdir $tmpdir && cd $tmpdir &&
38 # without cvs, skip the test
39 { ( cvs -Q -d "$repo" init ) > /dev/null 2>&1 \
40 || skip_ "cvs not found in PATH"; } &&
41 mkdir w && cd w &&
42 mkdir d &&
43 touch d/a b c &&
44 cvs -Q -d "$repo" import -m imp m M M0 &&
45 cvs -Q -d "$repo" co m && cd m &&
46 printf '%s\n' b c d/a > expected &&
47 $BOURNE_SHELL "$abs_aux_dir/vc-list-files" | sort > actual &&
48 compare expected actual &&
49 ok=1
50 test $ok = 0 && fail=1
51 done
53 Exit $fail