zgrep: handle a multi-digit context option like -15
[debian/gzip] / zgrep.in
1 #!/bin/sh
2
3 # zgrep -- a wrapper around a grep program that decompresses files as needed
4 # Adapted from a version sent by Charles Levert <charles@comm.polymtl.ca>
5
6 # Copyright (C) 1998, 2001, 2002, 2006, 2007, 2009, 2010 Free Software
7 # Foundation
8
9 # Copyright (C) 1993 Jean-loup Gailly
10
11 # This program is free software; you can redistribute it and/or modify
12 # it under the terms of the GNU General Public License as published by
13 # the Free Software Foundation; either version 3 of the License, or
14 # (at your option) any later version.
15
16 # This program is distributed in the hope that it will be useful,
17 # but WITHOUT ANY WARRANTY; without even the implied warranty of
18 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19 # GNU General Public License for more details.
20
21 # You should have received a copy of the GNU General Public License along
22 # with this program; if not, write to the Free Software Foundation, Inc.,
23 # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
24
25 bindir=@bindir@
26 case $1 in
27 --__bindir) bindir=${2?}; shift; shift;;
28 esac
29 PATH=$bindir:$PATH
30
31 grep='${GREP-grep}'
32
33 version='zgrep (gzip) @VERSION@
34 Copyright (C) 2010-2012 Free Software Foundation, Inc.
35 This is free software.  You may redistribute copies of it under the terms of
36 the GNU General Public License <http://www.gnu.org/licenses/gpl.html>.
37 There is NO WARRANTY, to the extent permitted by law.
38
39 Written by Jean-loup Gailly.'
40
41 usage="Usage: $0 [OPTION]... [-e] PATTERN [FILE]...
42 Look for instances of PATTERN in the input FILEs, using their
43 uncompressed contents if they are compressed.
44
45 OPTIONs are the same as for 'grep'.
46
47 Report bugs to <bug-gzip@gnu.org>."
48
49 # sed script to escape all ' for the shell, and then (to handle trailing
50 # newlines correctly) append ' to the last line.
51 escape='
52   s/'\''/'\''\\'\'''\''/g
53   $s/$/'\''/
54 '
55 operands=
56 have_pat=0
57 files_with_matches=0
58 files_without_matches=0
59 no_filename=0
60 with_filename=0
61
62 while test $# -ne 0; do
63   option=$1
64   shift
65   optarg=
66
67   case $option in
68   (-[0123456789EFGHIKLPRTUVZabchilnoqrsuvwxyz]?*)
69     if expr "X$option" : 'X-[0-9]\+$' > /dev/null; then
70       : # Let a multi-digit, digit-only option like -10 fall through.
71     else
72       arg2=-\'$(expr "X$option" : 'X-.[0-9]*\(.*\)' | sed "$escape")
73       eval "set -- $arg2 "'${1+"$@"}'
74       option=$(expr "X$option" : 'X\(-.[0-9]*\)')
75     fi;;
76   (--binary-*=* | --[lm]a*=* | --reg*=*)
77     ;;
78   (-[ABCDXdefm] | binary-* | --file | --[lm]a* | --reg*)
79     case ${1?"$option option requires an argument"} in
80     (*\'*)
81       optarg=" '"$(printf '%s\n' "$1" | sed "$escape");;
82     (*)
83       optarg=" '$1'";;
84     esac
85     shift;;
86   (-f?*\'*)
87     optarg=" '"$(expr "X$option" : 'X-f\(.*\)' | sed "$escape")
88     option=-f;;
89   (-f?*)
90     optarg=" '"$(expr "X$option" : 'X-f\(.*\)')\'
91     option=-f;;
92   (--file=*\'*)
93     optarg=" '"$(expr "X$option" : 'X--file=\(.*\)' | sed "$escape")
94     option=--file;;
95   (--file=*)
96     optarg=" '"$(expr "X$option" : 'X--file=\(.*\)')\'
97     option=--file;;
98   (--)
99     break;;
100   (-?*)
101     ;;
102   (*)
103     case $option in
104     (*\'*)
105       operands="$operands '"$(printf '%s\n' "$option" | sed "$escape");;
106     (*)
107       operands="$operands '$option'";;
108     esac
109     ${POSIXLY_CORRECT+break}
110     continue;;
111   esac
112
113   case $option in
114   (-[drRzZ] | --di* | --exc* | --inc* | --rec* | --nu*)
115     printf >&2 '%s: %s: option not supported\n' "$0" "$option"
116     exit 2;;
117   (-e* | --reg*)
118     have_pat=1;;
119   (-f | --file)
120     # The pattern is coming from a file rather than the command-line.
121     # If the file is actually stdin then we need to do a little
122     # magic, since we use stdin to pass the gzip output to grep.
123     # Turn the -f option into an -e option by copying the file's
124     # contents into OPTARG.
125     case $optarg in
126     (" '-'" | " '/dev/stdin'" | " '/dev/fd/0'")
127       option=-e
128       optarg=" '"$(sed "$escape") || exit 2;;
129     esac
130     have_pat=1;;
131   (--h | --he | --hel | --help)
132     echo "$usage" || exit 2
133     exit;;
134   (-H | --wi | --wit | --with | --with- | --with-f | --with-fi \
135   | --with-fil | --with-file | --with-filen | --with-filena | --with-filenam \
136   | --with-filename)
137     with_filename=1
138     continue;;
139   (-l | --files-with-*)
140     files_with_matches=1;;
141   (-L | --files-witho*)
142     files_without_matches=1;;
143   (-h | --no-f*)
144     no_filename=1;;
145   (-V | --v | --ve | --ver | --vers | --versi | --versio | --version)
146     echo "$version" || exit 2
147     exit;;
148   esac
149
150   case $option in
151   (*\'?*)
152     option=\'$(printf '%s\n' "$option" | sed "$escape");;
153   (*)
154     option="'$option'";;
155   esac
156
157   grep="$grep $option$optarg"
158 done
159
160 eval "set -- $operands "'${1+"$@"}'
161
162 if test $have_pat -eq 0; then
163   case ${1?"missing pattern; try \`$0 --help' for help"} in
164   (*\'*)
165     grep="$grep -- '"$(printf '%s\n' "$1" | sed "$escape");;
166   (*)
167     grep="$grep -- '$1'";;
168   esac
169   shift
170 fi
171
172 if test $# -eq 0; then
173   set -- -
174 fi
175
176 exec 3>&1
177 res=0
178
179 for i
180 do
181   # Fail if gzip or grep (or sed) fails.
182   gzip_status=$(
183     exec 5>&1
184     (gzip -cdfq -- "$i" 5>&-; echo $? >&5) 3>&- |
185     if test $files_with_matches -eq 1; then
186       eval "$grep" >/dev/null && { printf '%s\n' "$i" || exit 2; }
187     elif test $files_without_matches -eq 1; then
188       eval "$grep" >/dev/null || {
189         r=$?
190         if test $r -eq 1; then
191           printf '%s\n' "$i" || r=2
192         fi
193         exit $r
194       }
195     elif test $with_filename -eq 0 &&
196          { test $# -eq 1 || test $no_filename -eq 1; }; then
197       eval "$grep"
198     else
199       case $i in
200       (*'
201 '* | *'&'* | *'\'* | *'|'*)
202         i=$(printf '%s\n' "$i" |
203             sed '
204               $!N
205               $s/[&\|]/\\&/g
206               $s/\n/\\n/g
207             ');;
208       esac
209       sed_script="s|^|$i:|"
210
211       # Fail if grep or sed fails.
212       r=$(
213         exec 4>&1
214         (eval "$grep" 4>&-; echo $? >&4) 3>&- | sed "$sed_script" >&3 4>&-
215       ) && exit $r
216       r=$?
217       test 1 -lt $r && exit $r || exit 2
218     fi >&3 5>&-
219   )
220   r=$?
221   test 128 -lt $r && exit $r
222   test "$gzip_status" -eq 0 || test "$gzip_status" -eq 2 || r=2
223   test $res -lt $r && res=$r
224 done
225 exit $res