#!/bin/sh

# This is a preprocessor for 'less'.  It is used when this environment
# variable is set:   LESSOPEN="|lessopen %s"

PATH=/usr/gnu/bin:$PATH

case "$1" in *\|) exec perl -pe 1 "$1";; esac

test -r "$1" || exec ls -Lla "$1"
test -d "$1" && exec ls -Lla "$1"

case "$1" in
  /proc/*) exec tr \\0 \\012 < "$1";;
  *.deb) ar p $1 control.tar.gz | tar xOvzf - 2>&1 ; 
	    ar p $1 data.tar.gz | tar tvzf -;;
  *.[sr]pm) rpm -qivlp $1;;
  *.cpio) exec cpio -itv < $1;;
  *.cpio.gz) exec gzip -dc $1 | exec cpio -itv;;
  *consolefonts/?*) exec perl -0pe 's/./unpack("B*",$&)."\n"/ge&&y/01/-#/' "$1";;
  *.bdf) exec perl -pe '
	s/^([0-9A-F]+)$/unpack("B*",pack("H*",$1))/gei&&y/01/-#/' "$1";;
  *.bdf.gz) exec perl -pe '
	s/^([0-9A-F]+)$/unpack("B*",pack("H*",$1))/gei&&y/01/-#/' "zcat $1|";;
  *.dvi) exec dvi2tty -q "$1";;
  *.pdf) exec pdftotext -raw $1 -;;
  *.TAR|*.tar) exec tar tvvf "$1";;
  *.tgz|*.tar.gz|*.tar.Z) exec tar tvvfz "$1";;
  *man[1-9]*/*.gz) gzip -dc "$1" | nroff -man;;
  *.gz|*.[Zz]) exec gzip -dc "$1";;
  *.bz2) exec bzcat "$1";;
  *.zip) exec unzip -l "$1";;
  *.fon) od -t x1 "$1"; strings "$1";;
  *.o|*.a|*lib*.so|*lib*.so.[1-9]*) file "$1"; exec nm -ACgs "$1";;
  *.[1-9n]|*.man) exec nroff -man "$1";;
esac

if test -x "$1" && size "$1" >/dev/null 2>&1
then file -L "$1"; echo; size "$1"; echo; ldd "$1"; echo; exec strings - "$1"
fi

# $Id: lessopen,v 1.7 2001/04/26 09:08:03 czyborra Exp $