gl/tests/test-vc-list-files-cvs.sh

   1 #!/bin/sh
   2 # Unit tests for vc-list-files
   3 # Copyright (C) 2008-2012 Free Software Foundation, Inc.
   4 # This file is part of the GNUlib Library.
   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 3 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 : ${srcdir=.}
  20 . "$srcdir/init.sh"; path_prepend_ "$abs_aux_dir" .
  21
  22 tmpdir=vc-cvs
  23 repo=`pwd`/$tmpdir/repo
  24
  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
  35   fi
  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     vc-list-files | sort > actual &&
  48     compare expected actual &&
  49     ok=1
  50   test $ok = 0 && fail=1
  51 done
  52
  53 Exit $fail