slitaz-base-files annotate rootfs/usr/lib/slitaz/libpkg.sh @ rev 258
libpkg.sh: unset TAGS too in unset_receipt(); and code reformatting
| author | Aleksej Bobylev <al.bobylev@gmail.com> |
|---|---|
| date | Thu Nov 27 16:26:29 2014 +0200 (2014-11-27) |
| parents | 793c2b7ed97f |
| children | 91fcb259b3bf |
| rev | line source |
|---|---|
| pankso@152 | 1 #!/bin/sh |
| pankso@152 | 2 # |
| pankso@152 | 3 # SliTaz Packages base functions used by packages manager, cook and |
| pankso@152 | 4 # all tools dealing with packages and receipts. |
| pankso@152 | 5 # |
| pankso@152 | 6 # Documentation: man libpkg or /usr/share/doc/slitaz/libpkg.txt |
| pankso@152 | 7 # |
| pascal@226 | 8 # Copyright (C) 2014 SliTaz GNU/Linux - BSD License |
| pankso@152 | 9 # |
| pankso@152 | 10 |
| slaxemulator@185 | 11 . /lib/libtaz.sh |
| slaxemulator@185 | 12 |
| pankso@152 | 13 # Unset all receipt variables. |
| pankso@152 | 14 unset_receipt() { |
| pankso@152 | 15 unset PACKAGE VERSION EXTRAVERSION SHORT_DESC HOST_ARCH TARBALL \ |
| al@258 | 16 DEPENDS BUILD_DEPENDS WANTED WGET_URL PROVIDE CROSS_BUG TAGS |
| pankso@152 | 17 } |
| meshca@155 | 18 |
| pankso@183 | 19 # Converts pkg.tazpkg to pkg |
| meshca@155 | 20 package_name() { |
| al@258 | 21 basename $1 .tazpkg |
| meshca@155 | 22 } |
| meshca@155 | 23 |
| pankso@183 | 24 # Check mirror ID: return false if no changes or mirror unreachable |
| pankso@183 | 25 check_mirror_id() { |
| pankso@183 | 26 [ "$forced" ] && rm -f ID |
| pankso@183 | 27 [ -f "ID" ] || echo $$ > ID |
| pankso@183 | 28 mv ID ID.bak |
| pankso@183 | 29 if wget -qs ${mirror%/}/ID; then |
| pankso@183 | 30 wget -q ${mirror%/}/ID |
| pankso@183 | 31 else |
| al@258 | 32 _n "Mirror is unreachable" |
| al@258 | 33 false; status; return 1 |
| pankso@183 | 34 fi |
| pankso@183 | 35 if [ "$(cat ID)" == "$(cat ID.bak)" ]; then |
| al@258 | 36 _n "Mirror is up-to-date" |
| al@258 | 37 true; status; return 1 |
| pankso@183 | 38 fi |
| pankso@183 | 39 } |
| pankso@183 | 40 |
| slaxemulator@185 | 41 # Source a package receipt |
| slaxemulator@185 | 42 source_receipt() { |
| slaxemulator@185 | 43 local receipt=$1 |
| slaxemulator@185 | 44 if [ ! -f $receipt ]; then |
| al@219 | 45 indent 28 $(_ 'Missing receipt: $receipt') |
| slaxemulator@185 | 46 continue |
| slaxemulator@185 | 47 else |
| slaxemulator@185 | 48 . $receipt |
| slaxemulator@185 | 49 fi |
| slaxemulator@185 | 50 } |
| slaxemulator@185 | 51 |
| pankso@181 | 52 # |
| pankso@181 | 53 # Do we realy need the code below here ??? |
| pankso@181 | 54 # |
| pankso@181 | 55 |
| meshca@155 | 56 # checks to see if file is proper tazpkg |
| meshca@155 | 57 is_valid_tazpkg() { |
| meshca@155 | 58 local file=$1 |
| meshca@155 | 59 [ -a $file ] && [ "$file" != "$(package_name $file)" ] |
| meshca@155 | 60 } |
| meshca@155 | 61 |
| meshca@155 | 62 check_valid_tazpkg() { |
| meshca@155 | 63 local file=$1 |
| meshca@155 | 64 if ! is_valid_tazpkg $file; then |
| al@219 | 65 _ '$file is not a tazpkg. Exiting' |
| meshca@155 | 66 exit 1 |
| meshca@155 | 67 fi |
| meshca@155 | 68 } |