Dogcows Code - chaz/tar/blob - tests/testsuite.at

   1 # Process this file with autom4te to create testsuite. -*- Autotest -*-
   2
   3 # Test suite for GNU tar.
   4 # Copyright (C) 2004, 2005 Free Software Foundation, Inc.
   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 2, or (at your option)
   9 # 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, write to the Free Software
  18 # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
  19 # 02111-1307, USA.
  20
  21 # We need a recent Autotest.
  22 m4_version_prereq([2.52g])
  23
  24 m4_define([AT_TAR_CHECK],[
  25   m4_foreach([FMT],
  26              [m4_if([$7],[],[v7,oldgnu,ustar,posix,gnu],[$7])],
  27              [AT_CHECK([
  28 mkdir FMT
  29 (cd FMT
  30 TAR_OPTIONS="-H FMT"
  31 export TAR_OPTIONS
  32 rm -rf *
  33 $1)],$2,$3,$4,$5,$6)])
  34 ])
  35
  36 m4_define([RE_CHECK],[
  37 AT_DATA([$1.re],[$2])
  38 awk '{print NR " " $[]0}' $1.re > $[]$.1
  39 awk '{print NR " " $[]0}' $1 | join $[]$.1 - |
  40 while read NUM RE LINE
  41 do
  42   echo "$LINE" | grep -- "$RE" >/dev/null || exit 1
  43 done
  44 ])
  45
  46 m4_define([AT_SKIP_TEST],[exit 77])
  47
  48 m4_define([AT_STAR_PREREQ],[
  49 test -z "$STAR_TESTSCRIPTS" && AT_SKIP_TEST
  50 test -r "$STAR_TESTSCRIPTS/$1" || AT_SKIP_TEST
  51 ])
  52
  53 m4_define([AT_GZIP_PREREQ],[
  54 cat /dev/null | m4_if([$1],[],gzip,[$1]) - > /dev/null 2>&1 || AT_SKIP_TEST
  55 ])
  56
  57 AT_INIT
  58
  59 AT_TESTED([tar])
  60
  61 m4_include([version.at])
  62
  63 m4_include([pipe.at])
  64
  65 m4_include([options.at])
  66 m4_include([options02.at])
  67
  68 m4_include([append.at])
  69
  70 m4_include([delete01.at])
  71 m4_include([delete02.at])
  72 m4_include([delete03.at])
  73 m4_include([delete04.at])
  74 m4_include([delete05.at])
  75
  76 m4_include([extrac01.at])
  77 m4_include([extrac02.at])
  78 m4_include([extrac03.at])
  79 m4_include([extrac04.at])
  80 m4_include([extrac05.at])
  81
  82 m4_include([gzip.at])
  83
  84 m4_include([incremental.at])
  85
  86 m4_include([ignfail.at])
  87
  88 m4_include([link01.at])
  89
  90 m4_include([listed01.at])
  91 m4_include([listed02.at])
  92
  93 m4_include([longv7.at])
  94 m4_include([long01.at])
  95
  96 m4_include([multiv01.at])
  97 m4_include([multiv02.at])
  98 m4_include([multiv03.at])
  99
 100 m4_include([old.at])
 101
 102 m4_include([recurse.at])
 103
 104 m4_include([same-order01.at])
 105 m4_include([same-order02.at])
 106
 107 m4_include([sparse01.at])
 108
 109 m4_include([volume.at])
 110
 111 m4_include([comprec.at])
 112
 113 m4_include([star/gtarfail.at])
 114 m4_include([star/gtarfail2.at])
 115
 116 m4_include([star/multi-fail.at])
 117
 118 m4_include([star/ustar-big-2g.at])
 119 m4_include([star/ustar-big-8g.at])
 120
 121 m4_include([star/pax-big-10g.at])
 122