git.gag.com Git - debian/gzip/blob - tests/zgrep-signal

   1 #!/bin/sh
   2 # Check that zgrep is terminated gracefully by signal when
   3 # its grep/sed pipeline is terminated by a signal.
   4
   5 # Copyright (C) 2010-2013 Free Software Foundation, Inc.
   6
   7 # This program is free software: you can redistribute it and/or modify
   8 # it under the terms of the GNU General Public License as published by
   9 # the Free Software Foundation, either version 3 of the License, or
  10 # (at your option) any later version.
  11
  12 # This program is distributed in the hope that it will be useful,
  13 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 # GNU General Public License for more details.
  16
  17 # You should have received a copy of the GNU General Public License
  18 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
  19 # limit so don't run it by default.
  20
  21 . "${srcdir=.}/init.sh"; path_prepend_ ..
  22
  23 echo a | gzip -c > f.gz || framework_failure_
  24
  25 test "x$PERL" = x && PERL=perl
  26 ("$PERL" -e 'use warnings') >/dev/null 2>&1 || skip_ "no suitable perl found"
  27
  28 exec_with_SIGPIPE_SIG_DFL () {
  29   program=${1?}
  30   shift
  31   args=
  32   for arg; do
  33     args="$args, '$arg'"
  34   done
  35   "$PERL" -e "\$SIG{PIPE} = 'DEFAULT'; exec '$program'$args"
  36 }
  37
  38 write_to_dangling_pipe () {
  39   exec 3>&1
  40   (
  41     exec_with_SIGPIPE_SIG_DFL "$@"
  42     echo $? >&3
  43   ) | : || framework_failure_
  44 }
  45
  46 signal_status=$(write_to_dangling_pipe cat f.gz f.gz)
  47 test 128 -lt $signal_status ||
  48   framework_failure_ 'signal handling busted on this host'
  49
  50 fail=0
  51
  52 st=$(write_to_dangling_pipe zgrep a f.gz f.gz)
  53
  54 test $st = $signal_status || fail=1
  55
  56 Exit $fail