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 }