5 # Author : Chris Koeritz
6 # Rights : Copyright (C) 2012-$now by Feisty Meow Concerns, Ltd.
8 # This script is free software; you can modify/redistribute it under the terms
9 # of the GNU General Public License. [ http://www.gnu.org/licenses/gpl.html ]
10 # Feel free to send updates to: [ fred@gruntose.com ]
13 # An arbitrary format archive lister, although really we are mainly supporting
14 # tar and zip currently, including compressed formats.
16 archive_file="$1"; shift
17 if [ -z "$archive_file" ]; then
18 echo "This script takes one archive name (in .tar.gz, .zip, etc. formats) and"
19 echo "lists the archive with the appropriate tool."
22 if [ ! -f "$archive_file" ]; then
23 echo "The file specified cannot be located: $archive_file"
27 if [ -z "$PAGER" ]; then
29 if [ -z "$PAGER" ]; then
31 if [ -z "$PAGER" ]; then
37 # save where we started out.
38 ORIGINATING_FOLDER="$( \pwd )"
40 if [ ! -f "$archive_file" ]; then
41 # we're assuming we left it behind in our previous directory.
42 archive_file="$ORIGINATING_FOLDER/$archive_file"
43 if [ ! -f "$archive_file" ]; then
44 echo "Could not find file to unpack after shifting directories. Sorry."
45 echo "Tried to locate it as: $archive_file"
50 if [[ $archive_file =~ .*\.tar$ \
51 || $archive_file =~ .*\.tar\.gz$ \
52 || $archive_file =~ .*\.tar\.bz2$ \
53 || $archive_file =~ .*\.iar$ \
54 || $archive_file =~ .*\.oar$ \
55 || $archive_file =~ .*\.tgz$ \
56 || $archive_file =~ .*\.ova$ \
57 || $archive_file =~ .*\.snarf$ \
59 tar -tf $archive_file | $PAGER
60 elif [[ $archive_file =~ .*\.zip$ \
61 || $archive_file =~ .*\.epub$ \
62 || $archive_file =~ .*\.odt$ \
63 || $archive_file =~ .*\.jar$ \
64 || $archive_file =~ .*\.war$ \
66 unzip -v $archive_file | $PAGER