#!/bin/sh

#package=${1:-$ZPMPACKAGE}
pkgver=${ZPMPACKAGEVER:-1.0}
pkgrel=${ZPMPACKAGEREL:-1}

pkgroot=/

# allocate an install id, perhaps hash package and timestamp
# installid=$(echo $(date) $pkglist | zpm hash)

# extract pre-scripts and run them
# get list of paths to install
# for each path, if directory, create and set mode
# for each path, create leading directories
# extract to something like /var/tmp/.hash, with low perms
# only atomic if same filesystem, so use .installid.hash in the
# install directory
# set perms and such
# move into place
# after all the files, extract post scripts and run them

# also need to mark package as installing so if it fails part way
# through, it can be finished later
# probably also want an option to "backup" any packages being upgraded
# so it's trivial to downgrade or to revert if the install fails

# option for "multipackage" just to let the system know that's what you meant
# option to take filenames from stdin
# parse package, version, release from file if not given
# TODO what's the difference between prefix and pkgroot
# need an option to not chown the files
# option to install but not merge/track
while getopts :f:v:r:d:a:u:l:p:b:P:R: opt; do
	case $opt in
		R) pkgroot="$OPTARG" ;;
		f) pkgfile="$OPTARG" ;;
		v) pkgver="$OPTARG" ;;
		r) pkgrel="$OPTARG" ;;
		d) description="$OPTARG" ;;
		a) arch="$OPTARG" ;;
		u) url="$OPTARG" ;;
		l) licenses="$OPTARG" ;;
		p) packager="$OPTARG" ;;
		b) builddate="$OPTARG" ;;
		P) prefix="$OPTARG" ;;
	esac
done
shift $((OPTIND - 1))

die() {
	echo $* 1>&2
	exit 1
}

if [ -z "$pkgfile" ]; then
	# actually, if no pkgfile, get pkgfile from repo
	# but need to loop over finding package files then
	# so this program probably needs to be "install from pkgfile"
	# and a separate one that will loop over a package
	# spec list and find from repos
	die "must specify package file" 
	pkgfile="$package-$pkgver-$pkgrel.zpm"
fi

set -e
zpm test -v $pkgfile

if [ $# -gt 0 ]; then
	pkglist="$@"
else
	pkglist=$(zpm findpkg $pkgfile)
fi

pathlist() {
	sqlite3 $pkgfile<<EOS
select path from packagefiles
	where package||'-'||version||'-'||release = '$pkg'
	;
EOS
}

for pkg in $pkglist; do
	# TODO find scripts marked as pre-install
	# TODO if this is an upgrade, run pre-upgrade

	# TODO get total size of install so we can do a progress bar

	# add package info to local package db
	# zpm merge -L -f $pkgfile $pkg
	# check for conflicts
	# mark package in localdb as installing
	# zpm setmark installing $pkg
	# install all the files for a package
	# TODO install directories first in order of path length
	pathlist | xargs zpm ipkgfile -R "$pkgroot" -f $pkgfile -- $pkg 

	# TODO find scripts marked as post-install
	# TODO if this is an upgrade, run post-upgrade

	# mark as ready for install
	#zpm setmark ready $pkg
done

#zpm setmark installed $pkglist