tazpkg view modules/block @ rev 840

Add a bunch of modules with new-style support of 'root' (not all commands are modules yet); strip and compress resources.
author Aleksej Bobylev <al.bobylev@gmail.com>
date Fri Aug 28 16:10:34 2015 +0300 (2015-08-28)
parents
children 0560ba4306a1
line source
1 #!/bin/sh
2 # TazPkg - Tiny autonomous zone packages manager, hg.slitaz.org/tazpkg
3 # block - TazPkg module
4 # Change package's blocked status
7 # Connect function libraries
8 . /lib/libtaz.sh
10 # Get TazPkg working environment
11 . @@MODULES@@/getenv
16 # Log activity
18 log_pkg() {
19 [ -w "$LOG" ] &&
20 echo "$(date +'%F %T') - $1 - $PACKAGE ($VERSION$EXTRAVERSION)" >> "$LOG"
21 }
26 case $1 in
28 block|-b)
29 # Block package
30 newline
31 if [ ! -d "$INSTALLED/$2" ]; then
32 _ 'Package "%s" is not installed.' "$2"
33 exit 1
34 fi
35 if grep -qs "^$2" "$BLOCKED"; then
36 _ 'Package "%s" is already blocked.' "$2"
37 else
38 echo "$2" >> "$BLOCKED"
39 # Log this activity
40 . "$INSTALLED/$2/receipt"; log_pkg Blocked
41 _ 'Package "%s" blocked.' "$2"
42 fi
43 newline
44 ;;
47 unblock|-u)
48 # Unblock package
49 newline
50 if [ ! -d "$INSTALLED/$2" ]; then
51 _ 'Package "%s" is not installed.' "$2"
52 exit 1
53 fi
54 if grep -qs "^$2" "$BLOCKED"; then
55 sed -i "/^$2\$/d" "$BLOCKED"
56 # Log this activity
57 . "$INSTALLED/$2/receipt"; log_pkg Unblocked
58 _ 'Package "%s" unblocked.' "$2"
59 else
60 _ 'Package "%s" is not blocked.' "$2"
61 fi
62 newline
63 ;;
66 chblock)
67 # Block/unblock package
68 newline
69 if [ ! -d "$INSTALLED/$2" ]; then
70 _ 'Package "%s" is not installed.' "$2"
71 exit 1
72 fi
73 if grep -qs "^$2" "$BLOCKED"; then
74 sed -i "/^$2\$/d" "$BLOCKED"
75 # Log this activity
76 . "$INSTALLED/$2/receipt"; log_pkg Unblocked
77 _ 'Package "%s" unblocked.' "$2"
78 else
79 echo "$2" >> "$BLOCKED"
80 # Log this activity
81 . "$INSTALLED/$2/receipt"; log_pkg Blocked
82 _ 'Package "%s" blocked.' "$2"
83 fi
84 newline
85 ;;
87 esac