#!/bin/bash

##############
# Name   : list_arch
# Author : Chris Koeritz
# Rights : Copyright (C) 2012-$now by Feisty Meow Concerns, Ltd.
##############
# This script is free software; you can modify/redistribute it under the terms
# of the GNU General Public License. [ http://www.gnu.org/licenses/gpl.html ]
# Feel free to send updates to: [ fred@gruntose.com ]
##############
#
# An arbitrary format archive lister, although really we are mainly supporting
# tar and zip currently, including compressed formats.

source "$FEISTY_MEOW_SCRIPTS/core/launch_feisty_meow.sh"

archive_file="$1"; shift
if [ -z "$archive_file" ]; then
  echo "This script takes one archive name (in .tar.gz, .zip, etc. formats) and"
  echo "lists the archive with the appropriate tool."
  exit 1
fi
if [ ! -f "$archive_file" ]; then
  echo "The file specified cannot be located: $archive_file"
  exit 1
fi

if [ -z "$PAGER" ]; then
  PAGER=$(whichable less)
  if [ -z "$PAGER" ]; then
    PAGER=$(whichable more)
    if [ -z "$PAGER" ]; then
      PAGER="cat"
    fi
  fi
fi

# save where we started out.
ORIGINATING_FOLDER="$( \pwd )"

if [ ! -f "$archive_file" ]; then
  # we're assuming we left it behind in our previous directory.
  archive_file="$ORIGINATING_FOLDER/$archive_file"
  if [ ! -f "$archive_file" ]; then
    echo "Could not find file to unpack after shifting directories.  Sorry."
    echo "Tried to locate it as: $archive_file"
    exit 1
  fi
fi

save_err=1
if [[ $archive_file =~ .*\.tar$ \
    || $archive_file =~ .*\.tar\.gz$ \
    || $archive_file =~ .*\.tar\.bz2$ \
    || $archive_file =~ .*\.iar$ \
    || $archive_file =~ .*\.oar$ \
    || $archive_file =~ .*\.tgz$ \
    || $archive_file =~ .*\.ova$ \
    || $archive_file =~ .*\.snarf$ \
    ]]; then
  tar -tf $archive_file | $PAGER
  save_err=${PIPESTATUS[0]}
elif [[ $archive_file =~ .*\.zip$ \
    || $archive_file =~ .*\.epub$ \
    || $archive_file =~ .*\.odt$ \
    || $archive_file =~ .*\.jar$ \
    || $archive_file =~ .*\.war$ \
    ]]; then
  unzip -v $archive_file | $PAGER
  save_err=${PIPESTATUS[0]}
elif [[ "$archive_file" =~ .*\.7z$ ]]; then
  7z l "$archive_file" | $PAGER
  save_err=${PIPESTATUS[0]}
elif [[ "$archive_file" =~ .*\.rar$ ]]; then
  rar l "$archive_file" | $PAGER
  save_err=${PIPESTATUS[0]}
fi

if [ $save_err -ne 0 ]; then
  echo "There was a failure reported while listing: $archive_file"
  exit 1
fi