tazpkg view tazpkg-notify @ rev 800

pkgs.cgi: extra package version
author Pascal Bellard <pascal.bellard@slitaz.org>
date Sun May 03 11:51:59 2015 +0200 (2015-05-03)
parents 0bda827841cd
children a02e36d44d06
line source
1 #!/bin/sh
2 #
3 # TazPkg Notify - Notification icon for TazPkg packages. Recharging pkgs
4 # list can be done automatically at boot, so notifies users if some
5 # updates are available. Also notifies users if the packages list is too
6 # old and out-of-date or if no packages list found. This script should
7 # be run by the WM autostart script or ~/.xsession and needs a systray to
8 # sit in like in LXpanel or Tint2.
9 #
10 # Copyright (C) 2012-2014 SliTaz GNU/Linux - GNU GPL v2
11 #
12 # Authors : Christophe Lincoln <pankso@slitaz.org>
13 #
14
15 . /lib/libtaz.sh
16 . /etc/slitaz/slitaz.conf
17
18 # I18n
19 export TEXTDOMAIN='tazpkg'
20 _() { local T="$1"; shift; printf "$(gettext "$T")" "$@"; echo; }
21 _n() { local T="$1"; shift; printf "$(gettext "$T")" "$@"; }
22 _p() {
23 local S="$1" P="$2" N="$3"; shift; shift; shift;
24 printf "$(ngettext "$S" "$P" "$N")" "$@"; }
25
26
27 fifo=/tmp/$(basename $0).fifo
28 tazweb="tazweb --notoolbar"
29 panelbase="http://tazpanel:82/pkgs.cgi"
30 panel="http://tazpanel:82/user/pkgs.cgi"
31 doc="file:///usr/share/doc/tazpkg/tazpkg.html"
32
33 installed=$(wc -l < $PKGS_DB/installed.info)
34 text="$(_p \
35 '%s installed package' \
36 '%s installed packages' $installed \
37 "<b>$installed</b>")"
38
39 [ -f "$PKGS_DB/packages.list" ] && mtime=$(find $PKGS_DB/packages.list -mtime +10;)
40 up=0; [ -f "$PKGS_DB/packages.up" ] && up=$(cat $PKGS_DB/packages.up | wc -l)
41
42
43 # Notification icon
44
45 listen() {
46 # Manage the I/O redirection from SHell
47 rm -f $fifo; mkfifo $fifo
48
49 # Attach a file descriptor
50 exec 3<> $fifo
51
52 # Notification icon
53 yad --notification --listen --image='TazPkg' \
54 --text="$(_ 'Checking packages lists - %s' "$text")" <&3
55
56 # Clean-up
57 rm -f $fifo
58 }
59
60
61 # Notification menu (right click)
62
63 menu() {
64 cat << EOT
65 menu:\
66 $(_n 'My packages' )!$tazweb $panelbase?list!TazPkg|\
67 $(_n 'Recharge lists' )!$tazweb $panel?recharge!tazpkg-up|\
68 $(_n 'Check upgrade' )!$tazweb $panel?up!tazpkg-up|\
69 $(_n 'TazPkg SHell' )!terminal -e tazpkg shell!utilities-terminal|\
70 $(_n 'TazPkg manual' )!$tazweb $doc!slitaz-doc|\
71 $(_n 'Close notification')!quit!gtk-close
72 EOT
73 }
74
75
76 case $1 in
77 usage|help|*-h)
78 _n "Usage:"; echo " $(basename $0)"
79 ;;
80 *)
81 # Sleep before displaying the notification icon and
82 # sleep to let user read the tooltips.
83 sleep 4
84 listen &
85 sleep 2
86 menu > $fifo
87 sleep 6
88
89 # Missing packages list
90 if [ ! -f $PKGS_DB/packages.list ]; then
91 tooltip="$(_ 'No packages list found - %s' "$text")"
92 (echo "action:$tazweb $panel?recharge"
93 echo "tooltip:$tooltip"
94 echo "icon:tazpkg-up") > $fifo
95 exit 0
96 fi
97
98 # Too old packages list
99 if [ "$mtime" ]; then
100 tooltip="$(_ 'Your packages list is older than 10 days')"
101 (echo "action:$tazweb $panel?recharge"
102 echo "tooltip:$tooltip"
103 echo "icon:tazpkg-up") > $fifo
104 exit 0
105 fi
106
107 # Available upgrades
108 if [ "$up" -gt 0 ]; then
109 tooltip="$(_p \
110 'There is %s upgradeable package' \
111 'There are %s upgradeable packages' $up \
112 "<b>$up</b>")"
113 (echo "action:$tazweb $panel?up"
114 echo "tooltip:$tooltip"
115 echo "icon:tazpkg-up") > $fifo
116 exit 0
117 fi
118
119 # Nothing to do, close notification
120 tooltip="$(_ 'System is up to date - %s' "$text")"
121 echo "tooltip:$tooltip" > $fifo
122 sleep 10
123 echo "quit" > $fifo
124 ;;
125 esac
126 exit 0