tazpkg annotate lib/tazpkgbox/list @ rev 322

Add status filter for undigest lists
author Pascal Bellard <pascal.bellard@slitaz.org>
date Tue Feb 23 09:34:10 2010 +0100 (2010-02-23)
parents e2cf4184c576
children 50b4af64dff1
rev   line source
pankso@81 1 #!/bin/sh
pankso@81 2 #
pankso@81 3 # List installed packages in a suitable format for GTK tree.
pankso@81 4 # List mirrored packages using the packages.desc file.
pankso@81 5 #
pankso@81 6
pascal@187 7 undigest_list()
pascal@187 8 {
pascal@187 9 IFS="|"
pascal@213 10 if [ -n "$1" -a "$1" != "all" ]; then
pascal@322 11 cat undigest/$1/packages.desc
pascal@187 12 else
pascal@322 13 cat undigest/*/packages.desc
pascal@187 14 fi 2> /dev/null | sort | while read PACKAGE VERSION SHORT_DESC; do
pascal@243 15 ICON=tazpkg
pascal@300 16 PACKAGE=${PACKAGE%% *}
pascal@322 17 if [ -d installed/$PACKAGE ]; then
pascal@322 18 [ "$2" == "installable" ] && continue
pascal@243 19 ICON=tazpkg-installed
pascal@322 20 if grep -qs "^$PACKAGE$" blocked-packages.list; then
pascal@244 21 ICON=stop
pascal@244 22 fi
pascal@322 23 else
pascal@322 24 [ "$2" == "installed" ] && continue
pascal@243 25 fi
pascal@322 26 [ "$2" == "blocked" -a "$ICON" != "stop" ] && continue
pascal@322 27 [ "$2" == "upgradeable" ] &&
pascal@322 28 ! grep -q ^$PACKAGE$ upgradeable-packages.list && continue
pascal@243 29 echo "$ICON|$PACKAGE|$VERSION|$SHORT_DESC"
pascal@187 30 done
pascal@187 31 unset IFS
pascal@187 32 }
pascal@187 33
pascal@130 34 installable_list()
pascal@130 35 {
pascal@300 36 local cache
pascal@322 37 cache=packages.installable_list.$CAT
pascal@322 38 if [ -s $cache -a $cache -nt packages.desc -a $cache -nt installed ]; then
pascal@300 39 cat $cache
pascal@300 40 return
pascal@300 41 fi
pascal@130 42 IFS="|"
pascal@322 43 cat packages.desc undigest/*/packages.desc 2> /dev/null | sort | \
pascal@315 44 while read PACKAGE VERSION SHORT_DESC CATEGORY; do
pankso@231 45 # Check first for category for more speed.
pankso@231 46 CATEGORY=${CATEGORY%| *}
pascal@245 47 ICON=tazpkg
pascal@315 48 [ $CAT == all -o $CATEGORY == " $CAT " ] || continue
pascal@322 49 [ -d installed/${PACKAGE%% *} ] && continue
pascal@322 50 grep -qs "^$PACKAGE" undigest/*/packages.desc && ICON=add
pascal@245 51 echo "$ICON|$PACKAGE|$VERSION|$SHORT_DESC"
pascal@300 52 done | tee $cache
pascal@130 53 unset IFS
pascal@130 54 }
pascal@130 55
pascal@130 56 installed_list()
pascal@130 57 {
pascal@322 58 for pkg in installed/*
pascal@130 59 do
pascal@130 60 . $pkg/receipt
pascal@245 61 ICON=tazpkg-installed
pascal@300 62 [ $CAT == all -o $CATEGORY == $CAT ] || continue
pascal@322 63 grep -qs "^$PACKAGE" undigest/*/packages.desc && ICON=add
pascal@322 64 grep -qs "^$PACKAGE$" blocked-packages.list && ICON=stop
pascal@245 65 echo "$ICON|$PACKAGE|$VERSION|$SHORT_DESC"
pascal@130 66 done
pascal@130 67 }
pascal@130 68
pankso@231 69 all_list()
pankso@231 70 {
pascal@300 71 local cache
pascal@322 72 cache=packages.all_list.$CAT
pascal@322 73 if [ -s $cache -a $cache -nt packages.desc -a $cache -nt installed ]; then
pascal@300 74 cat $cache
pascal@300 75 return
pascal@300 76 fi
pascal@300 77 ( installable_list ; installed_list ) | sort -t \| -k 2 -u | tee $cache
pankso@231 78 }
pankso@231 79
pascal@178 80 blocked_list()
pascal@178 81 {
pascal@321 82 ICON=tazpkg-installed
pascal@321 83 [ "$1" = "blocked" ] && ICON=stop
pascal@322 84 for pkg in $(cat $1-packages.list 2> /dev/null); do
pascal@322 85 [ -f installed/$pkg/receipt ] || continue
pascal@322 86 . installed/$pkg/receipt
pascal@321 87 [ $CAT == all -o $CATEGORY == $CAT ] || continue
pascal@322 88 AVAILABLE=$(grep -s "^$pkg " packages.desc \
pascal@322 89 undigest/*/packages.desc | awk '{ print $3 }')
pascal@321 90 echo "$ICON|$PACKAGE|$VERSION (Available: $AVAILABLE)|$SHORT_DESC"
pascal@178 91 done
pascal@178 92 }
pascal@178 93
pascal@322 94 cd /var/lib/tazpkg
pascal@321 95 CAT=`cat /tmp/tazpkgbox/category`
pankso@81 96 case $1 in
pankso@231 97 all)
pankso@231 98 STATUS=`cat /tmp/tazpkgbox/status`
pankso@231 99 case $STATUS in
pascal@319 100 blocked|upgradeable)
pascal@319 101 blocked_list $STATUS;;
pankso@231 102 installed)
pankso@231 103 installed_list ;;
pankso@231 104 installable)
pankso@231 105 installable_list ;;
pankso@231 106 *)
pankso@231 107 all_list ;;
pankso@231 108 esac ;;
pascal@187 109 undigest)
pascal@187 110 set -- `cat /tmp/tazpkgbox/undigest-category`
pascal@187 111 if [ "$1" == "all" -o "$1" == "" ]; then
pascal@322 112 undigest_list $2 $3
pascal@187 113 else
pascal@322 114 undigest_list $2 $3 | grep "$1"
pascal@187 115 fi ;;
pascal@319 116 blocked|upgradeable)
pascal@319 117 blocked_list $1;;
pankso@81 118 *)
pascal@319 119 echo "Usage: $0 [all|undigest|blocked|upgradeable]" ;;
pankso@81 120 esac
pankso@81 121
pankso@81 122 exit 0