slitaz-base-files annotate rootfs/usr/lib/slitaz/libpkg.sh @ rev 340
Remove ashism ==
author | Pascal Bellard <pascal.bellard@slitaz.org> |
---|---|
date | Tue Feb 26 08:22:10 2019 +0100 (2019-02-26) |
parents | 91fcb259b3bf |
children |
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 # |
al@272 | 8 # Copyright (C) 2014-2015 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() { |
al@272 | 26 [ -n "$forced" ] && rm -f ID |
al@272 | 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@272 | 32 _n 'Mirror is unreachable' |
al@258 | 33 false; status; return 1 |
pankso@183 | 34 fi |
pascal@340 | 35 if [ "$(cat ID)" = "$(cat ID.bak)" ]; then |
al@272 | 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() { |
al@272 | 43 local receipt="$1" |
al@272 | 44 if [ ! -f $receipt ]; then |
al@272 | 45 indent 28 $(_ 'Missing receipt: %s' "$receipt") |
al@272 | 46 continue |
al@272 | 47 else |
al@272 | 48 . $receipt |
al@272 | 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() { |
al@272 | 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() { |
al@272 | 63 local file="$1" |
meshca@155 | 64 if ! is_valid_tazpkg $file; then |
al@272 | 65 _ 'File %s is not a tazpkg. Exiting' "$file" |
meshca@155 | 66 exit 1 |
meshca@155 | 67 fi |
meshca@155 | 68 } |