File: zforce.in

package info (click to toggle)
gzip 1.2.4-27
  • links: PTS
  • area: main
  • in suites: hamm
  • size: 988 kB
  • ctags: 1,024
  • sloc: ansic: 5,825; asm: 458; makefile: 263; sh: 31; perl: 11
file content (42 lines) | stat: -rwxr-xr-x 1,004 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
:
#!/bin/sh
# zforce: force a gz extension on all gzip files so that gzip will not
# compress them twice.
#
# This can be useful for files with names truncated after a file transfer.
# 12345678901234 is renamed to 12345678901.gz

PATH="BINDIR:$PATH"; export PATH
x=`basename $0`
if test $# = 0; then
  echo "force a '.gz' extension on all gzip files"
  echo usage: $x files...
  exit 1
fi

res=0
for i do
  if test ! -f "$i" ; then
    echo ${x}: $i not a file
    res=1
    continue
  fi
  test `expr "$i" : '.*[.-]z$'` -eq 0 || continue
  test `expr "$i" : '.*[.-]gz$'` -eq 0 || continue
  test `expr "$i" : '.*[.]t[ag]z$'` -eq 0 || continue

  if gzip -l < "$i" 2>/dev/null | grep '^defl' > /dev/null; then

    if test `expr "$i" : '^............'` -eq 12; then
      new=`expr "$i" : '\(.*\)...$`.gz
    else
      new="$i.gz"
    fi
    if mv "$i" "$new" 2>/dev/null; then
      echo $i -- replaced with $new
      continue
    fi
    res=1; echo ${x}: cannot rename $i to $new
  fi
done
exit $res