tests.bak/redir5.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 ksh93-like dup-and-close redirection operators
  15 exec 9<$0
  16
  17 f()
  18 {
  19 exec 5<$0
  20
  21 exec 0<&5-
  22
  23 while read line; do
  24         echo "$line"
  25 done
  26 }
  27
  28 f
  29
  30 typeset -f f
  31
  32 # make sure it was closed
  33 read -u 5 foo 2>&1 | grep -q 'invalid file descriptor'
  34 echo after read
  35
  36 exec 5<&0
  37
  38 exec <&-
  39
  40 read abcde 2>&1 | grep -q 'read error'
  41
  42 exec 0<&9-
  43 read line
  44 echo $line