X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=zpm-list;h=7ea697bf1e04ae1323dd33b373f3e9a04d561fca;hb=2ac486ab18adbbb84563eafc0d67fa8da6ca7822;hp=5868ef2d02b5ccdf34ac9a88ecc5039e940d449e;hpb=e22b15789cb499e39534ee0034f4f56f94d5a5a4;p=zpackage

diff --git a/zpm-list b/zpm-list
index 5868ef2..7ea697b 100755
--- a/zpm-list
+++ b/zpm-list
@@ -4,18 +4,22 @@
 
 verbose=0
 nameonly=0
+latestonly=1
 
-while getopts :s:f:vn opt; do
+while getopts :s:f:vnIF: opt; do
 	case $opt in
 		f) pkgfile="$OPTARG" ;;
 		s) status="$OPTARG" ;;
+		I) status=installed ;;
 		v) verbose=1 ;;
 		n) nameonly=1 ;;
+		a) latestonly=0 ;;
+		F) filter="$OPTARG" ;;
 	esac
 done
 shift $(( OPTIND - 1))
 
-: ${pkgfile:=$ZPMDB}
+: ${pkgfile:=${ZPMDB:-/var/lib/zpm/local.db}}
 
 if [ -z "$pkgfile" ]; then
 	echo "must specify package file"
@@ -34,7 +38,11 @@ fi
 
 if [ -n "$status" ]; then
 	status=$(zpm quote "$status")
-	where="where status = '$status'"
+	where="and status = '$status'"
+fi
+
+if [ -n "$filter" ]; then
+	where="$where and ($filter)"
 fi
 
 pkgid=$1
@@ -57,7 +65,10 @@ fi
 
 zpm shell $pkgfile <<EOS
 .separator "\t"
-select $cols from packages_pkgid $where
+select $cols from packages_pkgid where true $where
 ;
 EOS
 
+if [ $? -ne 0 ]; then
+	echo "select $cols from packages_pkgid where true $where" 1>&2
+fi