#!/bin/bash
#
# pkgexport 
# 05/24/2004
#
# Copyright (c) 2002-2004 by Andrew Green <crux@dorkatronix.org>
# License: GNU General Public License (GPL)
#
# Script to build a package from installed components. 
#
# Should be useful if upgraded package fails 
#
# 
COMMAND=$(basename $0)
VERSION=0.8
VERBOSE=0
PKGNAME=""
TARGET=$(pwd)
ROOT=""

#########
# Usage
#########
usage() {
echo "
$COMMAND $VERSION
options: [-h] [-v] [-r /pkg/root] <packagename> [outputfile/dir] 

-r Directory of alternate package root.  See pkginfo(8)
-h Usage/Help
-v Verbose output

Examples:

Export a current package to 'package#1.2.4-1.pkg.tar.gz' in the current dir:
$COMMAND currentpackage

Export mozilla to '/tmp/mozilla#1.2.1-1.pkg.tar.gz': 
$COMMAND mozilla /tmp

Export pkgutils to '/root/pkgutils.tar.gz':
$COMMAND pkgutils /root/pkgutils.tar.gz

Export a different CRUX installation of samba:
$COMMAND -r /mnt samba
"
exit 1
}

##########
# clean_on_exit removes temporary files etc.
##########
clean_on_exit() {
    [ -f $FILES ] && rm $FILES
}

##########
# pkginfo_l lists files inside a package (pkginfo -l $file)
##########
pkginfo_l() {

FILES="$(mktemp --tmpdir ${COMMAND}.XXXXXXXXXX)"
pkginfo $ROOT -l $1 > $FILES
if [ $RET -ne 0 ]
then
	echo "Package $1 contains no files and/or pkginfo -l $1 failed."
	exit 1
fi

}

#########
# pkginfo_i queries to see if a package is installed (pkginfo -i)
#########
pkginfo_i() {

INSTALLED=(`pkginfo $ROOT -i | grep "^$1 "`)
RET=$?

if [ $RET -ne 0 ]
then
	echo "Package $1 is not installed."
	exit 1
fi

}

#########
# exportpkg will build a pkgfile
#########
exportpkg() {

pkgname=${INSTALLED[0]}
pound="#"
version=${INSTALLED[1]}

# get compression mode from /etc/pkgmk.conf
compression="-z"
compression_suffix="gz"
[ -f /etc/pkgmk.conf ] && . /etc/pkgmk.conf
[ $PKGMK_COMPRESSION_MODE ] && compression_suffix=$PKGMK_COMPRESSION_MODE
suffix=".pkg.tar.$compression_suffix"
case $compression_suffix in
	gz) compression="-z" ;;
	bz2) compression="-j" ;;
	xz) compression="-J" ;;
esac

if [ -d $TARGET ]; then
	FIRST=$(echo $TARGET | cut -c 1)
	if [ "$FIRST" != "/" ]; then
		newpkg=$(pwd)/$TARGET/$pkgname
	else
		newpkg=$TARGET/$pkgname
	fi

	newver=$version
else
	newpkg=$(pwd)/$TARGET
	pound=""
	newver=""
	suffix=""
fi

BIGFILENAME="$newpkg$pound$newver$suffix"
if [ -f "$BIGFILENAME" ]; then
	echo "$BIGFILENAME" exists.  Exiting
	exit 1
fi

[ $VERBOSE = 1 ] && TARARGS="-v"

cd /
bsdtar -c $compression $TARARGS -f "$BIGFILENAME" -n -T $FILES
RET=$?

if [ $RET -ne 0 ]
then
	echo "Tar: error in creating $BIGFILENAME."
	rm -f "$BIGFILENAME"
	exit 1
fi

if [ $VERBOSE = 1 ]; then
	echo ===============================================
	echo
	echo Package export information for current package:
	echo
	echo Name: $pkgname
	echo Version: $version
	echo 
	echo Package saved as: $BIGFILENAME
	echo 
	echo ===============================================
else
	echo Package saved as: $BIGFILENAME
fi

}

#########
# Main !
#########
main() {

if [ $# -eq 0 ]; then
	usage
fi

while getopts :r:hv arg
do
	case $arg in
	r)  ROOT="-r "$OPTARG;;
	h)  usage;;
	v)  VERBOSE=1;;
	\?)  usage;;
	:)   usage;;
	esac
done
shift $((OPTIND - 1))

# echo 1: $1 2: $2
PKGNAME=$1

if [ "$PKGNAME" = "" ]; then
	usage
fi
if [ "$2" != "" ]; then
	TARGET=$2
fi

pkginfo_i $PKGNAME
pkginfo_l $PKGNAME
exportpkg

}


trap "clean_on_exit" EXIT
main $*