#!/bin/sh
#
#	/usr/local/bin/ORCpiggy
#
#	Copyright (c) 2000 Owl River Company
#		(an unpublished work)
#	info@owlriver.com
#	614 - 221 - 0695
#
#	ALWAYS licensed, Never sold
#	Unauthorized reproduction prohibited
#
VER="0.06-010810"
#
#	rev 010823 RPH 0.07 -- explicit PATH
#	rev 010810 RPH 0.06 -- license tally add on code saved
#	rev 010701 RPH 0.05 -- LANG and sort beef up
#	rev 010308 RPH 0.04 -- add usage note
#	rev 000918 RPH 0.03 -- sort order fix
#	rev 000417 RPH 0.02 -- Versioning added
#
#	Usage: ORCpiggy | tac      is also useful
#
#	License tallying
#
#	rpm -qa --queryformat "%{NAME}\t%{LICENSE}\n" | awk {'print $1"
#	"$2'} |  awk {'print $2"      "$1'} | sort | awk {'print $1'}
#	| uniq -c | sort -n
#
#
##################################################
#
PATH="/sbin:/usr/sbin:/usr/local/sbin:/bin:/usr/bin:/usr/local/bin"
MYNAME=` basename $0 `
#	fix RH mangled sort order
LC_ALL=C
LANG=C
export LC_ALL
export LANG
#
#	
#
##################################################
#
echo -n "Host: " ; hostname
echo -n "Date: " ; date
echo ${MYNAME}, ver. ${VER}
[ -e /etc/PUID ] && {
	PUID=`head -1 /etc/PUID `
	echo "PUID: ${PUID}"
	} || {
	echo "PUID: missing"
	}
echo "========================================"
#
rpm -qa --queryformat "%12{SIZE} %{NAME}\n" | awk {'print $1"    "$2'} | \
                sort -n -r +0
#
#
#