tests.bak/glob6.sub

   1 #   This program is free software: you can redistribute it and/or modify
   2 #   it under the terms of the GNU General Public License as published by
   3 #   the Free Software Foundation, either version 3 of the License, or
   4 #   (at your option) any later version.
   5 #
   6 #   This program is distributed in the hope that it will be useful,
   7 #   but WITHOUT ANY WARRANTY; without even the implied warranty of
   8 #   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   9 #   GNU General Public License for more details.
  10 #
  11 #   You should have received a copy of the GNU General Public License
  12 #   along with this program.  If not, see <http://www.gnu.org/licenses/>.
  13 #
  14 # tests of the backslash-in-glob-patterns discussion on the austin-group ML
  15
  16 : ${TMPDIR:=/var/tmp}
  17
  18 ORIG=$PWD
  19 GLOBDIR=$TMPDIR/bush-glob-$$
  20 mkdir $GLOBDIR || { echo "glob6.sub: cannot make directory $GLOBDIR" >&2 ; exit 1; }
  21 builtin cd $GLOBDIR || { echo "glob6.sub: cannot change directory to $GLOBDIR" >&2 ; exit 1; }
  22
  23 # does the pattern matcher allow backslashes as escape characters and remove
  24 # them as part of matching?
  25 touch abcdefg
  26 pat='ab\cd*'
  27 printf '<%s>\n' $pat
  28 pat='\.'
  29 printf '<%s>\n' $pat
  30 rm abcdefg
  31
  32 # how about when escaping pattern characters?
  33 touch '*abc.c'
  34 a='\**.c'
  35 printf '%s\n' $a
  36 rm -f '*abc.c'
  37
  38 # how about when making the distinction between readable and searchable path
  39 # components?
  40 mkdir -m a=x searchable
  41 mkdir -m a=r readable
  42
  43 p='searchable/\.'
  44 printf "%s\n" $p
  45
  46 p='searchable/\./.'
  47 printf "%s\n" $p
  48
  49 p='readable/\.'
  50 printf "%s\n" $p
  51
  52 p='readable/\./.'
  53 printf "%s\n" $p
  54
  55 printf "%s\n" 'searchable/\.'
  56 printf "%s\n" 'readable/\.'
  57
  58 echo */.
  59
  60 p='*/\.'
  61 echo $p
  62
  63 echo */'.'
  64
  65 rmdir searchable readable
  66
  67 cd $ORIG
  68 rmdir $GLOBDIR