You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
87 lines
2.2 KiB
87 lines
2.2 KiB
#!/bin/sh
|
|
# Copyright 1994 David C. Niemi.
|
|
# Copyright 1997,2001,2002 Alain Knaff.
|
|
# This file is part of mtools.
|
|
#
|
|
# Mtools is free software: you can redistribute it and/or modify
|
|
# it under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation, either version 3 of the License, or
|
|
# (at your option) any later version.
|
|
#
|
|
# Mtools is distributed in the hope that it will be useful,
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with Mtools. If not, see <http://www.gnu.org/licenses/>.
|
|
#
|
|
# tgz [destination [source...] ]
|
|
#
|
|
# Make a gzip'd tar archive $1 (or stdout) out of specified files
|
|
# (or, if not specified, from everything in the current directory)
|
|
#
|
|
# Requires gzip in the user's path.
|
|
#
|
|
# Requires gnu tar (or something close) in the user's path
|
|
# due to use of --exclude, --totals and -S.
|
|
#
|
|
# 1994/02/19 DCN Created
|
|
# 1994/12/01 DCN Cleanup and major improvements
|
|
#
|
|
# Copyright (C) 1994 David C. Niemi (niemi@tuxers.net)
|
|
# The author requires that any copies or derived works include this
|
|
# copyright notice; no other restrictions are placed on its use.
|
|
#
|
|
|
|
set -e
|
|
set -u
|
|
|
|
Error ()
|
|
{ echo "Error: $0: ${@-}." >&2
|
|
exit 1
|
|
}
|
|
|
|
if [ $# = 0 ]; then
|
|
dest=
|
|
src=.
|
|
tar cvf - . | gzip -9v
|
|
exit 0
|
|
elif [ $# = 1 ]; then
|
|
dest=$1
|
|
src=.
|
|
else
|
|
dest=$1
|
|
shift
|
|
src="${@-}"
|
|
fi
|
|
|
|
case $dest in
|
|
"" | . | .. | */ | */. | */.. )
|
|
echo "Usage: $0: [destination [source...] ]" >&2
|
|
exit 1
|
|
;;
|
|
*.t?z | *.?z | *.z | *.Z | *.tz | *.tz? )
|
|
;;
|
|
*)
|
|
dest=${dest}.tgz ## Add on .tgz as default suffix
|
|
esac
|
|
|
|
if [ -h "$dest" ]; then
|
|
Error "Destination file \"$dest\" already exists as a symbolic link"
|
|
elif [ -f "$dest" ]; then
|
|
Error "Destination \"$dest\" already exists as a file"
|
|
elif [ -d "$dest" ]; then
|
|
Error "Destination \"$dest\" already exists as a directory"
|
|
fi
|
|
if [ -z "$dest" -o "X$dest" = 'X-' ]; then
|
|
echo "Writing gzipp'd tar archive to standard output." >&2
|
|
tar cvfS - -- $src | gzip -9v
|
|
else
|
|
echo "Writing gzip'd tar archive to \"$dest\"." >&2
|
|
tar -cvS --totals --exclude "$dest" -f - -- $src | gzip -9v > "$dest"
|
|
ls -l "$dest" >&2
|
|
fi
|
|
|
|
exit 0
|