tazpkg annotate tazpkg @ rev 643

Now zcat checks .gz suffix...
author Pascal Bellard <pascal.bellard@slitaz.org>
date Sun Jan 05 14:49:55 2014 +0000 (2014-01-05)
parents ab8765351870
children b0fe4db66123
rev   line source
pankso@6 1 #!/bin/sh
al@633 2 # TazPkg - Tiny autonomous zone packages manager.
pankso@6 3 #
pankso@598 4 # This is a lightwight packages manager for *.tazpkg files written in SHell
al@633 5 # script. It works well with Busybox ash shell and bash. TazPkg lets you
MikeDSmith25@135 6 # list, install, remove, download or get information about a package. You can
al@633 7 # use 'tazpkg usage' to get a list of commands with short descriptions. TazPkg
pankso@595 8 # also resolves dependencies and can upgrade packages from a mirror.
pankso@6 9 #
al@633 10 # (C) 2007-2013 SliTaz - GNU General Public License v3.
pankso@6 11 #
al@633 12 # Authors: See the AUTHORS files
pankso@27 13 #
pankso@6 14
pankso@6 15 ####################
pankso@6 16 # Script variables #
pankso@6 17 ####################
pankso@6 18
al@633 19 # TazPkg version
border@620 20 VERSION=5.1
pankso@586 21
slaxemulator@588 22 . /etc/slitaz/slitaz.conf
pankso@307 23 . /etc/slitaz/tazpkg.conf
pankso@6 24
pankso@590 25 . /lib/libtaz.sh
pankso@590 26
pankso@595 27 # Internationalization.
pankso@343 28 . /usr/bin/gettext.sh
pankso@343 29 TEXTDOMAIN='tazpkg'
pankso@343 30 export TEXTDOMAIN
pankso@343 31
al@603 32 #
al@603 33 # Functions set for translate categories
al@603 34 #
al@603 35 # No operations, only for xgettext collect
al@603 36 gettext_noop() {
al@603 37 gettext "base-system"; gettext "x-window"; gettext "utilities";
al@603 38 gettext "network"; gettext "graphics"; gettext "multimedia";
al@603 39 gettext "office"; gettext "development"; gettext "system-tools";
al@603 40 gettext "security"; gettext "games"; gettext "misc"; gettext "meta";
al@603 41 gettext "non-free"
al@603 42 }
al@603 43 # Make array of pre-translated categories
al@603 44 cat_i18n=""
al@603 45 for c in "base-system" "x-window" "utilities" "network" "graphics" "multimedia" "office" "development" "system-tools" "security" "games" "misc" "meta" "non-free"; do
al@603 46 cat_i18n="$cat_i18n
al@603 47 $(gettext "$c") $c"
al@603 48 done
al@603 49 # If category is not one of those translated in native language, keep it
al@603 50 # untranslated. This allows both native and english language support.
al@603 51 # This also supports custom categories.
al@603 52 # And now we support spaces in translated categories
al@603 53 reverse_translate_category()
al@603 54 {
al@603 55 echo "$cat_i18n" | awk "BEGIN{FS=\" \"}{if (/^$@ /) a=\$2}END{if (a==\"\") a=\"$@\"; print a}"
al@603 56 }
al@603 57
al@603 58 #
al@633 59 # TazPkg output functions
al@603 60 #
al@603 61 # Print localized title
al@603 62 title() { newline; boldify "$(eval_gettext "$1")"; separator; }
al@603 63 # Print footer
al@603 64 footer() { separator; echo "$1"; newline; }
al@603 65 # Print current action in brown color (separate from any other msgs)
al@603 66 action() {
al@603 67 case $output in
al@603 68 raw|gtk|html) eval_gettext "$@" ;;
al@603 69 *) echo -ne "\033[0;33m"$(eval_gettext "$@")"\033[0m" ;;
al@603 70 esac
al@603 71 }
al@603 72
pankso@307 73 # Initialize some variables to use words rather than numbers for functions
pankso@307 74 # and actions.
pankso@6 75 COMMAND=$1
pascal@427 76 PACKAGE=${2%/}
slaxemulator@530 77 PACKAGE_DIR="$(cd $(dirname $PACKAGE 2>/dev/null) 2>/dev/null; pwd)"
pankso@598 78 [ -n "$PACKAGE" ] &&
slaxemulator@520 79 PACKAGE_FILE="$PACKAGE_DIR/${PACKAGE##*/}"
pascal@427 80 if [ -f "$PACKAGE" ]; then
pankso@10 81 # Set pkg basename for install, extract
pascal@427 82 PACKAGE=$(basename ${PACKAGE%.tazpkg} 2>/dev/null)
pankso@10 83 else
pankso@10 84 # Pkg name for remove, search and all other cmds
pascal@427 85 PACKAGE=${PACKAGE%.tazpkg}
pankso@10 86 fi
pankso@6 87 TARGET_DIR=$3
pankso@6 88 TOP_DIR=`pwd`
al@605 89 TMP_DIR=/tmp/$RANDOM
pankso@307 90 INSTALL_LIST=""
gokhlayeh@419 91 SAVE_CACHE_DIR="$CACHE_DIR"
pankso@6 92
pankso@6 93 # Path to tazpkg used dir and configuration files
pankso@6 94 MIRROR=$LOCALSTATE/mirror
pankso@10 95 BLOCKED=$LOCALSTATE/blocked-packages.list
pankso@466 96 UP_LIST=$LOCALSTATE/packages.up
slaxemulator@588 97 DEFAULT_MIRROR="$ONLINE_PKGS"
pankso@6 98
pascal@515 99 # Need by check_depends
pascal@515 100 TMPLOCALSTATE=
pascal@515 101
pankso@6 102 ####################
pankso@6 103 # Script functions #
pankso@6 104 ####################
pankso@6 105
pankso@6 106 # Print the usage.
al@603 107 usage () {
al@603 108 cat << EOT
pankso@600 109
al@603 110 $(eval_gettext 'SliTaz package manager - Version: $VERSION')
al@603 111
al@603 112 $(boldify "$(gettext 'Usage:')")
al@603 113 $(gettext 'tazpkg [command] [package|dir|pattern|list|cat|--opt] [dir|--opt]')
al@603 114 $(boldify "$(gettext 'SHell:')") tazpkg shell
al@603 115
al@603 116 $(boldify "$(gettext 'Commands:')")
al@603 117 usage $(gettext 'Print this short usage.')
al@603 118 bugs $(gettext 'Show known bugs in packages.')
al@603 119 list|-l $(gettext 'List installed packages on the system by category or all.')
al@603 120 list-mirror|-lm $(gettext 'List all available packages on the mirror (--diff for new).')
al@603 121 info $(gettext 'Print information about a package.')
al@603 122 desc $(gettext 'Print description of a package (if it exists).')
al@603 123 list-files|-lf $(gettext 'List the files installed with a package.')
al@603 124 list-config $(gettext 'List the configuration files.')
al@603 125 search|-s $(gettext 'Search for a package by pattern or name (options: -i|-l|-m).')
al@603 126 search-pkgname $(gettext 'Search on mirror for package having a particular file.')
al@603 127 search-file|-sf $(gettext 'Search for file(s) in all installed packages files.')
al@603 128 install|-i $(gettext 'Install a local (*.tazpkg) package (--forced to force).')
al@603 129 install-list $(gettext 'Install all packages from a list of packages.')
al@603 130 remove|-r $(gettext 'Remove the specified package and all installed files.')
al@603 131 extract|-e $(gettext 'Extract a (*.tazpkg) package into a directory.')
al@603 132 pack $(gettext 'Pack an unpacked or prepared package tree.')
al@603 133 recharge $(gettext 'Recharge your packages.list from the mirror.')
al@603 134 up|help-up $(eval_gettext 'Check packages $CHECKSUM to list and install latest upgrades.')
al@603 135 repack $(gettext 'Create a package archive from an installed package.')
al@603 136 repack-config $(gettext 'Create a package archive with configuration files.')
al@603 137 recompress $(gettext 'Rebuild a package with a better compression ratio.')
al@603 138 block|unblock $(gettext 'Block an installed package version or unblock it for upgrade.')
al@603 139 get $(gettext 'Download a package into the current directory.')
al@603 140 get-install|-gi $(gettext 'Download and install a package from the mirror.')
al@603 141 get-install-list $(gettext 'Download and install a list of packages from the mirror.')
al@603 142 check $(gettext 'Verify consistency of installed packages.')
al@603 143 add-flavor $(gettext 'Install the flavor list of packages.')
al@603 144 install-flavor $(gettext 'Install the flavor list of packages and remove other ones.')
al@603 145 set-release $(gettext 'Change release and update packages.')
al@603 146 clean-cache|-cc $(gettext 'Clean all packages downloaded in cache directory.')
al@603 147 depends $(gettext 'Display dependencies tree.')
al@603 148 rdepends $(gettext 'Display reverse dependencies tree.')
pascal@639 149 convert $(gettext 'Convert a deb/rpm/tgz/pet/sfs/sb/arch/ipk package to a slitaz (.tazpkg).')
al@603 150 link $(gettext 'Link a package from another slitaz installation.')
al@603 151 setup-mirror|-sm $(gettext 'Change the mirror url configuration.')
al@603 152 list-undigest $(gettext 'List undigest mirrors.')
al@603 153 remove-undigest $(gettext 'Remove an undigest mirror.')
al@603 154 add-undigest $(gettext 'Add an undigest mirror.')
al@603 155 setup-undigest $(gettext 'Update an undigest mirror.')
al@603 156 reconfigure $(gettext 'Replay post install script from package.')
al@603 157
al@603 158 EOT
pankso@6 159 }
pankso@6 160
pankso@464 161 usage_up() {
al@603 162 cat << EOT
al@633 163 $(emsg "<b>$(gettext 'TazPkg usage for command up:')</b>")
al@633 164 tazpkg up [$(gettext 'option')]
al@603 165 * $(gettext 'Without options run in interactive mode and ask before install')
pankso@464 166
al@603 167 $(boldify "$(gettext 'Where options are:')")
al@603 168 --check |-c $(gettext 'Check only for available upgrades')
al@603 169 --recharge |-r $(gettext 'Force recharge of packages list and check')
al@603 170 --install |-i $(gettext 'Check for upgrades and install them all')
pankso@464 171
al@603 172 $(boldify "$(gettext 'Example:')")
pankso@464 173 tazpkg up --recharge --install
pankso@464 174 tazpkg up -c -r
al@603 175 EOT
pankso@464 176 }
pankso@464 177
pankso@584 178 # Check if dir exist
pankso@584 179 check_dir()
pankso@584 180 {
pankso@584 181 if ! [ -d "$1" ]; then
al@603 182 FOLDER=$1
al@603 183 action 'Creating $FOLDER...'
al@603 184 mkdir -p "$FOLDER"
pankso@584 185 status
pankso@584 186 return 1
pankso@584 187 fi
pankso@584 188 }
pankso@584 189
al@633 190 # Check if the directories and files used by TazPkg
pankso@590 191 # exist. If not and user is root we create them.
pankso@590 192 check_base_dir()
pankso@590 193 {
al@603 194 if [ "$(id -u)" = "0" ]; then
pankso@590 195 check_dir $1$CACHE_DIR
pankso@590 196 check_dir $1$INSTALLED
pankso@594 197 check_dir $1$SLITAZ_LOGS
pankso@590 198 if [ ! -f "$1$LOCALSTATE/mirror" ]; then
pankso@590 199 echo "$DEFAULT_MIRROR" > $1$LOCALSTATE/mirror
pankso@590 200 [ -n "$1" ] && cp $LOCALSTATE/packages.* $1$LOCALSTATE/
pankso@590 201 fi
pankso@590 202 fi
pankso@590 203 }
pankso@590 204 check_base_dir
pankso@590 205
pankso@6 206 # Check for a package name on cmdline.
pankso@6 207 check_for_package_on_cmdline()
pankso@6 208 {
pankso@6 209 if [ -z "$PACKAGE" ]; then
pankso@600 210 newline
pankso@344 211 gettext "Please specify a package name on the command line."; echo
pankso@600 212 newline
pankso@6 213 exit 0
pankso@6 214 fi
pankso@6 215 }
pankso@6 216
paul@437 217 # Check if the package (*.tazpkg) exists before installing or extracting.
pankso@6 218 check_for_package_file()
pankso@6 219 {
pankso@9 220 if [ ! -f "$PACKAGE_FILE" ]; then
pankso@600 221 newline
pankso@344 222 eval_gettext "Unable to find: \$PACKAGE_FILE"; echo
al@603 223 newline
al@603 224 exit 0
pankso@6 225 fi
pankso@6 226 }
pankso@6 227
pankso@6 228 # Check for the receipt of an installed package.
pankso@6 229 check_for_receipt()
pankso@6 230 {
al@633 231 receipt_path="$1$INSTALLED/$PACKAGE/receipt"
al@633 232 if [ ! -f $receipt_path ]; then
pankso@600 233 newline
al@633 234 eval_gettext 'Unable to find the receipt: $receipt_path'; echo
al@603 235 newline
al@603 236 exit 0
pankso@6 237 fi
pankso@6 238 }
pankso@6 239
gokhlayeh@386 240 # Get repositories priority using $LOCALSTATE/priority.
gokhlayeh@386 241 # In this files, undigest are called by their name and main mirror
al@633 242 # by main. Sort order: priority
gokhlayeh@386 243 look_for_priority()
gokhlayeh@386 244 {
gokhlayeh@386 245 [ -s $LOCALSTATE/priority ] && priority=$(cat $LOCALSTATE/priority)
gokhlayeh@386 246 for rep in main $(ls $LOCALSTATE/undigest 2>/dev/null); do
gokhlayeh@386 247 if [ ! -s $LOCALSTATE/priority ] || \
gokhlayeh@386 248 ! grep -q ^$rep$ $LOCALSTATE/priority; then
gokhlayeh@386 249 priority=$(echo -e "$priority\n$rep")
gokhlayeh@386 250 fi
gokhlayeh@386 251 done
gokhlayeh@386 252 priority=$(echo "$priority" | sed '/^$/d' | \
gokhlayeh@386 253 while read line; do
gokhlayeh@386 254 if [ "$line" = main ]; then
gokhlayeh@386 255 echo $LOCALSTATE
gokhlayeh@386 256 else
gokhlayeh@386 257 echo $LOCALSTATE/undigest/$line
gokhlayeh@386 258 fi
gokhlayeh@386 259 done)
gokhlayeh@386 260 }
gokhlayeh@386 261
pascal@110 262 # Get package name in a directory
pascal@110 263 package_fullname_in_dir()
pascal@110 264 {
gokhlayeh@407 265 [ -f $1/receipt ] || return
pascal@114 266 EXTRAVERSION=""
gokhlayeh@407 267 . $1/receipt
pascal@110 268 echo $PACKAGE-$VERSION$EXTRAVERSION
pascal@110 269 }
pascal@110 270
pascal@110 271 # Get package name that is already installed.
pascal@110 272 get_installed_package_pathname()
pascal@110 273 {
pascal@121 274 for i in $2$INSTALLED/${1%%-*}*; do
pascal@115 275 [ -d $i ] || continue
gokhlayeh@407 276 if [ "$1" = "$(package_fullname_in_dir $i)" ]; then
pascal@110 277 echo $i
pascal@110 278 return
pascal@110 279 fi
pascal@110 280 done
pascal@110 281 }
pascal@110 282
pankso@6 283 # Check if a package is already installed.
pankso@6 284 check_for_installed_package()
pankso@6 285 {
pascal@121 286 if [ -n "$(get_installed_package_pathname $PACKAGE $1)" ]; then
pankso@600 287 newline
al@633 288 eval_gettext "\$PACKAGE package is already installed.
al@633 289 You can use the --forced option to force installation or remove it
al@633 290 and reinstall."; echo
al@603 291 newline
al@603 292 exit 0
pankso@6 293 fi
pankso@6 294 }
pankso@6 295
pankso@6 296 # Check for packages.list to download and install packages.
pankso@6 297 check_for_packages_list()
pankso@6 298 {
al@633 299 list_path="$LOCALSTATE/packages.list"
al@633 300 if [ ! -f "$list_path" ]; then
pankso@71 301 if test $(id -u) = 0 ; then
pankso@71 302 tazpkg recharge
pankso@71 303 else
pankso@600 304 newline
al@633 305 eval_gettext 'Unable to find the list: $list_path'; echo
pankso@344 306 gettext \
pankso@344 307 "You must probably run 'tazpkg recharge' as root to get the latest list of
al@603 308 packages available on the mirror."; echo
al@603 309 newline
al@603 310 exit 0
pankso@71 311 fi
pankso@6 312 fi
pankso@6 313 }
pankso@6 314
gokhlayeh@419 315 get_cache_dir()
gokhlayeh@419 316 {
gokhlayeh@419 317 echo $rep > $tmp/rep
gokhlayeh@421 318 if [ "$rep" = "$LOCALSTATE" ]; then
pankso@586 319 CACHE_DIR="$SAVE_CACHE_DIR/$SLITAZ_RELEASE/packages"
gokhlayeh@419 320 elif [ "${rep%-incoming}" = "$rep" ]; then
gokhlayeh@419 321 CACHE_DIR="$SAVE_CACHE_DIR/${rep##*/}/packages"
gokhlayeh@419 322 else
gokhlayeh@419 323 rep="${rep%-incoming}"
gokhlayeh@419 324 CACHE_DIR="$SAVE_CACHE_DIR/${rep##*/}/packages-incoming"
gokhlayeh@419 325 fi
gokhlayeh@419 326 [ -d "$CACHE_DIR" ] || mkdir -p $CACHE_DIR
gokhlayeh@419 327 echo $CACHE_DIR > $tmp/cachedir
gokhlayeh@419 328 }
gokhlayeh@419 329
pascal@261 330 # get an already installed package from packages.equiv
pascal@226 331 equivalent_pkg()
pascal@226 332 {
pascal@226 333 for i in $(grep -hs "^$1=" $LOCALSTATE/packages.equiv \
pascal@226 334 $LOCALSTATE/undigest/*/packages.equiv | sed "s/^$1=//"); do
gokhlayeh@409 335 if echo $i | fgrep -q : ; then
pascal@226 336 # format 'alternative:newname'
pascal@226 337 # if alternative is installed then substitute newname
pascal@226 338 if [ -f $2$INSTALLED/${i%:*}/receipt ]; then
pascal@226 339 # substitute package dependancy
pascal@226 340 echo ${i#*:}
pascal@226 341 return
pascal@226 342 fi
pascal@226 343 else
pascal@226 344 # if alternative is installed then nothing to install
pascal@241 345 if [ -f $2$INSTALLED/$i/receipt ]; then
pascal@226 346 # substitute installed package
pascal@226 347 echo $i
pascal@226 348 return
pascal@226 349 fi
pascal@226 350 fi
pascal@226 351 done
pascal@226 352 # if not found in packages.equiv then no substitution
pascal@226 353 echo $1
pascal@226 354 }
pascal@226 355
pascal@261 356 # get a virtual package from packages.equiv
pascal@261 357 virtual_pkg()
pascal@261 358 {
pankso@598 359 for i in $(for rep in $priority; do
gokhlayeh@386 360 grep -hs "^$1=" $rep/packages.equiv
gokhlayeh@386 361 done | sed "s/^$1=//"); do
gokhlayeh@409 362 if echo $i | fgrep -q : ; then
pascal@261 363 # format 'alternative:newname'
pascal@261 364 # if alternative is installed then substitute newname
pascal@261 365 if [ -f $2$INSTALLED/${i%:*}/receipt ]; then
pascal@261 366 # substitute package dependancy
pascal@261 367 echo ${i#*:}
pascal@261 368 return
pascal@261 369 fi
pascal@261 370 else
pascal@262 371 # unconditional substitution
pascal@261 372 echo $i
pascal@261 373 return
pascal@261 374 fi
pascal@261 375 done
pascal@261 376 }
pascal@261 377
pascal@190 378 # Get package filename available on the mirror
pascal@190 379 get_package_filename()
pascal@190 380 {
pascal@190 381 local pkg
gokhlayeh@386 382 for rep in $priority; do
gokhlayeh@386 383 pkg=$(grep -A 1 -sh "^$1$" $rep/packages.txt | tail -1 | \
gokhlayeh@386 384 sed 's/^ *//')
gokhlayeh@386 385 [ "$pkg" ] && pkg=$(grep -sh "^$1-$pkg" \
gokhlayeh@387 386 $rep/packages.list | head -1)
pankso@598 387
gokhlayeh@387 388 # Allow user to call a package with his version number.
gokhlayeh@387 389 [ "$pkg" ] || pkg=$(grep -sh "^$1$" $rep/packages.list | head -1)
pankso@598 390
gokhlayeh@386 391 [ "$pkg" ] || pkg=$(grep -sh "^$1-[0-9]" \
gokhlayeh@386 392 $rep/packages.list | head -1)
gokhlayeh@386 393 [ "$pkg" ] || pkg=$(grep -sh "^$1-.[\.0-9]" \
gokhlayeh@386 394 $rep/packages.list | head -1)
gokhlayeh@419 395 [ "$pkg" ] && get_cache_dir && break
gokhlayeh@386 396 done
pascal@226 397 if [ -z "$pkg" ]; then
pascal@226 398 # Check for vitual package
pascal@226 399 local equiv
pascal@261 400 equiv=$(virtual_pkg $1)
pascal@226 401 if [ "$equiv" != "$1" ]; then
pascal@226 402 PACKAGE=$equiv
pascal@226 403 get_package_filename $PACKAGE
pascal@226 404 return
pascal@226 405 fi
pascal@226 406 fi
pascal@190 407 echo $pkg
pascal@190 408 }
pascal@190 409
pankso@6 410 # Check for a package in packages.list. Used by get and get-install to grep
pankso@6 411 # package basename.
pankso@6 412 check_for_package_in_list()
pankso@6 413 {
pascal@190 414 local filename
pascal@202 415 local check_only
pascal@202 416 check_only="$1"
gokhlayeh@416 417 filename=$(get_package_filename $PACKAGE)
gokhlayeh@419 418 if [ "$filename" ]; then
pascal@190 419 PACKAGE=$filename
gokhlayeh@419 420 CACHE_DIR=$(cat $tmp/cachedir)
gokhlayeh@419 421 rep=$(cat $tmp/rep)
gokhlayeh@419 422 rm -f $tmp/rep $tmp/cachedir
pankso@6 423 else
pankso@600 424 newline
pankso@344 425 eval_gettext "Unable to find: \$PACKAGE in the mirrored packages list."; echo
pankso@600 426 newline
pascal@202 427 [ -n "$check_only" ] && return 1
pankso@6 428 exit 0
pankso@6 429 fi
pankso@6 430 }
pankso@6 431
pascal@183 432 # Log this activity
al@603 433 # (there log_pkg because we have log() in libtaz.sh)
al@603 434 log_pkg()
pascal@183 435 {
pascal@207 436 local extra
pascal@207 437 [ "$1" = "Installed" ] && \
slaxemulator@588 438 extra=" - $(fgrep $PACKAGE-$VERSION $LOCALSTATE/installed.$SUM | awk '{ print $1 }')"
pascal@183 439 [ -e $LOG ] || touch $LOG
pascal@183 440 DATE=`date +'%F %T'`
pankso@279 441 [ -w $LOG ] &&
pascal@207 442 echo "$DATE - $1 - $PACKAGE ($VERSION$EXTRAVERSION)$extra" >> $LOG
pascal@183 443 }
pascal@183 444
pascal@187 445 # Download a file from this mirror
pascal@187 446 download_from()
pascal@187 447 {
pascal@187 448 local i
pascal@187 449 local mirrors
pascal@187 450 mirrors="$1"
pascal@187 451 shift
pascal@187 452 for i in $mirrors; do
pascal@187 453 case "$i" in
pankso@580 454 # Mirror URL can have a trailing slash or not.
pankso@581 455 http://*|ftp://*) wget -c ${i%/}/$@ && break ;;
pankso@581 456 *) ln -sf $i/$1 . && break ;;
pascal@187 457 esac
pascal@187 458 done
pascal@187 459 }
pascal@187 460
pascal@17 461 # Download a file trying all mirrors
pascal@17 462 download()
pascal@17 463 {
pascal@187 464 local i
pascal@225 465 case "$1" in
pascal@225 466 *.tazpkg)
gokhlayeh@386 467 for i in $priority ; do
gokhlayeh@386 468 grep -q "^${1%.tazpkg}$" $i/packages.list 2>/dev/null || continue
pascal@225 469 download_from "$(cat $i/mirror)" "$@" && return
pascal@225 470 done
pascal@225 471 esac
gokhlayeh@386 472 for i in $(cat `for rep in $priority; do echo $rep/mirror; done` \
gokhlayeh@386 473 2> /dev/null); do
pascal@191 474 download_from "$i" "$@" && break
pascal@17 475 done
pascal@17 476 }
pascal@17 477
pascal@297 478 # Extract a package with cpio and gzip/lzma.
pankso@6 479 extract_package()
pankso@6 480 {
al@603 481 action "Extracting \$PACKAGE..."
gokhlayeh@414 482 cpio -idm --quiet < ${PACKAGE_FILE##*/} && rm -f ${PACKAGE_FILE##*/}
gokhlayeh@383 483 status
pascal@297 484 if [ -f fs.cpio.lzma ]; then
al@603 485 action "Extracting the pseudo fs..."
gokhlayeh@383 486 unlzma -c fs.cpio.lzma | cpio -idm --quiet && rm fs.cpio.lzma
gokhlayeh@383 487 status
gokhlayeh@355 488 elif [ -f fs.cpio.gz ]; then
al@603 489 action "Extracting the pseudo fs..."
gokhlayeh@383 490 zcat fs.cpio.gz | cpio -idm --quiet && rm fs.cpio.gz
gokhlayeh@383 491 status
pascal@297 492 fi
pankso@6 493 }
pankso@6 494
pascal@299 495 remove_with_path()
pascal@299 496 {
gokhlayeh@385 497 # Avoid dirname errors by checking for argument.
gokhlayeh@385 498 [ "$1" ] || return
pankso@598 499
pascal@299 500 local dir
pascal@299 501 rm -f $1 2>/dev/null
pascal@299 502 dir="$1"
pascal@299 503 while [ "$dir" != "/" ]; do
pascal@299 504 dir="$(dirname $dir)"
pascal@299 505 rmdir $dir 2> /dev/null || break
pascal@299 506 done
pascal@299 507 }
pascal@299 508
pascal@377 509 grepesc()
pascal@377 510 {
pascal@377 511 sed 's/\[/\\[/g'
pascal@377 512 }
pascal@377 513
MikeDSmith25@135 514 # This function installs a package in the rootfs.
pankso@6 515 install_package()
pankso@6 516 {
pascal@20 517 ROOT=$1
pascal@20 518 if [ -n "$ROOT" ]; then
MikeDSmith25@135 519 # Get absolute path
pascal@20 520 ROOT=$(cd $ROOT; pwd)
pascal@20 521 fi
gokhlayeh@408 522 {
MikeDSmith25@134 523 # Create package path early to avoid dependencies loop
pascal@122 524 mkdir -p $TMP_DIR
gokhlayeh@408 525 { cd $TMP_DIR ; cpio --quiet -i receipt > /dev/null 2>&1; } < $PACKAGE_FILE
pascal@122 526 . $TMP_DIR/receipt
pascal@224 527 if grep -q ^pre_depends $TMP_DIR/receipt; then
pascal@224 528 pre_depends $ROOT
pascal@224 529 fi
paul@437 530 # Keep modifers and file list on upgrade
pascal@273 531 cp $ROOT$INSTALLED/$PACKAGE/modifiers \
pascal@273 532 $ROOT$INSTALLED/$PACKAGE/files.list $TMP_DIR 2> /dev/null
pascal@249 533 rm -rf $ROOT$INSTALLED/$PACKAGE 2> /dev/null
pascal@122 534 # Make the installed package data dir to store
pascal@122 535 # the receipt and the files list.
pascal@122 536 mkdir -p $ROOT$INSTALLED/$PACKAGE
pascal@249 537 cp $TMP_DIR/modifiers $ROOT$INSTALLED/$PACKAGE 2> /dev/null
pascal@273 538 cp $TMP_DIR/files.list $ROOT$INSTALLED/$PACKAGE 2> /dev/null
pascal@249 539 rm -rf $TMP_DIR 2> /dev/null
pascal@195 540 sed -i "/ $(basename $PACKAGE_FILE)$/d" \
slaxemulator@588 541 $ROOT$LOCALSTATE/installed.$SUM 2> /dev/null
pascal@195 542 cd $(dirname $PACKAGE_FILE)
slaxemulator@588 543 $CHECKSUM $(basename $PACKAGE_FILE) >> $ROOT$LOCALSTATE/installed.$SUM
gokhlayeh@408 544 }
MikeDSmith25@134 545 # Resolve package deps.
pascal@120 546 check_for_deps $ROOT
pascal@120 547 if [ ! "$MISSING_PACKAGE" = "" ]; then
pascal@120 548 install_deps $ROOT
pascal@120 549 fi
pankso@6 550 mkdir -p $TMP_DIR
mojo@597 551 [ -n "$INSTALL_LIST" ] && echo "$PACKAGE_FILE" >> $ROOT$LOCALSTATE/$INSTALL_LIST-processed
al@603 552 title 'Installation of: $PACKAGE'
al@603 553 action "Copying \$PACKAGE..."
pankso@9 554 cp $PACKAGE_FILE $TMP_DIR
pankso@6 555 status
pankso@6 556 cd $TMP_DIR
pankso@6 557 extract_package
pascal@20 558 SELF_INSTALL=0
pascal@114 559 EXTRAVERSION=""
pascal@144 560 CONFIG_FILES=""
pankso@6 561 # Include temporary receipt to get the right variables.
pankso@6 562 . $PWD/receipt
pascal@273 563 cd $ROOT$INSTALLED
pascal@20 564 if [ $SELF_INSTALL -ne 0 -a -n "$ROOT" ]; then
al@603 565 action "Checking post install dependencies..."
pascal@125 566 [ -f $INSTALLED/$PACKAGE/receipt ]
pascal@20 567 if ! status; then
al@633 568 command="tazpkg install $PACKAGE_FILE"
al@633 569 eval_gettext "Please run '\$command' in / and retry."; echo
pascal@273 570 rm -rf $TMP_DIR
pascal@20 571 exit 1
pascal@20 572 fi
pascal@20 573 fi
pascal@273 574 # Get files to remove if upgrading
pascal@273 575 if [ -f $PACKAGE/files.list ]; then
pascal@273 576 while read file; do
pascal@377 577 grep -q "^$(echo $file | grepesc)$" $TMP_DIR/files.list && continue
pankso@279 578 for i in $(cat $PACKAGE/modifiers 2> /dev/null ;
gokhlayeh@409 579 fgrep -sl $PACKAGE */modifiers | cut -d/ -f1 ); do
pascal@377 580 grep -qs "^$(echo $file | grepesc)$" $i/files.list && continue 2
pascal@273 581 done
pascal@273 582 echo $file
pascal@273 583 done < $PACKAGE/files.list > $TMP_DIR/files2remove.list
pascal@273 584 fi
pascal@21 585 # Remember modified packages
pascal@299 586 { check=false
gokhlayeh@409 587 for i in $(fgrep -v [ $TMP_DIR/files.list); do
pascal@69 588 [ -e "$ROOT$i" ] || continue
pascal@69 589 [ -d "$ROOT$i" ] && continue
pascal@299 590 echo "- $i"
pascal@299 591 check=true
pankso@598 592 done ;
pankso@598 593 $check && for i in *; do
pascal@299 594 [ "$i" == "$PACKAGE" ] && continue
pascal@342 595 [ -s $i/files.list ] || continue
pascal@299 596 awk "{ printf \"$i %s\\n\",\$1 }" < $i/files.list
gokhlayeh@414 597 done; } | awk '
pascal@299 598 {
pascal@299 599 if ($1 == "-" || file[$2] != "") {
pascal@299 600 file[$2] = file[$2] " " $1
pascal@299 601 if ($1 != "-") {
pascal@299 602 if (pkg[$1] == "") all = all " " $1
pascal@299 603 pkg[$1] = pkg[$1] " " $2
pascal@299 604 }
pascal@299 605 }
pascal@299 606 }
pascal@299 607 END {
pascal@299 608 for (i = split(all, p, " "); i > 0; i--)
pascal@299 609 for (j = split(pkg[p[i]], f, " "); j > 0; j--)
pascal@299 610 printf "%s %s\n",p[i],f[j];
pascal@299 611 }
pascal@299 612 ' | while read dir file; do
pascal@299 613 if grep -qs ^$dir$ $PACKAGE/modifiers; then
pascal@299 614 # Do not overload an overloaded file !
pascal@299 615 rm $TMP_DIR$file 2> /dev/null
pascal@299 616 continue
pascal@299 617 fi
pascal@299 618 grep -qs ^$PACKAGE$ $dir/modifiers && continue
pascal@299 619 if [ -s "$dir/volatile.cpio.gz" ]; then
pascal@299 620 # We can modify backed up files without notice
gokhlayeh@383 621 zcat $dir/volatile.cpio.gz | cpio -t --quiet | \
pascal@299 622 grep -q "^${file#/}$" && continue
pascal@299 623 fi
pascal@299 624 echo "$PACKAGE" >> $dir/modifiers
pascal@21 625 done
pascal@299 626
pascal@273 627 cd $TMP_DIR
pascal@20 628 cp receipt files.list $ROOT$INSTALLED/$PACKAGE
pascal@20 629 # Copy the description if found.
pankso@6 630 if [ -f "description.txt" ]; then
pascal@20 631 cp description.txt $ROOT$INSTALLED/$PACKAGE
pankso@6 632 fi
pascal@128 633 # Copy the md5sum if found.
slaxemulator@588 634 if [ -f "$CHECKSUM" ]; then
slaxemulator@588 635 cp $CHECKSUM $ROOT$INSTALLED/$PACKAGE
pascal@128 636 fi
pankso@38 637 # Pre install commands.
pankso@38 638 if grep -q ^pre_install $ROOT$INSTALLED/$PACKAGE/receipt; then
pascal@20 639 pre_install $ROOT
pankso@6 640 fi
pascal@144 641 if [ -n "$CONFIG_FILES" ]; then
pascal@144 642 # save 'official' configuration files
al@603 643 action "Saving configuration files for \$PACKAGE..."
pascal@144 644 for i in $CONFIG_FILES; do
pascal@539 645 { cd fs ; find ${i#/} -type f 2> /dev/null; cd ..; }
gokhlayeh@416 646 done | { cd fs ; cpio -o -H newc --quiet | gzip -9; cd ..; } > \
pascal@144 647 $ROOT$INSTALLED/$PACKAGE/volatile.cpio.gz
pascal@144 648 # keep user configuration files
pascal@144 649 for i in $CONFIG_FILES; do
pascal@539 650 { cd fs ; find ${i#/} -type f 2> /dev/null; cd ..; }
pascal@148 651 done | while read i; do
pascal@148 652 [ -e $ROOT/$i ] || continue
pascal@148 653 cp -a $ROOT/$i fs/$i
pascal@144 654 done
pascal@144 655 status
pascal@144 656 fi
al@603 657 action "Installing \$PACKAGE..."
pascal@20 658 cp -a fs/* $ROOT/
pankso@6 659 status
pascal@273 660 if [ -s files2remove.list ]; then
al@603 661 action "Removing old \$PACKAGE..."
pascal@273 662 while read file; do
pascal@299 663 remove_with_path $ROOT$file
pascal@273 664 done < files2remove.list
pascal@299 665 true
pascal@273 666 status
pascal@273 667 fi
pankso@6 668 # Remove the temporary random directory.
al@603 669 action "Removing all tmp files..."
pankso@6 670 cd .. && rm -rf $TMP_DIR
pankso@6 671 status
pankso@38 672 # Post install commands.
pankso@38 673 if grep -q ^post_install $ROOT$INSTALLED/$PACKAGE/receipt; then
pascal@20 674 post_install $ROOT
pankso@6 675 fi
gokhlayeh@356 676 # Update-desktop-database if needed.
gokhlayeh@409 677 if [ "$(fgrep .desktop $ROOT$INSTALLED/$PACKAGE/files.list | fgrep /usr/share/applications/)" ]; then
gokhlayeh@356 678 updatedesktopdb=yes
gokhlayeh@356 679 fi
slaxemulator@369 680 # Update-mime-database if needed.
gokhlayeh@409 681 if [ "$(fgrep /usr/share/mime $ROOT$INSTALLED/$PACKAGE/files.list)" ]; then
slaxemulator@369 682 updatemimedb=yes
slaxemulator@369 683 fi
slaxemulator@567 684 # Update-icon-database
slaxemulator@567 685 if [ "$(fgrep /usr/share/icon/hicolor $ROOT$INSTALLED/$PACKAGE/files.list)" ]; then
slaxemulator@567 686 updateicondb=yes
slaxemulator@567 687 fi
slaxemulator@534 688 # Compile glib schemas if needed.
slaxemulator@534 689 if [ "$(fgrep /usr/share/glib-2.0/schemas $ROOT$INSTALLED/$PACKAGE/files.list)" ]; then
slaxemulator@534 690 compile_schemas=yes
slaxemulator@534 691 fi
slaxemulator@588 692 # Update depmod list
slaxemulator@591 693 if [ "$(fgrep /lib/modules $ROOT$INSTALLED/$PACKAGE/files.list)" ]; then
slaxemulator@588 694 updatedepmod=yes
slaxemulator@588 695 fi
pankso@6 696 cd $TOP_DIR
al@633 697 pkg_name="$PACKAGE ($VERSION$EXTRAVERSION)"
al@633 698 footer "$(eval_gettext '$pkg_name is installed.')"
pascal@183 699 # Log this activity
al@603 700 [ -n "$ROOT" ] || log_pkg Installed
pankso@6 701 }
pankso@6 702
pascal@122 703 # Check for loop in deps tree.
pascal@122 704 check_for_deps_loop()
pascal@122 705 {
pascal@122 706 local list
pascal@122 707 local pkg
pascal@122 708 local deps
pascal@122 709 pkg=$1
pascal@122 710 shift
pascal@122 711 [ -n "$1" ] || return
pascal@122 712 list=""
pascal@122 713 # Filter out already processed deps
pascal@122 714 for i in $@; do
pascal@122 715 case " $ALL_DEPS" in
pascal@122 716 *\ $i\ *);;
pascal@122 717 *) list="$list $i";;
pascal@122 718 esac
pascal@122 719 done
pascal@122 720 ALL_DEPS="$ALL_DEPS$list "
pascal@122 721 for i in $list; do
pascal@122 722 [ -f $i/receipt ] || continue
pascal@122 723 deps="$(DEPENDS=""; . $i/receipt; echo $DEPENDS)"
pascal@122 724 case " $deps " in
pascal@122 725 *\ $pkg\ *) echo -e "$MSG $i"; MSG="";;
pascal@122 726 *) check_for_deps_loop $pkg $deps;;
pascal@122 727 esac
pascal@122 728 done
pascal@122 729 }
pascal@122 730
pankso@6 731 # Check for missing deps listed in a receipt packages.
pankso@6 732 check_for_deps()
pankso@6 733 {
pascal@116 734 local saved;
pascal@116 735 saved=$PACKAGE
pascal@116 736 mkdir -p $TMP_DIR
gokhlayeh@408 737 { cd $TMP_DIR ; cpio --quiet -i receipt > /dev/null 2>&1; } < $PACKAGE_FILE
pascal@116 738 . $TMP_DIR/receipt
pascal@116 739 PACKAGE=$saved
pascal@116 740 rm -rf $TMP_DIR
al@633 741
al@633 742 num=0
pascal@164 743 for pkgorg in $DEPENDS
pankso@6 744 do
pascal@164 745 i=$(equivalent_pkg $pkgorg $1)
pascal@120 746 if [ ! -d "$1$INSTALLED/$i" ]; then
pankso@6 747 MISSING_PACKAGE=$i
al@633 748 num=$(($num+1))
pascal@122 749 elif [ ! -f "$1$INSTALLED/$i/receipt" ]; then
pankso@344 750 eval_gettext "WARNING Dependency loop between \$PACKAGE and \$i."; echo
pankso@6 751 fi
pankso@6 752 done
al@633 753
pankso@6 754 if [ ! "$MISSING_PACKAGE" = "" ]; then
al@633 755 title "$(eval_gettext 'Tracking dependencies for: $PACKAGE')"
pascal@164 756 for pkgorg in $DEPENDS
pankso@6 757 do
pascal@164 758 i=$(equivalent_pkg $pkgorg $1)
pascal@120 759 if [ ! -d "$1$INSTALLED/$i" ]; then
pankso@6 760 MISSING_PACKAGE=$i
pankso@344 761 eval_gettext "Missing: \$MISSING_PACKAGE"; echo
pankso@6 762 fi
pankso@6 763 done
slaxemulator@475 764 separator
al@603 765 eval_ngettext \
al@633 766 "\$num missing package to install." \
al@633 767 "\$num missing packages to install." $num; echo
pankso@6 768 fi
pankso@6 769 }
pankso@6 770
pankso@598 771 # Install all missing deps. Auto install or ask user then install all missing
pankso@308 772 # deps from local dir, cdrom, media or from the mirror. In case we want to
pankso@6 773 # install packages from local, we need a packages.list to find the version.
pankso@6 774 install_deps()
pankso@6 775 {
pascal@120 776 local root
pascal@120 777 root=""
pascal@121 778 [ -n "$1" ] && root="--root=$1"
pankso@308 779 if [ "$AUTO_INSTALL_DEPS" == "yes" ]; then
al@603 780 answer=0
pankso@308 781 else
pankso@600 782 newline
al@603 783 gettext "Install all missing dependencies" && confirm
al@603 784 answer=$?
pankso@600 785 newline
pankso@308 786 fi
al@603 787 if [ $answer = 0 ]; then
pascal@164 788 for pkgorg in $DEPENDS
pankso@6 789 do
pascal@164 790 pkg=$(equivalent_pkg $pkgorg $1)
pascal@120 791 if [ ! -d "$1$INSTALLED/$pkg" ]; then
pascal@121 792 local list
pascal@121 793 list="$INSTALL_LIST"
pascal@121 794 [ -n "$list" ] || list="$TOP_DIR/packages.list"
pankso@6 795 # We can install packages from a local dir by greping
pankso@6 796 # the TAZPKG_BASENAME in the local packages.list.
pascal@153 797 found=0
pascal@121 798 if [ -f "$list" ]; then
al@603 799 eval_gettext "Checking if \$pkg exists in local list..."; echo
pascal@110 800 mkdir $TMP_DIR
pascal@110 801 for i in $pkg-*.tazpkg; do
pascal@124 802 [ -f $i ] || continue
gokhlayeh@408 803 { cd $TMP_DIR ; cpio --quiet -i receipt > /dev/null 2>&1; } < $i
pascal@153 804 [ "$(. $TMP_DIR/receipt; echo $PACKAGE)" = "$pkg" ] || continue
pascal@121 805 if grep -q ^$(package_fullname_in_dir $TMP_DIR).tazpkg$ $list
pascal@110 806 then
pascal@153 807 found=1
pascal@121 808 tazpkg install $i $root --list=$list
pascal@110 809 break
pascal@110 810 fi
pascal@110 811 done
pascal@110 812 rm -rf $TMP_DIR
pascal@153 813 fi
pankso@6 814 # Install deps from the mirror.
pascal@153 815 if [ $found -eq 0 ]; then
pascal@121 816 if [ ! -f "$LOCALSTATE/packages.list" ]; then
pankso@6 817 tazpkg recharge
pankso@6 818 fi
pascal@120 819 tazpkg get-install $pkg $root
pankso@6 820 fi
pankso@6 821 fi
pankso@6 822 done
pankso@6 823 else
pankso@600 824 newline
pankso@344 825 eval_gettext \
al@603 826 "Leaving dependencies for \$PACKAGE unresolved.
al@603 827 The package is installed but will probably not work."; echo
pankso@600 828 newline
pankso@6 829 fi
pankso@6 830 }
pankso@6 831
pankso@279 832 # Search pattern in installed packages.
pankso@54 833 search_in_installed_packages()
pankso@54 834 {
pankso@344 835 gettext "Installed packages"; echo
slaxemulator@475 836 separator
erjo@62 837 list=`ls -1 $INSTALLED | grep -i "$PATTERN"`
al@633 838 num=0
pankso@54 839 for pkg in $list
pankso@54 840 do
pascal@114 841 EXTRAVERSION=""
pascal@122 842 [ -f $INSTALLED/$pkg/receipt ] || continue
pankso@54 843 . $INSTALLED/$pkg/receipt
al@603 844 emsg "$PACKAGE<i 24> $VERSION$EXTRAVERSION<i 42> $(gettext $CATEGORY)"
al@633 845 num=$(($num+1))
pankso@54 846 done
pankso@54 847 # Set correct ending messages.
al@633 848 if [ x$num == x ]; then
al@633 849 eval_gettext "No installed packages found for: \$PATTERN"; echo
pankso@600 850 newline
pankso@54 851 else
al@603 852 footer "$(eval_ngettext \
al@633 853 '$num installed package found for: $PATTERN' \
al@633 854 '$num installed packages found for: $PATTERN' $num)"
pankso@54 855 fi
pankso@54 856 }
pankso@54 857
pankso@279 858 # Search in packages.list for available pkgs.
pankso@54 859 search_in_packages_list()
pankso@54 860 {
pankso@344 861 gettext "Available packages name-version"; echo
slaxemulator@475 862 separator
al@633 863 num=0
pascal@187 864 for i in $LOCALSTATE/packages.list $LOCALSTATE/undigest/*/packages.list; do
pascal@187 865 grep -is "$PATTERN" $i
al@633 866 num=$(($num + `grep -is "$PATTERN" $i | wc -l`))
pascal@187 867 done
pascal@187 868 if [ ! -f "$LOCALSTATE/packages.list" ]; then
pankso@600 869 newline
pankso@344 870 gettext \
pankso@344 871 "No 'packages.list' found to check for mirrored packages. For more results,
pankso@344 872 please run 'tazpkg recharge' once as root before searching."; echo
pankso@600 873 newline
pankso@54 874 fi
al@633 875 if [ "$num" = "0" ]; then
al@633 876 eval_gettext "No available packages found for: \$PATTERN"; echo
pankso@600 877 newline
pankso@54 878 else
al@603 879 footer "$(eval_ngettext \
al@633 880 '$num available package found for: $PATTERN' \
al@633 881 '$num available packages found for: $PATTERN' $packages)"
pankso@54 882 fi
pankso@54 883 }
pankso@54 884
pankso@279 885 # search --mirror: Search in packages.txt for available pkgs and give more
pankso@279 886 # info than --list or default.
pankso@54 887 search_in_packages_txt()
pankso@54 888 {
pankso@344 889 gettext "Matching packages name with version and desc"; echo
slaxemulator@475 890 separator
al@633 891 num=0
pascal@187 892 for i in $LOCALSTATE/packages.txt $LOCALSTATE/undigest/*/packages.txt; do
pascal@187 893 grep -is -A 2 "^$PATTERN" $i
al@633 894 num=$(($num + `grep -is "^$PATTERN" $i | wc -l`))
pascal@187 895 done
pascal@187 896 if [ ! -f "$LOCALSTATE/packages.txt" ]; then
pankso@600 897 newline
pankso@344 898 gettext \
pankso@344 899 "No 'packages.txt' found to check for mirrored packages. For more results,
pankso@344 900 please run 'tazpkg recharge' once as root before searching."; echo
pankso@600 901 newline
pankso@54 902 fi
al@633 903 if [ "$num" = "0" ]; then
al@633 904 eval_gettext "No available packages found for: \$PATTERN"; echo
pankso@600 905 newline
pankso@54 906 else
al@603 907 footer "$(eval_ngettext \
al@633 908 '$num available package found for: $PATTERN' \
al@633 909 '$num available packages found for: $PATTERN' $packages)"
pankso@54 910 fi
pankso@54 911 }
pankso@54 912
pascal@74 913 # Install package-list from a flavor
pascal@74 914 install_flavor()
pascal@74 915 {
al@603 916 check_root $@
pankso@598 917
gokhlayeh@386 918 # Get repositories priority list.
gokhlayeh@386 919 look_for_priority
pankso@598 920
pascal@74 921 FLAVOR=$1
pascal@74 922 ARG=$2
pascal@74 923 mkdir -p $TMP_DIR
pascal@74 924 [ -f $FLAVOR.flavor ] && cp $FLAVOR.flavor $TMP_DIR
pascal@74 925 cd $TMP_DIR
pascal@74 926 if [ -f $FLAVOR.flavor ] || download $FLAVOR.flavor; then
pascal@643 927 zcat < $FLAVOR.flavor | cpio --quiet -i >/dev/null
pascal@74 928 while read file; do
pascal@74 929 for pkg in $(ls -d $INSTALLED/${file%%-*}*); do
pascal@122 930 [ -f $pkg/receipt ] || continue
pascal@114 931 EXTRAVERSION=""
pascal@74 932 . $pkg/receipt
pascal@114 933 [ "$PACKAGE-$VERSION$EXTRAVERSION" = "$file" ] && break
pascal@74 934 done
pascal@114 935 [ "$PACKAGE-$VERSION$EXTRAVERSION" = "$file" ] && continue
pascal@74 936 cd $CACHE_DIR
pascal@74 937 download $file.tazpkg
pascal@74 938 cd $TMP_DIR
pascal@74 939 tazpkg install $CACHE_DIR/$file.tazpkg --forced
pascal@74 940 done < $FLAVOR.pkglist
pascal@75 941 [ -f $FLAVOR.nonfree ] && while read pkg; do
pascal@75 942 [ -d $INSTALLED/$pkg ] || continue
pascal@75 943 [ -d $INSTALLED/get-$pkg ] && tazpkg get-install get-$pkg
pascal@75 944 get-$pkg
pascal@75 945 done < $FLAVOR.nonfree
pascal@74 946 [ "$ARG" == "--purge" ] && for pkg in $(ls $INSTALLED); do
pascal@122 947 [ -f $INSTALLED/$pkg/receipt ] || continue
pascal@114 948 EXTRAVERSION=""
pascal@74 949 . $INSTALLED/$pkg/receipt
pascal@114 950 grep -q ^$PACKAGE-$VERSION$EXTRAVERSION$ $FLAVOR.pkglist && continue
pascal@75 951 grep -qs ^$PACKAGE$ $FLAVOR.nonfree && continue
pascal@74 952 tazpkg remove $PACKAGE
pascal@74 953 done
pascal@74 954 else
paul@437 955 eval_gettext "Can't find flavor \$FLAVOR. Abort."; echo
pascal@74 956 fi
pascal@74 957 cd $TOP_DIR
pascal@74 958 rm -rf $TMP_DIR
pascal@74 959 }
pascal@74 960
pascal@187 961 # Update mirror urls
pascal@187 962 setup_mirror()
pascal@187 963 {
pascal@187 964 # Backup old list.
pascal@187 965 if [ -f "$1/mirror" ]; then
pascal@187 966 cp -f $1/mirror $1/mirror.bak
pascal@187 967 fi
al@603 968 title 'Current mirror(s)'
pascal@187 969 echo " `cat $1/mirror 2> /dev/null`"
pankso@344 970 gettext \
pankso@344 971 "Please enter URL of the new mirror (http, ftp or local path). You must specify
pankso@344 972 the complete address to the directory of the packages and packages.list file."; echo
pankso@600 973 newline
al@603 974 gettext "New mirror(s) URL: "
pascal@187 975 NEW_MIRROR_URL=$2
pascal@187 976 if [ -n "$NEW_MIRROR_URL" ]; then
pascal@187 977 echo $NEW_MIRROR_URL
pascal@187 978 else
pascal@187 979 read NEW_MIRROR_URL
pascal@187 980 fi
pascal@187 981 if [ "$NEW_MIRROR_URL" = "" ]; then
pankso@344 982 gettext "Nothing has been changed."; echo
pascal@187 983 else
al@603 984 eval_gettext "Setting mirror(s) to: \$NEW_MIRROR_URL"; echo
pascal@187 985 rm -f $1/mirror
pascal@187 986 for i in $NEW_MIRROR_URL; do
pascal@187 987 echo "$i" >> $1/mirror
pankso@279 988 done
pascal@187 989 fi
pankso@600 990 newline
pascal@187 991 }
pascal@187 992
paul@247 993 # recursive dependencies scan
pascal@205 994 dep_scan()
pascal@205 995 {
pascal@205 996 for i in $1; do
pascal@205 997 case " $ALL_DEPS " in
pascal@205 998 *\ $i\ *) continue;;
pascal@205 999 esac
pascal@205 1000 ALL_DEPS="$ALL_DEPS $i"
gokhlayeh@409 1001 [ -n "$2" ] && echo "$2$i ($(fgrep -A 3 $i $LOCALSTATE/packages.txt \
pascal@303 1002 | tail -1 | sed 's/.*(\([^ ]*\).*/\1/'))"
pascal@205 1003 [ -f $i/receipt ] || continue
pascal@205 1004 DEPENDS=""
pascal@205 1005 . $i/receipt
pascal@205 1006 [ -n "$DEPENDS" ] && dep_scan "$DEPENDS" "$2 "
pascal@205 1007 done
pascal@205 1008 }
pascal@205 1009
paul@247 1010 # recursive reverse dependencies scan
pascal@205 1011 rdep_scan()
pascal@205 1012 {
pascal@260 1013 SEARCH=$1
pascal@260 1014
pascal@260 1015 for i in * ; do
pascal@260 1016 DEPENDS=""
pascal@260 1017 . $i/receipt
pascal@260 1018 echo "$i $(echo $DEPENDS)"
pascal@623 1019 done | busybox awk -v search=$SEARCH '
pascal@260 1020 function show_deps(deps, all_deps, pkg, space)
pascal@260 1021 {
pascal@260 1022 if (all_deps[pkg] == 1) return
pascal@260 1023 all_deps[pkg] = 1
pascal@304 1024 if (space != "") printf "%s %s\n",space,pkg
pascal@299 1025 for (i = 1, n = split(deps[pkg], mydeps, " "); i <= n; i++) {
pascal@304 1026 show_deps(deps, all_deps, mydeps[i],"==" space)
pascal@260 1027 }
pascal@260 1028 }
pascal@260 1029
pascal@260 1030 {
pascal@260 1031 all_deps[$1] = 0
pascal@260 1032 for (i = 2; i <= NF; i++)
pascal@260 1033 deps[$i] = deps[$i] " " $1
pascal@260 1034 }
pascal@260 1035
pascal@260 1036 END {
pascal@260 1037 show_deps(deps, all_deps, search, "")
pascal@260 1038 }
pascal@304 1039 ' | while read spc pkg; do
pascal@304 1040 echo -n $spc | sed 's/=/ /g'
pascal@304 1041 echo -n $pkg
pascal@304 1042 echo -n ' ('
gokhlayeh@409 1043 fgrep -A 3 $pkg $LOCALSTATE/packages.txt | tail -1 | \
pascal@304 1044 sed 's/.*(\([^ ]*\).*/\1)/'
pascal@304 1045 done
pascal@205 1046 }
pascal@205 1047
pascal@268 1048 # Check for ELF file
pascal@268 1049 is_elf()
pascal@268 1050 {
pascal@268 1051 [ "$(dd if=$1 bs=1 skip=1 count=3 2> /dev/null)" = "ELF" ]
pascal@268 1052 }
pascal@268 1053
pascal@268 1054 # Print shared library dependencies
pascal@268 1055 ldd()
pascal@268 1056 {
pascal@268 1057 LD_TRACE_LOADED_OBJECTS=1 /lib/ld*.so $1 2> /dev/null
pascal@268 1058 }
pascal@268 1059
pascal@268 1060 # search dependencies for files in $TMP_DIR/$file/fs
pascal@268 1061 find_depends()
pascal@268 1062 {
pascal@268 1063 DEFAULT_DEPENDS="glibc-base gcc-lib-base"
pascal@268 1064
pascal@515 1065 [ -n "$TMPLOCALSTATE" ] || TMPLOCALSTATE=$LOCALSTATE
pascal@515 1066 [ -f $TMPLOCALSTATE/files.list.lzma ] || tazpkg recharge > /dev/null
pascal@515 1067 for i in $TMPLOCALSTATE/files.list.lzma \
pascal@515 1068 $TMPLOCALSTATE/undigest/*/files.list.lzma ; do
pascal@268 1069 [ -f $i ] && lzma d $i -so >> $TMP_DIR/files.list
pascal@268 1070 done
pascal@295 1071 find $TMP_DIR/$file/fs -type f | while read chkfile ; do
pascal@295 1072 is_elf $chkfile || continue
pascal@295 1073 case "$chkfile" in
pascal@268 1074 *.o|*.ko|*.ko.gz) continue;;
pascal@268 1075 esac
pascal@295 1076 ldd $chkfile | while read lib rem; do
pascal@268 1077 case "$lib" in
pascal@268 1078 statically|linux-gate.so*|ld-*.so|*/ld-*.so)
pascal@268 1079 continue;;
pascal@268 1080 esac
pascal@295 1081 find $TMP_DIR/$file/fs | grep -q /$lib$ && continue
gokhlayeh@409 1082 for dep in $(fgrep $lib files.list | cut -d: -f1); do
pascal@295 1083 case " $DEFAULT_DEPENDS " in
pascal@268 1084 *\ $dep\ *) continue 2;;
pascal@268 1085 esac
pascal@295 1086 grep -qs "^$dep$" $TMP_DIR/depends && continue 2
pascal@268 1087 done
pascal@268 1088 if [ -n "$dep" ]; then
pascal@295 1089 echo "$dep" >> $TMP_DIR/depends
pascal@268 1090 else
pascal@295 1091 grep -qs ^$lib$ $TMP_DIR/unresolved ||
pascal@270 1092 echo "$lib" >> $TMP_DIR/unresolved
pascal@268 1093 fi
pascal@268 1094 done
pascal@268 1095 done
pascal@295 1096 spc=""
pascal@442 1097 cat $TMP_DIR/depends 2> /dev/null | sort | uniq | while read file; do
pascal@295 1098 echo -n "$spc$file"
pascal@295 1099 spc=" "
pascal@295 1100 done
pascal@268 1101 }
pascal@268 1102
pascal@270 1103 show_unresolved_lib()
pascal@270 1104 {
pascal@270 1105 if [ -s $TMP_DIR/unresolved ]; then
gokhlayeh@388 1106 echo -e "BUGS=\"`gettext \"No dependency for\"`" >> $1
pascal@295 1107 cat $TMP_DIR/unresolved | sort | uniq | while read file; do
gokhlayeh@388 1108 eval_gettext "WARNING: unknown dependency for \$lib"; echo
pascal@295 1109 echo -n " $file" >> $1
pascal@270 1110 done
pascal@295 1111 echo "\"" >> $1
pascal@270 1112 fi
pascal@270 1113 }
pascal@270 1114
pascal@296 1115 # convert a .ipk package to .tazpkg
pascal@296 1116 convert_ipk()
pascal@296 1117 {
pascal@296 1118 mkdir -p $TMP_DIR
pascal@296 1119 tar xOzf $PACKAGE_FILE ./control.tar.gz | tar xzf - -C $TMP_DIR
pascal@296 1120 package="$(grep ^Package $TMP_DIR/control | sed 's/.*: //')"
pascal@296 1121 version="$(grep ^Version $TMP_DIR/control | sed 's/.*: //')"
pascal@296 1122 maintainer="$(grep ^Maintainer $TMP_DIR/control | sed 's/.*: //')"
pascal@296 1123 target="$(grep ^Architecture $TMP_DIR/control | sed 's/.*: //')"
pascal@296 1124 descrip="$(grep ^Description $TMP_DIR/control | sed 's/.*: //')"
pascal@296 1125 url="http://openwrt.org/"
pascal@296 1126 case "$target" in
pascal@296 1127 i386|all)
pascal@296 1128 file=$package-$version
pascal@296 1129 mkdir -p $TMP_DIR/$file/fs
pascal@296 1130 tar xOzf $PACKAGE_FILE ./data.tar.gz | \
pascal@296 1131 tar xzf - -C $TMP_DIR/$file/fs
pascal@296 1132 cd $TMP_DIR
pascal@296 1133 cat > $file/receipt <<EOT
pascal@296 1134 # SliTaz package receipt.
pascal@296 1135 # generated by tazpkg from package $(basename $PACKAGE_FILE)
pascal@296 1136 PACKAGE="$package"
pascal@296 1137 VERSION="$version"
pascal@296 1138 CATEGORY="misc"
pascal@296 1139 SHORT_DESC="$descrip"
pascal@296 1140 WEB_SITE="$url"
pascal@296 1141 MAINTAINER="$maintainer"
pascal@296 1142 DEPENDS="$(find_depends)"
pascal@296 1143 EOT
pascal@296 1144 [ -s conffiles ] && cat >> $file/receipt <<EOT
pascal@296 1145 CONFIG_FILES="$(cat conffiles)"
pascal@296 1146 EOT
pascal@296 1147 show_unresolved_lib $file/receipt
pascal@296 1148 while read script func; do
pascal@296 1149 [ -s $script ] && cat >> $file/receipt <<EOT
pascal@296 1150
pascal@296 1151 $func()
pascal@296 1152 {
pascal@296 1153 $(cat $script)
pascal@296 1154 }
pascal@296 1155 EOT
pascal@296 1156 done <<EOT
pascal@296 1157 preinst pre_install
pascal@296 1158 postinst post_install
pascal@296 1159 prerm pre_remove
pascal@296 1160 postrm post_remove
pascal@296 1161 EOT
pascal@296 1162 awk '
pascal@296 1163 {
pascal@296 1164 if (/^ / && show) print substr($0,2);
pascal@296 1165 else show=0;
pascal@296 1166 if (/^Description/) show=1;
pascal@296 1167 }' < $TMP_DIR/control > $file/description.txt
pascal@296 1168 sed -i 's/^\.$//' $file/description.txt
pascal@296 1169 [ -s $file/description.txt ] || rm -f $file/description.txt
pascal@296 1170 tazpkg pack $file
pascal@296 1171 cd $TOP_DIR
pascal@296 1172 mv $TMP_DIR/$file.tazpkg .
pascal@296 1173 ;;
pascal@296 1174 *)
al@603 1175 eval_gettext "Invalid target: \$target (expected i386)"; echo
pascal@296 1176 ;;
pascal@296 1177 esac
pascal@296 1178 rm -rf $TMP_DIR
pascal@296 1179 }
pascal@296 1180
pascal@638 1181 # convert a .pkg.tar.gz/.pkg.tar.xz/.apk package to .tazpkg
pascal@288 1182 convert_arch()
pascal@288 1183 {
pascal@288 1184 mkdir -p $TMP_DIR/fs
pascal@638 1185 busybox tar xf $PACKAGE_FILE -C $TMP_DIR/fs
pascal@288 1186 if [ -f $TMP_DIR/fs/.PKGINFO ]; then
pascal@288 1187 cd $TMP_DIR
pascal@288 1188 package="$(grep ^pkgname fs/.PKGINFO | sed 's/.*= //')"
pascal@288 1189 version="$(grep ^pkgver fs/.PKGINFO | sed 's/.*= //')"
pascal@288 1190 descrip="$(grep ^pkgdesc fs/.PKGINFO | sed 's/.*= //')"
pascal@288 1191 url="$(grep ^url fs/.PKGINFO | sed 's/.*= //')"
pascal@288 1192 maintainer="$(grep ^packager fs/.PKGINFO | sed 's/.*= //')"
pascal@288 1193 file=$package-$version
pascal@288 1194 mkdir $file
pascal@288 1195 mv fs $file
pascal@288 1196 cat > $file/receipt <<EOT
pascal@288 1197 # SliTaz package receipt.
pascal@288 1198 # generated by tazpkg from Archlinux package $(basename $PACKAGE_FILE)
pascal@288 1199 PACKAGE="$package"
pascal@288 1200 VERSION="$version"
pascal@288 1201 CATEGORY="misc"
pascal@288 1202 SHORT_DESC="$descrip"
pascal@288 1203 WEB_SITE="$url"
pascal@288 1204 MAINTAINER="$maintainer"
pascal@288 1205 DEPENDS="$(find_depends)"
pascal@288 1206 EOT
pascal@288 1207 show_unresolved_lib $file/receipt
pascal@288 1208 rm -f $file/fs/.[A-Z]*
pascal@288 1209 tazpkg pack $file
pascal@288 1210 mv $file.tazpkg $TOP_DIR
pascal@288 1211 else
al@603 1212 eval_gettext "\$PACKAGE_FILE does not look like an Archlinux/Alpine package!"; echo
pascal@288 1213 fi
pascal@288 1214 cd $TOP_DIR
pascal@288 1215 rm -rf $TMP_DIR
pascal@288 1216 }
pascal@288 1217
pascal@637 1218 # get package and version from PACKAGE_FILE
pascal@637 1219 parse_pkgname()
pascal@636 1220 {
pascal@639 1221 package=$(basename ${2:-$PACKAGE_FILE} $1)
pascal@636 1222 IFS='-'
pascal@636 1223 set -- $package
pascal@636 1224 unset IFS
pascal@636 1225 package=$1
pascal@636 1226 version=$2
pascal@636 1227 if [ -z "$version" ]; then
pascal@637 1228 package=${1%%[0-9\.]*}
pascal@637 1229 version=${1#$package}
pascal@636 1230 fi
pascal@639 1231 file="$package-$version"
pascal@639 1232 mkdir $file
pascal@637 1233 }
pascal@637 1234
pascal@637 1235 finish_convert_puppy()
pascal@637 1236 {
pascal@637 1237 rm -f fs/*.specs
pascal@636 1238 mv fs $file
pascal@636 1239 cat > $file/receipt <<EOT
pascal@636 1240 # SliTaz package receipt.
pascal@636 1241 # generated by tazpkg from puppy package $(basename $PACKAGE_FILE)
pascal@636 1242 PACKAGE="$package"
pascal@636 1243 VERSION="$version"
pascal@636 1244 CATEGORY="misc"
pascal@637 1245 SHORT_DESC="$desc"
pascal@636 1246 WEB_SITE="http://puppylinux.org/"
pascal@636 1247 MAINTAINER="nobody@slitaz.org"
pascal@636 1248 DEPENDS="$(find_depends)"
pascal@636 1249 EOT
pascal@636 1250 show_unresolved_lib $file/receipt
pascal@636 1251 for i in install uninstall ; do
pascal@636 1252 [ -f $file/fs/p$i.sh ] && cat >> $file/receipt <<EOM
pascal@636 1253
pascal@636 1254 post_$i()
pascal@636 1255 {
pascal@636 1256 chroot \$1/ sh - << EOT
pascal@636 1257 cd /
pascal@636 1258 $(cat $file/fs/p$i.sh | sed -e 's/\\/\\\\/g' | sed -e 's/\$/\\$/g' ; rm -f $file/fs/p$i.sh)
pascal@636 1259 EOT
pascal@636 1260 }
pascal@636 1261 EOM
pascal@636 1262 done
pascal@636 1263 sed -i 's/post_uninstall/post_remove/' $file/receipt
pascal@636 1264 tazpkg pack $file
pascal@636 1265 mv $file.tazpkg $TOP_DIR
pascal@636 1266 cd $TOP_DIR
pascal@636 1267 rm -rf $TMP_DIR
pascal@636 1268 }
pascal@636 1269
pascal@637 1270 # convert a .sfs package to .tazpkg
pascal@637 1271 convert_sfs()
pascal@637 1272 {
pascal@637 1273 [ -n "$(which unsquashfs)" ] || tazpkg get-install squashfs
pascal@637 1274 if ! unsquashfs -l $PACKAGE_FILE | grep -q squashfs-root/pet.specs$ ; then
pascal@637 1275 eval_gettext "\$PACKAGE_FILE does not look like a Puppy package!"; echo
pascal@637 1276 return 1
pascal@637 1277 fi
pascal@637 1278 mkdir -p $TMP_DIR
pascal@637 1279 cd $TMP_DIR
pascal@637 1280 parse_pkgname .sfs
pascal@637 1281 unsquashfs $PACKAGE_FILE
pascal@637 1282 mv squashfs-root fs
pascal@637 1283 set -- $(cat fs/pet.specs)
pascal@637 1284 desc="$10"
pascal@637 1285 finish_convert_puppy
pascal@637 1286 }
pascal@637 1287
pascal@637 1288 # convert a .pet package to .tazpkg
pascal@637 1289 convert_pet()
pascal@637 1290 {
pascal@637 1291 mkdir -p $TMP_DIR
pascal@637 1292 cd $TMP_DIR
pascal@637 1293 parse_pkgname .pet
pascal@637 1294 tar xzf $PACKAGE_FILE 2> /dev/null
pascal@637 1295 . $package*/*.specs
pascal@637 1296 desc="$PETMENUDESCR"
pascal@637 1297 mv $package*/ fs
pascal@637 1298 finish_convert_puppy
pascal@637 1299 }
pascal@637 1300
pascal@639 1301 # convert a .sb package to .tazpkg
pascal@639 1302 convert_sb()
pascal@639 1303 {
pascal@639 1304 [ -n "$(which unsquashfs)" ] || tazpkg get-install squashfs
pascal@639 1305 if ! unsquashfs -l $PACKAGE_FILE | grep -q squashfs-root/var/log/removed_scripts ; then
pascal@639 1306 eval_gettext "\$PACKAGE_FILE does not look like a Slax package!"; echo
pascal@639 1307 return 1
pascal@639 1308 fi
pascal@639 1309 mkdir -p $TMP_DIR
pascal@639 1310 cd $TMP_DIR
pascal@639 1311 unsquashfs $PACKAGE_FILE
pascal@639 1312 mv squashfs-root fs
pascal@639 1313 parse_pkgname '' $(cat fs/var/log/packages/* | sed '/PACKAGE NAME:/!d;s/.*: *//')
pascal@639 1314 desc="$(cat fs/var/log/packages/* | sed '/^PACKAGE DESCRIPTION:/,$!d;N;s/.*: //;q')"
pascal@639 1315 cat fs/var/log/packages/* | sed '/^PACKAGE DESCRIPTION:/,/FILE LIST/!d;s/.*://;/^$/d' > $file/description.txt
pascal@639 1316 mv fs $file
pascal@639 1317 cat > $file/receipt <<EOT
pascal@639 1318 # SliTaz package receipt.
pascal@639 1319 # generated by tazpkg from slax package $(basename $PACKAGE_FILE)
pascal@639 1320 PACKAGE="$package"
pascal@639 1321 VERSION="$version"
pascal@639 1322 CATEGORY="misc"
pascal@639 1323 SHORT_DESC="$desc"
pascal@639 1324 WEB_SITE="http://www.slax.org/"
pascal@639 1325 MAINTAINER="nobody@slitaz.org"
pascal@639 1326 DEPENDS="$(find_depends)"
pascal@639 1327 EOT
pascal@639 1328 show_unresolved_lib $file/receipt
pascal@639 1329 [ -f $file/fs/var/log/scripts/$package* ] && cat >> $file/receipt <<EOM
pascal@639 1330
pascal@639 1331 post_install()
pascal@639 1332 {
pascal@639 1333 chroot \$1/ sh - << EOT
pascal@639 1334 cd /
pascal@639 1335 $(cat $file/fs/var/log/scripts/$package* | sed -e 's/\\/\\\\/g' | sed -e 's/\$/\\$/g')
pascal@639 1336 EOT
pascal@639 1337 }
pascal@639 1338 EOM
pascal@639 1339 tazpkg pack $file
pascal@639 1340 mv $file.tazpkg $TOP_DIR
pascal@639 1341 cd $TOP_DIR
pascal@639 1342 rm -rf $TMP_DIR
pascal@639 1343 }
pascal@639 1344
pascal@275 1345 # convert a .tgz package to .tazpkg
pascal@275 1346 convert_tgz()
pascal@275 1347 {
pascal@637 1348 parse_pkgname
pascal@275 1349 mkdir -p $TMP_DIR/$file/fs
pascal@275 1350 tar xzf $PACKAGE_FILE -C $TMP_DIR/$file/fs
pascal@275 1351 cd $TMP_DIR
pascal@275 1352 if [ -d $file/fs/install ]; then
pascal@275 1353 descrip=$(grep ^$package $file/fs/install/slack-desc | \
pascal@275 1354 head -1 | sed 's/.*(\(.*\)).*/\1/')
pascal@275 1355 cat > $file/receipt <<EOT
pascal@275 1356 # SliTaz package receipt.
pascal@275 1357 # generated by tazpkg from slackware package $(basename $PACKAGE_FILE)
pascal@275 1358 PACKAGE="$package"
pascal@275 1359 VERSION="$version"
pascal@275 1360 CATEGORY="misc"
pascal@275 1361 SHORT_DESC="$descrip"
pascal@275 1362 WEB_SITE="http://www.slackware.com/packages/"
pankso@279 1363 MAINTAINER="nobody@slitaz.org"
pascal@275 1364 DEPENDS="$(find_depends)"
pascal@275 1365 EOT
pascal@275 1366 show_unresolved_lib $file/receipt
pascal@275 1367 [ -f $file/fs/install/doinst.sh ] && cat >> $file/receipt <<EOM
pascal@275 1368
pascal@275 1369 post_install()
pascal@275 1370 {
pascal@275 1371 chroot \$1/ sh - << EOT
pascal@275 1372 cd /
pascal@278 1373 $(cat $file/fs/install/doinst.sh | sed -e 's/\\/\\\\/g' | sed -e 's/\$/\\$/g')
pascal@275 1374 EOT
pascal@275 1375 }
pascal@275 1376 EOM
pascal@275 1377 grep ^$package $file/fs/install/slack-desc | \
pascal@275 1378 sed "s/^$package://" > $file/description.txt
pascal@296 1379 [ -s $file/description.txt ] || rm -f $file/description.txt
pascal@275 1380 rm -rf $file/fs/install
pascal@275 1381 tazpkg pack $file
pascal@275 1382 mv $file.tazpkg $TOP_DIR
pascal@275 1383 else
al@603 1384 eval_gettext "\$PACKAGE_FILE does not look like a Slackware package!"; echo
pascal@275 1385 fi
pascal@275 1386 cd $TOP_DIR
pascal@275 1387 rm -rf $TMP_DIR
pascal@275 1388 }
pascal@275 1389
pascal@262 1390 # convert a .deb package to .tazpkg
pascal@262 1391 convert_deb()
pascal@262 1392 {
pascal@262 1393 mkdir -p $TMP_DIR
pascal@263 1394 dpkg-deb -e $PACKAGE_FILE $TMP_DIR
pascal@442 1395 package=$(grep '^ *Package:' $TMP_DIR/control)
pascal@262 1396 package=$(echo ${package##*:})
pascal@442 1397 version=$(grep '^ *Version:' $TMP_DIR/control)
pascal@262 1398 version=$(echo ${version##*:})
pascal@442 1399 descrip=$(grep '^ *Description:' $TMP_DIR/control)
pascal@262 1400 descrip=$(echo ${descrip##*:})
pascal@296 1401 target="$(grep ^Architecture $TMP_DIR/control | sed 's/.*: //')"
pascal@296 1402 case "$target" in
pascal@296 1403 i386|all)
pascal@296 1404 file="$package-$version"
pascal@296 1405 mkdir -p $TMP_DIR/$file/fs/
pascal@296 1406 dpkg-deb -x $PACKAGE_FILE $TMP_DIR/$file/fs
pascal@296 1407 cd $TMP_DIR
pascal@296 1408 cat > $file/receipt <<EOT
pascal@262 1409 # SliTaz package receipt.
pascal@263 1410 # generated by tazpkg from debian package $(basename $PACKAGE_FILE)
pascal@262 1411 PACKAGE="$package"
pascal@262 1412 VERSION="$version"
pascal@262 1413 CATEGORY="misc"
pascal@262 1414 SHORT_DESC="$descrip"
pascal@262 1415 WEB_SITE="http://packages.debian.org/search?keywords=$package"
pankso@279 1416 MAINTAINER="nobody@slitaz.org"
pascal@262 1417 EOT
pascal@631 1418 LICENSE="$(grep /usr/share/common-licenses/ \
pascal@631 1419 $PACKAGE_FILE $TMP_DIR/$file/fs/usr/share/doc/*/copyright | \
pascal@631 1420 sed 's|.*common-licenses/\([-\.A-Za-z0-9]*\).*|\1|;s|[-\.]$||q')"
pascal@631 1421 [ -n "$LICENSE" ] && echo "LICENSE=\"$LICENSE\"" >> $file/receipt
pascal@631 1422 echo "DEPENDS=\"$(find_depends)\"" >> $file/receipt
pascal@296 1423 [ -s conffiles ] && cat >> $file/receipt <<EOT
pascal@296 1424 CONFIG_FILES="$(cat conffiles)"
pascal@296 1425 EOT
pascal@296 1426 show_unresolved_lib $file/receipt
pascal@296 1427 awk '
pascal@268 1428 {
pascal@268 1429 if (/^ / && show) print substr($0,2);
pascal@268 1430 else show=0;
pascal@268 1431 if (/^Description/) show=1;
pascal@268 1432 }' < $TMP_DIR/control > $file/description.txt
pascal@296 1433 sed -i 's/^\.$//' $file/description.txt
pascal@296 1434 [ -s $file/description.txt ] || rm -f $file/description.txt
pascal@296 1435 tazpkg pack $file
pascal@296 1436 mv $file.tazpkg $TOP_DIR
pascal@296 1437 ;;
pascal@296 1438 *)
al@603 1439 eval_gettext "Invalid target: \$target (expected i386)"; echo
pascal@296 1440 ;;
pascal@296 1441 esac
pascal@262 1442 cd $TOP_DIR
pascal@262 1443 rm -rf $TMP_DIR
pascal@262 1444 }
pascal@262 1445
pascal@264 1446 # convert a .rpm package to .tazpkg
pascal@264 1447 convert_rpm()
pascal@264 1448 {
pascal@264 1449 mkdir -p $TMP_DIR
pascal@264 1450 cp $PACKAGE_FILE $TMP_DIR
pascal@264 1451 PACKAGE_FILE=$TMP_DIR/$(basename $PACKAGE_FILE)
pascal@265 1452 rpm -qip $PACKAGE_FILE | awk -v pkg=$(basename $PACKAGE_FILE) '
pascal@264 1453 BEGIN {
pascal@264 1454 goturl=0;
al@603 1455 printf "# SliTaz package receipt.\n";
al@603 1456 printf "# generated by tazpkg from rpm package %s\n",pkg;
pascal@264 1457 }
pascal@264 1458 {
pascal@264 1459 if (/^Name/) { name=$3; printf "PACKAGE=\"%s\"\n",$3; }
pascal@264 1460 if (/^Version/) printf "VERSION=\"%s-",$3;
pascal@264 1461 if (/^Release/) printf "%s\"\n",$3;
pascal@264 1462 if (/^Summary/) printf "SHORT_DESC=\"%s\"\n",substr($0,15);
pascal@264 1463 if (/^URL/) { goturl=1; printf "WEB_SITE=\"%s\"\n",$3; }
pascal@264 1464 }
pascal@264 1465 END {
pankso@279 1466 if (goturl == 0)
pascal@264 1467 printf "WEB_SITE=\"http://rpmfind.net/linux/rpm2html/search.php?query=%s\"\n",name;
pascal@264 1468 printf "CATEGORY=\"misc\"\n";
pascal@264 1469 printf "MAINTAINER=\"nobody@slitaz.org\"\n";
pascal@264 1470 }
pascal@264 1471 ' > $TMP_DIR/receipt
pascal@264 1472 . $TMP_DIR/receipt
pascal@264 1473 file=$PACKAGE-$VERSION
pascal@264 1474 mkdir -p $TMP_DIR/$file/fs/
pascal@264 1475 mv $TMP_DIR/receipt $TMP_DIR/$file
pascal@264 1476 rpm -qip $PACKAGE_FILE | awk '
al@603 1477 BEGIN { show=0 }
pankso@279 1478 {
pascal@264 1479 if (show) print;
pascal@264 1480 if (/^Description/) show=1;
pascal@264 1481 }
pascal@264 1482 ' > $TMP_DIR/$file/description.txt
pascal@264 1483 cd $TMP_DIR/$file/fs/
gokhlayeh@383 1484 rpm2cpio $PACKAGE_FILE | cpio -idm --quiet
al@605 1485 # rpm2cpio can't extract some new RPMs
al@605 1486 if [ $? == 1 ]; then
al@605 1487 if [ ! -e $INSTALLED/p7zip-full/receipt ]; then
al@605 1488 boldify $(gettext "Unable to extract the RPM using standard tools (rpm2cpio).")
al@605 1489 gettext "Do you want to install 'p7zip-full' package" && confirm
al@605 1490 if [ $? = 0 ]; then
al@605 1491 tazpkg -gi p7zip-full
al@605 1492 else
al@605 1493 rm -rf $TMP_DIR
al@605 1494 exit 1
al@605 1495 fi
al@605 1496 fi
paul@607 1497 # we may already have 7z or may have just installed it in the step above
al@605 1498 if [ -e $INSTALLED/p7zip-full/receipt ]; then
al@605 1499 7z x -so $PACKAGE_FILE | cpio -idm --quiet
al@605 1500 fi
al@605 1501 fi
pascal@264 1502 cd ../..
pascal@270 1503 echo "DEPENDS=\"$(find_depends)\"" >> $TMP_DIR/$file/receipt
pascal@270 1504 show_unresolved_lib $TMP_DIR/$file/receipt
pascal@264 1505 tazpkg pack $file
pascal@264 1506 mv $file.tazpkg $TOP_DIR
pascal@264 1507 cd $TOP_DIR
pascal@264 1508 rm -rf $TMP_DIR
pascal@264 1509 }
pascal@264 1510
gokhlayeh@356 1511 update_desktop_database()
gokhlayeh@356 1512 {
gokhlayeh@382 1513 if [ -f $1/usr/bin/update-desktop-database ] && [ -n "$updatedesktopdb" ]; then
pascal@578 1514 chroot "$1/" /usr/bin/update-desktop-database /usr/share/applications 2>/dev/null
gokhlayeh@356 1515 fi
gokhlayeh@356 1516 }
gokhlayeh@356 1517
slaxemulator@369 1518 update_mime_database()
slaxemulator@369 1519 {
slaxemulator@394 1520 if [ -f $1/usr/bin/update-mime-database ] && [ -n "$updatemimedb" ]; then
pascal@578 1521 chroot "$1/" /usr/bin/update-mime-database /usr/share/mime
slaxemulator@369 1522 fi
slaxemulator@369 1523 }
slaxemulator@369 1524
slaxemulator@567 1525 update_icon_database()
slaxemulator@567 1526 {
slaxemulator@567 1527 if [ -f $1/usr/bin/gtk-update-icon-cache ] && [ -n "$updateicondb" ]; then
pascal@578 1528 chroot "$1/" /usr/bin/gtk-update-icon-cache /usr/share/icons/hicolor
slaxemulator@567 1529 fi
slaxemulator@567 1530 }
slaxemulator@567 1531
slaxemulator@534 1532 compile_glib_schemas()
slaxemulator@534 1533 {
slaxemulator@534 1534 if [ -f $1/usr/bin/glib-compile-schemas ] && [ -n "$compile_schemas" ]; then
pascal@578 1535 chroot "$1/" /usr/bin/glib-compile-schemas /usr/share/glib-2.0/schemas
slaxemulator@534 1536 fi
slaxemulator@534 1537 }
slaxemulator@534 1538
slaxemulator@588 1539 update_kernel_modules()
slaxemulator@588 1540 {
slaxemulator@588 1541 if [ -f $1/sbin/depmod ] && [ -n "$updatedepmod" ]; then
slaxemulator@588 1542 chroot "$1/" /sbin/depmod -a
slaxemulator@588 1543 fi
slaxemulator@588 1544 }
slaxemulator@588 1545
pankso@6 1546 ###################
al@633 1547 # TazPkg commands #
pankso@6 1548 ###################
pankso@6 1549
pankso@6 1550 case "$COMMAND" in
pankso@504 1551 list|-l)
al@603 1552 shift
pankso@6 1553 # List all installed packages or a specific category.
al@603 1554 if [ "$1" = "blocked" ]; then
al@603 1555 title 'Blocked packages'
pascal@183 1556 if [ -s "$BLOCKED" ];then
pascal@183 1557 cat $BLOCKED
pankso@45 1558 else
gokhlayeh@388 1559 gettext "No blocked packages found."; echo
pankso@45 1560 fi
pankso@600 1561 newline && exit 0
pankso@45 1562 fi
pankso@45 1563 # Display the list of categories.
al@603 1564 if [ "$1" = "cat" -o "$1" = "categories" ]; then
al@603 1565 title 'Packages categories'
al@633 1566 num=0
al@603 1567 for i in $PKGS_CATEGORIES
pankso@45 1568 do
al@603 1569 gettext $i; echo
al@633 1570 num=$(($num+1))
pankso@45 1571 done
al@633 1572 footer "$(eval_ngettext '$num category' '$num categories' $num)"; echo
pankso@6 1573 exit 0
pankso@6 1574 fi
pankso@6 1575 # Check for an asked category.
al@603 1576 ASKED_CATEGORY_I18N="$@"
al@603 1577 if [ -n "$ASKED_CATEGORY_I18N" ]; then
al@603 1578 ASKED_CATEGORY=$(reverse_translate_category "$ASKED_CATEGORY_I18N")
al@603 1579 title 'Installed packages of category: $ASKED_CATEGORY_I18N'
pankso@6 1580 for pkg in $INSTALLED/*
pankso@6 1581 do
pascal@122 1582 [ -f $pkg/receipt ] || continue
pascal@114 1583 EXTRAVERSION=""
pankso@6 1584 . $pkg/receipt
pankso@6 1585 if [ "$CATEGORY" == "$ASKED_CATEGORY" ]; then
al@603 1586 echo -e "$PACKAGE\033[24G $VERSION$EXTRAVERSION"
pankso@6 1587 packages=$(($packages+1))
pankso@6 1588 fi
pankso@6 1589 done
al@633 1590 num="<c 32>$packages</c>"; cat_name="<c 34>$ASKED_CATEGORY_I18N</c>"
al@603 1591 footer "$(emsg $(eval_ngettext \
al@633 1592 '$num package installed of category $cat_name.' \
al@633 1593 '$num packages installed of category $cat_name.' \
al@603 1594 $packages))"; echo
pankso@6 1595 else
MikeDSmith25@135 1596 # By default list all packages and versions.
al@603 1597 title 'List of all installed packages'
pankso@6 1598 for pkg in $INSTALLED/*
pankso@6 1599 do
pascal@122 1600 [ -f $pkg/receipt ] || continue
pascal@114 1601 EXTRAVERSION=""
pankso@6 1602 . $pkg/receipt
al@633 1603 echo -e "$PACKAGE\033[35G $VERSION$EXTRAVERSION\033[53G $(gettext $CATEGORY)"
pankso@6 1604 packages=$(($packages+1))
pankso@6 1605 done
al@633 1606 num="<c 32>$packages</c>"
al@603 1607 footer "$(emsg $(eval_ngettext \
al@633 1608 '$num package installed.' \
al@633 1609 '$num packages installed.' $packages))"
al@603 1610 fi ;;
pankso@600 1611 list-mirror|-lm)
paul@247 1612 # List all available packages on the mirror. Option --diff displays
pankso@6 1613 # last mirrored packages diff (see recharge).
pankso@6 1614 check_for_packages_list
pankso@53 1615 case $2 in
pankso@53 1616 --diff)
pankso@53 1617 if [ -f "$LOCALSTATE/packages.diff" ]; then
al@603 1618 title 'Mirrored packages diff'
pankso@53 1619 cat $LOCALSTATE/packages.diff
al@633 1620 num=$(cat $LOCALSTATE/packages.diff | wc -l)
al@603 1621 footer "$(eval_ngettext \
al@633 1622 '$num new package listed on the mirror.' \
al@633 1623 '$num new packages listed on the mirror.' $num)"
pankso@53 1624 else
pankso@600 1625 newline
pankso@344 1626 gettext "Unable to list anything, no packages.diff found."; echo
pankso@344 1627 gettext "Recharge your current list to create a first diff."; echo
pankso@600 1628 newline
pankso@53 1629 fi && exit 0 ;;
al@603 1630 --text|--txt|--raw|*)
al@603 1631 title 'List of available packages on the mirror'
pankso@53 1632 cat $LOCALSTATE/packages.txt ;;
pankso@53 1633 esac
pankso@600 1634 pkgs=$(cat $LOCALSTATE/packages.list | wc -l)
al@633 1635 num=$(emsg "<c 32>$pkgs</c>")
al@633 1636 footer "$(eval_ngettext \
al@633 1637 '$num package in the last recharged list.' \
al@633 1638 '$num packages in the last recharged list.' $pkgs)"
al@603 1639 ;;
pankso@600 1640 list-files|-lf)
pankso@6 1641 # List files installed with the package.
pankso@6 1642 check_for_package_on_cmdline
pankso@6 1643 check_for_receipt
al@603 1644 title 'Installed files by: $PACKAGE'
pankso@6 1645 cat $INSTALLED/$PACKAGE/files.list | sort
pankso@600 1646 files=$(cat $INSTALLED/$PACKAGE/files.list | wc -l)
al@633 1647 num=$(emsg "<c 32>$files</c>")
al@633 1648 footer "$(eval_ngettext \
al@633 1649 '$num file installed with $PACKAGE' \
al@633 1650 '$num files installed with $PACKAGE' $files)"
al@603 1651 ;;
pankso@6 1652 info)
pascal@119 1653 # Information about package.
pankso@6 1654 check_for_package_on_cmdline
pankso@6 1655 check_for_receipt
pascal@114 1656 EXTRAVERSION=""
pankso@6 1657 . $INSTALLED/$PACKAGE/receipt
al@633 1658 title 'TazPkg information'
al@622 1659 # Display localized short description
al@622 1660 if [ -e "$LOCALSTATE/packages-desc.$LANG" ]; then
al@622 1661 LOCDESC=$(grep -e "^$PACKAGE " $LOCALSTATE/packages-desc.$LANG | cut -d' ' -f2)
al@622 1662 [ "x$LOCDESC" != "x" ] && SHORT_DESC="$LOCDESC"
al@622 1663 fi
al@603 1664 emsg "\
al@603 1665 <b>$(gettext 'Package :')</b> $PACKAGE
al@603 1666 <b>$(gettext 'Version :')</b> $VERSION$EXTRAVERSION
al@603 1667 <b>$(gettext 'Category :')</b> $(gettext $CATEGORY)
al@603 1668 <b>$(gettext 'Short desc :')</b> $SHORT_DESC
al@603 1669 <b>$(gettext 'Maintainer :')</b> $MAINTAINER"
pascal@632 1670 [ "$LICENSE" ] && emsg "<b>$(gettext 'License :')</b> $DEPENDS"
al@603 1671 [ "$DEPENDS" ] && emsg "<b>$(gettext 'Depends :')</b> $DEPENDS"
al@603 1672 [ "$SUGGESTED" ] && emsg "<b>$(gettext 'Suggested :')</b> $SUGGESTED"
al@603 1673 [ "$BUILD_DEPENDS" ] && emsg "<b>$(gettext 'Build deps :')</b> $BUILD_DEPENDS"
al@603 1674 [ "$WANTED" ] && emsg "<b>$(gettext 'Wanted src :')</b> $WANTED"
al@603 1675 [ "$WEB_SITE" ] && emsg "<b>$(gettext 'Web site :')</b> $WEB_SITE"
al@603 1676 footer
al@603 1677 ;;
pankso@6 1678 desc)
pankso@6 1679 # Display package description.txt if available.
pankso@6 1680 if [ -f "$INSTALLED/$PACKAGE/description.txt" ]; then
al@603 1681 title 'Description of: $PACKAGE'
pankso@6 1682 cat $INSTALLED/$PACKAGE/description.txt
al@603 1683 footer
pankso@6 1684 else
pankso@600 1685 newline
pankso@344 1686 gettext "Sorry, no description available for this package."; echo
pankso@600 1687 newline
pankso@309 1688 fi ;;
pankso@504 1689 search|-s)
pankso@6 1690 # Search for a package by pattern or name.
pankso@54 1691 PATTERN="$2"
pankso@54 1692 if [ -z "$PATTERN" ]; then
pankso@600 1693 newline
pankso@344 1694 gettext "Please specify a pattern or package name to search for."; echo
al@633 1695 echo "$(gettext 'Example:') 'tazpkg search paint'"
pankso@600 1696 newline
pankso@6 1697 exit 0
pankso@6 1698 fi
al@603 1699 title 'Search result for: $PATTERN'
pankso@54 1700 # Default is to search in installed pkgs and the raw list.
pankso@54 1701 case $3 in
pankso@54 1702 -i|--installed)
pankso@54 1703 search_in_installed_packages ;;
pankso@54 1704 -l|--list)
pankso@54 1705 search_in_packages_list ;;
pankso@54 1706 -m|--mirror)
pankso@54 1707 search_in_packages_txt ;;
pankso@54 1708 *)
pankso@54 1709 search_in_installed_packages
jozee@338 1710 search_in_packages_list ;;
pankso@309 1711 esac ;;
pankso@593 1712 search-file|-sf)
pankso@12 1713 # Search for a file by pattern or name in all files.list.
pankso@12 1714 if [ -z "$2" ]; then
pankso@600 1715 newline
pankso@344 1716 gettext "Please specify a pattern or file name to search for."; echo
al@633 1717 echo "$(gettext 'Example:') 'tazpkg search-file libnss'"
pankso@600 1718 newline
pankso@12 1719 exit 0
pankso@12 1720 fi
al@603 1721 s_file="$2"
al@603 1722 title 'Search result for file $s_file'
pankso@598 1723
pascal@98 1724 if [ "$3" == "--mirror" ]; then
pankso@279 1725
pascal@187 1726 match=0
pascal@187 1727 for i in $LOCALSTATE/files.list.lzma \
pascal@187 1728 $LOCALSTATE/undigest/*/files.list.lzma; do
pascal@187 1729 [ -f $i ] || continue
pascal@187 1730 unlzma -c $i | grep -- ".*:.*$2" | awk '
al@603 1731 BEGIN { last="" }
al@603 1732 {
al@603 1733 pkg=substr($0,0,index($0,":")-1);
al@603 1734 file=substr($0,index($0,":")+2);
al@603 1735 if (last != pkg) {
al@603 1736 last = pkg;
al@603 1737 printf("\n%c[1mPackage %s:%c[0m\n",27,pkg,27);
al@603 1738 }
al@603 1739 printf("%s\n",file);
al@603 1740 }'
pascal@187 1741 match=$(($match + `unlzma -c $i | grep -- ".*:.*$2" | wc -l`))
pascal@187 1742 done
pascal@98 1743
pascal@98 1744 else
pascal@98 1745
al@603 1746 # Check all pkg files.list in search match which specify the package
al@603 1747 # name and the full path to the file(s).
al@603 1748 for pkg in $INSTALLED/*
al@603 1749 do
al@603 1750 if grep -qs "$2" $pkg/files.list; then
al@603 1751 . $pkg/receipt
al@603 1752 newline
al@603 1753 boldify "$(eval_gettext 'Package $PACKAGE:')"
al@603 1754 grep "$2" $pkg/files.list
al@603 1755 files=`grep $2 $pkg/files.list | wc -l`
al@603 1756 match=$(($match+$files))
al@603 1757 fi
al@603 1758 done
pascal@98 1759
pascal@98 1760 fi
pankso@344 1761 pkg=$2
pankso@12 1762 if [ "$match" = "" ]; then
pankso@344 1763 eval_gettext "0 file found for: \$pkg"; echo
pankso@12 1764 else
al@633 1765 num=$(emsg "<c 32>$files</c>")
al@603 1766 footer "$(eval_ngettext \
al@633 1767 '$num file found for: $pkg' \
al@633 1768 '$num files found for: $pkg' $match)"
al@603 1769 fi
al@603 1770 ;;
pankso@598 1771 search-pkgname)
pankso@344 1772 # Search for a package name
jozee@318 1773 if [ -z "$2" ]; then
pankso@600 1774 newline
pankso@344 1775 gettext "Please specify a pattern or file name to search for."; echo
al@633 1776 echo "$(gettext 'Example:') 'tazpkg search-pkgname libnss'"
pankso@600 1777 newline
jozee@318 1778 exit 0
jozee@318 1779 fi
al@603 1780 s_pkg="$2"
al@603 1781 title 'Search result for package $s_pkg'
pankso@598 1782
pankso@503 1783 # Search for a file on mirror and output only the package name
jozee@318 1784 match=0
jozee@318 1785 for i in $LOCALSTATE/files.list.lzma \
jozee@318 1786 $LOCALSTATE/undigest/*/files.list.lzma; do
jozee@318 1787 [ -f $i ] || continue
jozee@318 1788 unlzma -c $i | grep -- ".*:.*$2" | cut -d: -f1 | uniq | awk '{ print $1 }'
jozee@318 1789 match=$(($match + `unlzma -c $i | grep -- ".*:.*$2" | cut -d: -f1 | uniq | wc -l`))
jozee@318 1790 done
pankso@344 1791 file=$2
al@603 1792 if [ "$match" = "0" ]; then
al@633 1793 eval_gettext "No file found for: \$file"; echo
pankso@600 1794 newline
jozee@318 1795 else
al@633 1796 num=$(emsg "<c 32>$files</c>")
al@603 1797 footer "$(eval_ngettext \
al@633 1798 '$num package found with file: $file' \
al@633 1799 '$num packages found with file: $file' $match)"
jozee@318 1800 fi
jozee@318 1801 ;;
pankso@504 1802 install|-i)
pankso@6 1803 # Install .tazpkg packages.
al@603 1804 check_root $@
pankso@6 1805 check_for_package_on_cmdline
pankso@6 1806 check_for_package_file
pankso@598 1807
gokhlayeh@429 1808 [ "$root" ] && ROOT="$root" && check_base_dir "$root"
gokhlayeh@429 1809 [ "$list" ] && INSTALL_LIST="$list"
slaxemulator@488 1810 if [ "$rootconfig" ]; then
slaxemulator@487 1811 if [ "$root" ]; then
slaxemulator@487 1812 CACHE_DIR=$root/$CACHE_DIR
slaxemulator@487 1813 SAVE_CACHE_DIR=$CACHE_DIR
slaxemulator@487 1814 LOCALSTATE=$root/$LOCALSTATE
slaxemulator@487 1815 else
slaxemulator@487 1816 echo "rootconfig needs --root= option used." >&2
slaxemulator@487 1817 exit 1
slaxemulator@487 1818 fi
slaxemulator@487 1819 fi
gokhlayeh@436 1820
gokhlayeh@386 1821 # Get repositories priority list.
gokhlayeh@386 1822 look_for_priority
gokhlayeh@436 1823
pankso@6 1824 # Check if forced install.
gokhlayeh@423 1825 if ! [ "$forced" ]; then
pascal@121 1826 check_for_installed_package $ROOT
pankso@6 1827 fi
gokhlayeh@356 1828 install_package $ROOT
slaxemulator@369 1829 update_desktop_database $ROOT
pankso@598 1830 update_mime_database $ROOT
pankso@598 1831 update_icon_database $ROOT
slaxemulator@567 1832 compile_glib_schemas $ROOT ;;
erjo@59 1833 install-list|get-install-list)
pankso@6 1834 # Install a set of packages from a list.
al@603 1835 check_root $@
pankso@6 1836 if [ -z "$2" ]; then
pankso@600 1837 newline
pankso@344 1838 gettext \
paul@349 1839 "Please change directory (cd) to the packages repository and specify the
al@603 1840 list of packages to install. Example: tazpkg install-list packages.list"
pankso@600 1841 newline && exit 0
pankso@6 1842 fi
pankso@6 1843 # Check if the packages list exist.
pankso@344 1844 list_file=$2
pankso@344 1845 if [ ! -f "$list_file" ]; then
al@603 1846 eval_gettext "Unable to find: \$list_file"; echo
pankso@6 1847 exit 0
pankso@6 1848 else
pankso@6 1849 LIST=`cat $2`
pankso@6 1850 fi
pankso@279 1851
pascal@120 1852 # Remember processed list
pascal@121 1853 export INSTALL_LIST="$2"
pascal@120 1854
erjo@59 1855 # Set $COMMAND and install all packages.
erjo@59 1856 if [ "$1" = "get-install-list" ]; then
Eric@64 1857 COMMAND=get-install
erjo@59 1858 else
erjo@59 1859 COMMAND=install
erjo@59 1860 fi
pascal@121 1861 touch $2-processed
pascal@314 1862
pascal@314 1863 # Upgrade tazpkg first. It may handle new features/formats...
pascal@340 1864 # then upgrade essential packages early
pascal@341 1865 for pkg in busybox-pam busybox gcc-lib-base glibc-base \
pascal@341 1866 slitaz-base-files tazpkg ; do
pascal@341 1867 pkg=$(egrep $pkg-[0-9] $INSTALL_LIST)
pascal@341 1868 [ -n "$pkg" ] || continue
al@603 1869 eval_gettext "Adding implicit depends \$pkg..."; echo
pascal@341 1870 LIST="$pkg
pascal@341 1871 $LIST"
pascal@340 1872 done
pascal@314 1873
pankso@6 1874 for pkg in $LIST
pankso@6 1875 do
pascal@121 1876 grep -qs ^$pkg$ $2-processed && continue
pascal@121 1877 tazpkg $COMMAND $pkg --list=$2 "$3" "$4" "$5"
pankso@6 1878 done
pankso@309 1879 rm -f $2-processed ;;
pankso@76 1880 add-flavor)
pascal@74 1881 # Install a set of packages from a flavor.
pankso@309 1882 install_flavor $2 ;;
pankso@76 1883 install-flavor)
pascal@74 1884 # Install a set of packages from a flavor and purge other ones.
pankso@309 1885 install_flavor $2 --purge ;;
pankso@76 1886 set-release)
pascal@74 1887 # Change curent release and upgrade packages.
pascal@74 1888 RELEASE=$2
pankso@76 1889 if [ -z "$RELEASE" ]; then
pankso@600 1890 newline
pankso@344 1891 gettext "Please specify the release you want on the command line."; echo
al@633 1892 echo "$(gettext 'Example:') tazpkg set-release cooking"
pankso@600 1893 newline
pankso@76 1894 exit 0
pankso@76 1895 fi
slaxemulator@418 1896 rm $LOCALSTATE/mirror
pascal@74 1897 echo "$RELEASE" > /etc/slitaz-release
pascal@74 1898 tazpkg recharge && tazpkg upgrade
pascal@222 1899
pascal@222 1900 # Install missing depends
pascal@222 1901 cd $INSTALLED
pascal@222 1902 for i in * ; do
pascal@222 1903 DEPENDS=""
pascal@222 1904 . $i/receipt
pascal@222 1905 for j in $DEPENDS ; do
pascal@222 1906 [ -d $j ] || tazpkg get-install $j
pascal@222 1907 done
pankso@309 1908 done ;;
pankso@504 1909 remove|-r)
pankso@6 1910 # Remove packages.
al@603 1911 check_root $@
pankso@6 1912 check_for_package_on_cmdline
pankso@598 1913
pankso@598 1914 [ "$root" ] && ROOT="$root"
slaxemulator@370 1915 if [ ! -f "$ROOT$INSTALLED/$PACKAGE/receipt" ]; then
pankso@600 1916 newline
pankso@344 1917 eval_gettext "\$PACKAGE is not installed."; echo
pankso@6 1918 exit 0
pankso@6 1919 else
pascal@30 1920 ALTERED=""
pascal@30 1921 THE_PACKAGE=$PACKAGE # altered by receipt
slaxemulator@370 1922 for i in $(cd $ROOT$INSTALLED ; ls); do
slaxemulator@370 1923 [ -f $ROOT$INSTALLED/$i/receipt ] || continue
pankso@37 1924 DEPENDS=""
slaxemulator@370 1925 . $ROOT$INSTALLED/$i/receipt
pascal@30 1926 case " $(echo $DEPENDS) " in
pascal@30 1927 *\ $THE_PACKAGE\ *) ALTERED="$ALTERED $i";;
pascal@30 1928 esac
pascal@30 1929 done
pascal@114 1930 EXTRAVERSION=""
slaxemulator@370 1931 . $ROOT$INSTALLED/$THE_PACKAGE/receipt
pankso@6 1932 fi
pankso@600 1933 newline
pascal@30 1934 if [ -n "$ALTERED" ]; then
pankso@344 1935 eval_gettext "The following packages depend on \$PACKAGE:"; echo
pascal@30 1936 for i in $ALTERED; do
pascal@30 1937 echo " $i"
pascal@30 1938 done
pascal@30 1939 fi
slaxemulator@370 1940 REFRESH=$(cd $ROOT$INSTALLED ; grep -sl ^$PACKAGE$ */modifiers)
pascal@163 1941 if [ -n "$REFRESH" ]; then
pankso@344 1942 eval_gettext "The following packages have been modified by \$PACKAGE:"; echo
pascal@163 1943 for i in $REFRESH; do
pascal@170 1944 echo " ${i%/modifiers}"
pascal@163 1945 done
pascal@163 1946 fi
gokhlayeh@423 1947 if [ "$auto" ]; then
al@603 1948 answer=0
gokhlayeh@423 1949 else
al@603 1950 eval_gettext "Remove \$PACKAGE (\$VERSION\$EXTRAVERSION)" && confirm
al@603 1951 answer=$?
gokhlayeh@423 1952 fi
al@603 1953 if [ $answer = 0 ]; then
al@603 1954 title 'Removing: $PACKAGE'
pankso@38 1955 # Pre remove commands.
slaxemulator@371 1956 if grep -q ^pre_remove $ROOT$INSTALLED/$PACKAGE/receipt; then
slaxemulator@533 1957 pre_remove $ROOT
pankso@38 1958 fi
al@603 1959 action "Removing all files installed..."
slaxemulator@370 1960 if [ -f $ROOT$INSTALLED/$PACKAGE/modifiers ]; then
al@603 1961 for file in `cat $ROOT$INSTALLED/$PACKAGE/files.list`
pascal@251 1962 do
al@603 1963 for mod in `cat $ROOT$INSTALLED/$PACKAGE/modifiers`
al@603 1964 do
al@603 1965 [ -f $ROOT$INSTALLED/$mod/files.list ] && [ $(grep "^$(echo $file | grepesc)$" $ROOT$INSTALLED/$mod/files.list | wc -l) -gt 1 ] && continue 2
al@603 1966 done
al@603 1967 remove_with_path $ROOT$file
pascal@206 1968 done
pascal@255 1969 else
slaxemulator@370 1970 for file in `cat $ROOT$INSTALLED/$PACKAGE/files.list`
pascal@255 1971 do
slaxemulator@371 1972 remove_with_path $ROOT$file
pascal@255 1973 done
pascal@255 1974 fi
pankso@6 1975 status
slaxemulator@370 1976 if grep -q ^post_remove $ROOT$INSTALLED/$PACKAGE/receipt; then
slaxemulator@533 1977 post_remove $ROOT
pankso@51 1978 fi
pankso@6 1979 # Remove package receipt.
al@603 1980 action "Removing package receipt..."
slaxemulator@370 1981 rm -rf $ROOT$INSTALLED/$PACKAGE
pankso@6 1982 status
pascal@253 1983 sed -i "/ $PACKAGE-$VERSION$EXTRAVERSION$/d" \
slaxemulator@588 1984 $LOCALSTATE/installed.$SUM 2> /dev/null
pascal@183 1985 # Log this activity
al@603 1986 log_pkg Removed
gokhlayeh@423 1987 if [ "$ALTERED" ]; then
gokhlayeh@423 1988 if [ "$auto" ]; then
al@603 1989 answer=0
gokhlayeh@423 1990 else
al@603 1991 eval_gettext "Remove packages depending on \$PACKAGE" && confirm
al@603 1992 answer=$?
gokhlayeh@423 1993 fi
al@603 1994 if [ $answer = 0 ]; then
pascal@30 1995 for i in $ALTERED; do
slaxemulator@370 1996 if [ -d "$ROOT$INSTALLED/$i" ]; then
slaxemulator@371 1997 tazpkg remove $i $ROOTOPTS
pankso@37 1998 fi
pascal@30 1999 done
pascal@30 2000 fi
pascal@30 2001 fi
gokhlayeh@423 2002 if [ "$REFRESH" ]; then
gokhlayeh@423 2003 if [ "$auto" ]; then
al@603 2004 answer=0
gokhlayeh@423 2005 else
al@603 2006 eval_gettext "Reinstall packages modified by \$PACKAGE" && confirm
al@603 2007 answer=$?
gokhlayeh@423 2008 fi
al@603 2009 if [ $answer = 0 ]; then
pascal@163 2010 for i in $REFRESH; do
slaxemulator@370 2011 if [ $(wc -l < $ROOT$INSTALLED/$i) -gt 1 ]; then
pankso@344 2012 eval_gettext "Check \$INSTALLED/\$i for reinstallation"; echo
pascal@163 2013 continue
pascal@163 2014 fi
slaxemulator@370 2015 rm -r $ROOT$INSTALLED/$i
slaxemulator@371 2016 tazpkg get-install ${i%/modifiers} $ROOTOPTS --forced
pascal@163 2017 done
pascal@163 2018 fi
pascal@163 2019 fi
pankso@6 2020 else
pankso@600 2021 newline
pankso@344 2022 eval_gettext "Uninstallation of \$PACKAGE cancelled."; echo
pankso@6 2023 fi
pankso@600 2024 newline ;;
pankso@600 2025 extract|-e)
pankso@6 2026 # Extract .tazpkg cpio archive into a directory.
pankso@6 2027 check_for_package_on_cmdline
pankso@6 2028 check_for_package_file
al@603 2029 title 'Extracting: $PACKAGE'
MikeDSmith25@135 2030 # If no directory destination is found on the cmdline
MikeDSmith25@135 2031 # we create one in the current dir using the package name.
pankso@6 2032 if [ -n "$TARGET_DIR" ]; then
pankso@6 2033 DESTDIR=$TARGET_DIR/$PACKAGE
pankso@6 2034 else
pankso@6 2035 DESTDIR=$PACKAGE
pankso@6 2036 fi
pankso@6 2037 mkdir -p $DESTDIR
al@603 2038 action "Copying original package..."
pankso@9 2039 cp $PACKAGE_FILE $DESTDIR
pankso@6 2040 status
pankso@6 2041 cd $DESTDIR
pankso@6 2042 extract_package
al@603 2043 [ -e "receipt" ] && footer "$(eval_gettext '$PACKAGE is extracted to: $DESTDIR')"
al@603 2044 ;;
pascal@297 2045 recompress)
pascal@297 2046 # Recompress .tazpkg cpio archive with lzma.
pascal@297 2047 check_for_package_on_cmdline
pascal@297 2048 check_for_package_file
al@603 2049 title 'Recompressing: $PACKAGE'
pascal@297 2050 mkdir -p $TMP_DIR
al@603 2051 action "Copying original package..."
pascal@297 2052 cp $PACKAGE_FILE $TMP_DIR
pascal@297 2053 status
pascal@297 2054 cd $TMP_DIR
pascal@297 2055 extract_package
al@603 2056 action "Recompressing the fs..."
gokhlayeh@383 2057 find fs | cpio -o -H newc --quiet | lzma e fs.cpio.lzma -si
pascal@297 2058 rm -rf fs
pascal@297 2059 status
al@603 2060 action "Creating new package..."
gokhlayeh@383 2061 find . -print | cpio -o -H newc --quiet > \
pascal@297 2062 $TOP_DIR/$(basename $PACKAGE_FILE).$$ && mv -f \
pascal@297 2063 $TOP_DIR/$(basename $PACKAGE_FILE).$$ \
pascal@297 2064 $TOP_DIR/$(basename $PACKAGE_FILE)
pascal@297 2065 status
pascal@297 2066 cd $TOP_DIR
al@603 2067 rm -rf $TMP_DIR
al@603 2068 separator; newline ;;
pascal@139 2069 list-config)
pascal@139 2070 # List configuration files installed.
pascal@141 2071 if [ "$2" = "--box" ]; then
pascal@141 2072 mkdir -p $TMP_DIR && cd $TMP_DIR
pascal@210 2073 FILES="$INSTALLED/*/volatile.cpio.gz"
pascal@210 2074 [ -n "$3" ] && FILES="$INSTALLED/$3/volatile.cpio.gz"
pankso@279 2075 for i in $FILES; do
gokhlayeh@383 2076 zcat $i | cpio -idm --quiet > /dev/null
pascal@190 2077 find * -type f 2>/dev/null | while read file; do
pascal@190 2078 if [ ! -e /$file ]; then
al@603 2079 echo -en "----------|----|----|`gettext \"File lost\"`"
pascal@190 2080 else
pascal@143 2081 echo -n "$(stat -c "%A|%U|%G|%s|" /$file)"
pascal@141 2082 cmp $file /$file > /dev/null 2>&1 || \
pascal@141 2083 echo -n "$(stat -c "%.16y" /$file)"
pascal@190 2084 fi
pascal@143 2085 echo "|/$file"
pascal@141 2086 done
pascal@141 2087 rm -rf *
pascal@146 2088 done
pascal@141 2089 cd $TOP_DIR
pascal@141 2090 rm -rf $TMP_DIR
pascal@141 2091 else
al@603 2092 title 'Configuration files'
pankso@279 2093 for i in $INSTALLED/*/volatile.cpio.gz; do
pascal@146 2094 [ -n "$2" -a "$i" != "$INSTALLED/$2/volatile.cpio.gz" ] && continue
pascal@146 2095 [ -f "$i" ] || continue
gokhlayeh@383 2096 zcat $i | cpio -t --quiet
pascal@146 2097 done | sed 's|^|/|' | sort
slaxemulator@475 2098 separator
pankso@600 2099 newline
pankso@309 2100 fi ;;
pascal@139 2101 repack-config)
pascal@137 2102 # Create SliTaz package archive from configuration files.
pascal@137 2103 mkdir -p $TMP_DIR && cd $TMP_DIR
pascal@137 2104 CONFIG_VERSION=1.0
pascal@137 2105 mkdir config-$CONFIG_VERSION
pascal@137 2106 cd config-$CONFIG_VERSION
pankso@279 2107 for i in $INSTALLED/*/volatile.cpio.gz; do
gokhlayeh@383 2108 zcat $i | cpio -t --quiet
pascal@137 2109 done > files.list
pascal@137 2110 mkdir fs
pascal@137 2111 cd fs
gokhlayeh@416 2112 ( cd / ; cpio -o -H newc --quiet ) < ../files.list | cpio -idm --quiet > /dev/null
pascal@137 2113 mkdir -p etc/tazlito
pankso@279 2114 for i in $INSTALLED/*/receipt; do
pascal@137 2115 EXTRAVERSION=""
pascal@137 2116 . $i
pascal@137 2117 echo "$PACKAGE-$VERSION$EXTRAVERSION"
pascal@137 2118 done > etc/tazlito/config-packages.list
pascal@137 2119 cd ..
pascal@137 2120 echo "etc/tazlito/config-packages.list" >> files.list
al@603 2121 pkg_date=$(date +"%x %X")
pascal@137 2122 cat > receipt <<EOT
pascal@137 2123 # SliTaz package receipt.
pascal@137 2124
pascal@137 2125 PACKAGE="config"
pascal@137 2126 VERSION="$CONFIG_VERSION"
pascal@137 2127 CATEGORY="base-system"
al@603 2128 SHORT_DESC="$(eval_gettext 'User configuration backup on $pkg_date')"
pascal@137 2129 DEPENDS="$(ls $INSTALLED)"
pascal@137 2130 EOT
pascal@137 2131 cd ..
pascal@137 2132 tazpkg pack config-$CONFIG_VERSION
pascal@137 2133 cp config-$CONFIG_VERSION.tazpkg $TOP_DIR
pascal@137 2134 cd $TOP_DIR
pascal@137 2135 rm -rf $TMP_DIR
pascal@137 2136 ;;
pascal@18 2137 repack)
MikeDSmith25@135 2138 # Create SliTaz package archive from an installed package.
pascal@18 2139 check_for_package_on_cmdline
pascal@18 2140 check_for_receipt
pascal@114 2141 EXTRAVERSION=""
pascal@114 2142 . $INSTALLED/$PACKAGE/receipt
al@603 2143 title 'Repacking: $PACKAGE-$VERSION$EXTRAVERSION.tazpkg'
pascal@24 2144 if grep -qs ^NO_REPACK= $INSTALLED/$PACKAGE/receipt; then
gokhlayeh@388 2145 eval_gettext "Can't repack \$PACKAGE"; echo
pascal@24 2146 exit 1
pascal@24 2147 fi
pascal@21 2148 if [ -s $INSTALLED/$PACKAGE/modifiers ]; then
pankso@344 2149 eval_gettext "Can't repack, \$PACKAGE files have been modified by:"; echo
pascal@21 2150 for i in $(cat $INSTALLED/$PACKAGE/modifiers); do
pascal@21 2151 echo " $i"
pascal@21 2152 done
pascal@21 2153 exit 1
pascal@21 2154 fi
pascal@18 2155 MISSING=""
pascal@63 2156 while read i; do
pascal@18 2157 [ -e "$i" ] && continue
pascal@63 2158 [ -L "$i" ] || MISSING="$MISSING\n $i"
pascal@63 2159 done < $INSTALLED/$PACKAGE/files.list
pascal@18 2160 if [ -n "$MISSING" ]; then
pankso@344 2161 gettext "Can't repack, the following files are lost:"
pascal@63 2162 echo -e "$MISSING"
pascal@18 2163 exit 1
pascal@18 2164 fi
pascal@24 2165 mkdir -p $TMP_DIR && cd $TMP_DIR
pascal@298 2166 FILES="fs.cpio.lzma\n"
pascal@24 2167 for i in $(ls $INSTALLED/$PACKAGE) ; do
pascal@128 2168 [ "$i" = "volatile.cpio.gz" ] && continue
pascal@128 2169 [ "$i" = "modifiers" ] && continue
pascal@24 2170 cp $INSTALLED/$PACKAGE/$i . && FILES="$FILES$i\n"
pascal@24 2171 done
pascal@72 2172 ln -s / rootfs
pascal@72 2173 mkdir tmp
gokhlayeh@383 2174 sed 's/^/rootfs/' < files.list | cpio -o -H newc --quiet |\
gokhlayeh@416 2175 { cd tmp ; cpio -idm --quiet >/dev/null; cd ..; }
pascal@72 2176 mv tmp/rootfs fs
pascal@145 2177 if [ -f $INSTALLED/$PACKAGE/volatile.cpio.gz ]; then
pascal@145 2178 zcat $INSTALLED/$PACKAGE/volatile.cpio.gz | \
gokhlayeh@416 2179 { cd fs; cpio -idm --quiet; cd ..; }
pascal@145 2180 fi
gokhlayeh@409 2181 if fgrep -q repack_cleanup $INSTALLED/$PACKAGE/receipt; then
pascal@107 2182 . $INSTALLED/$PACKAGE/receipt
pascal@107 2183 repack_cleanup fs
pascal@107 2184 fi
slaxemulator@588 2185 if [ -f $INSTALLED/$PACKAGE/$CHECKSUM ]; then
slaxemulator@588 2186 sed 's, , fs,' < $INSTALLED/$PACKAGE/$CHECKSUM | \
slaxemulator@588 2187 $CHECKSUM -s -c || {
al@603 2188 eval_gettext "Can't repack, \$CHECKSUM error."; echo
pascal@107 2189 cd $TOP_DIR
pascal@214 2190 rm -rf $TMP_DIR
pascal@107 2191 exit 1
pascal@214 2192 }
pascal@107 2193 fi
gokhlayeh@383 2194 find fs | cpio -o -H newc --quiet | lzma e fs.cpio.lzma -si
gokhlayeh@383 2195 echo -e "$FILES" | cpio -o -H newc --quiet > \
pascal@114 2196 $TOP_DIR/$PACKAGE-$VERSION$EXTRAVERSION.tazpkg
pascal@74 2197 cd $TOP_DIR
pascal@18 2198 \rm -R $TMP_DIR
pankso@344 2199 eval_gettext "Package \$PACKAGE repacked successfully."; echo
al@603 2200 pkg_size=$(du -sh $PACKAGE-$VERSION$EXTRAVERSION.tazpkg)
al@603 2201 eval_gettext "Size: \$pkg_size"; echo
pankso@600 2202 newline ;;
pankso@6 2203 pack)
pankso@600 2204 # Create SliTaz package archive using cpio and lzma.
pankso@600 2205 # TODO: Cook also pack packages, we should share code in libpkg.sh
pankso@6 2206 check_for_package_on_cmdline
pankso@6 2207 cd $PACKAGE
pankso@6 2208 if [ ! -f "receipt" ]; then
pankso@344 2209 gettext "Receipt is missing. Please read the documentation."; echo
pankso@6 2210 exit 0
pankso@6 2211 else
al@603 2212 title 'Packing: $PACKAGE'
MikeDSmith25@135 2213 # Create files.list with redirecting find outpout.
al@603 2214 action "Creating the list of files..."
al@603 2215 cd fs
pankso@6 2216 find . -type f -print > ../files.list
pankso@6 2217 find . -type l -print >> ../files.list
pankso@6 2218 cd .. && sed -i s/'^.'/''/ files.list
pankso@6 2219 status
al@603 2220 action "Creating \$CHECKSUM of files..."
pascal@138 2221 while read file; do
pascal@138 2222 [ -L "fs$file" ] && continue
pascal@138 2223 [ -f "fs$file" ] || continue
pascal@158 2224 case "$file" in
pascal@158 2225 /lib/modules/*/modules.*|*.pyc) continue;;
pascal@158 2226 esac
slaxemulator@588 2227 $CHECKSUM "fs$file" | sed 's/ fs/ /'
slaxemulator@588 2228 done < files.list > $CHECKSUM
pascal@138 2229 status
slaxemulator@588 2230 UNPACKED_SIZE=$(du -chs fs receipt files.list $CHECKSUM \
pascal@147 2231 description.txt 2> /dev/null | awk \
pascal@147 2232 '{ sz=$1 } END { print sz }')
pankso@6 2233 # Build cpio archives.
al@603 2234 action "Compressing the fs..."
gokhlayeh@383 2235 find fs | cpio -o -H newc --quiet | lzma e fs.cpio.lzma -si
pascal@138 2236 rm -rf fs
pascal@147 2237 status
pascal@298 2238 PACKED_SIZE=$(du -chs fs.cpio.lzma receipt files.list \
slaxemulator@588 2239 $CHECKSUM description.txt 2> /dev/null | awk \
pascal@147 2240 '{ sz=$1 } END { print sz }')
al@603 2241 action "Updating receipt sizes..."
pankso@279 2242 sed -i s/^PACKED_SIZE.*$// receipt
pankso@279 2243 sed -i s/^UNPACKED_SIZE.*$// receipt
pascal@147 2244 sed -i "s/^PACKAGE=/PACKED_SIZE=\"$PACKED_SIZE\"\nUNPACKED_SIZE=\"$UNPACKED_SIZE\"\nPACKAGE=/" receipt
pascal@147 2245 status
al@603 2246 action "Creating full cpio archive..."
gokhlayeh@383 2247 find . -print | cpio -o -H newc --quiet > ../$PACKAGE.tazpkg
pascal@147 2248 status
al@603 2249 action "Restoring original package tree..."
gokhlayeh@383 2250 unlzma -c fs.cpio.lzma | cpio -idm --quiet
pascal@147 2251 status
pascal@298 2252 rm fs.cpio.lzma && cd ..
al@603 2253 footer "$(eval_gettext 'Package $PACKAGE compressed successfully.')"
al@603 2254 pkg_size=$(du -sh $PACKAGE.tazpkg)
al@603 2255 eval_gettext "Size: \$pkg_size"; echo
pankso@600 2256 newline
pankso@309 2257 fi ;;
pankso@6 2258 recharge)
pankso@6 2259 # Recharge packages.list from a mirror.
pankso@581 2260 #
paul@607 2261 # WARNING: The mirrors file has all SliTaz mirrors but mirror
paul@607 2262 # must have only the chosen main mirror.
pankso@581 2263 #
al@603 2264 check_root $@
pankso@598 2265
gokhlayeh@448 2266 ARG=$2
gokhlayeh@448 2267 if [ "$root" ]; then
gokhlayeh@448 2268 LOCALSTATE=$root$LOCALSTATE
gokhlayeh@448 2269 [ "${2#--}" != "$2" ] && ARG=$3
gokhlayeh@448 2270 fi
gokhlayeh@448 2271 if [ "$ARG" = main ]; then
gokhlayeh@430 2272 repository_to_recharge=$LOCALSTATE
gokhlayeh@448 2273 elif [ "$ARG" ]; then
gokhlayeh@448 2274 if [ -d "$LOCALSTATE/undigest/$ARG" ]; then
gokhlayeh@448 2275 repository_to_recharge=$LOCALSTATE/undigest/$ARG
gokhlayeh@430 2276 else
al@603 2277 repo="$LOCALSTATE/undigest/$ARG"
al@603 2278 eval_gettext "\$repo doesn't exist." >&2
al@603 2279 echo >&2
gokhlayeh@430 2280 exit 1
gokhlayeh@430 2281 fi
gokhlayeh@430 2282 else
gokhlayeh@430 2283 repository_to_recharge="$LOCALSTATE $LOCALSTATE/undigest/*"
pankso@598 2284 fi
gokhlayeh@430 2285 for path in $repository_to_recharge; do
pascal@187 2286 [ -f $path/mirror ] || continue
gokhlayeh@430 2287 cd $path
pankso@598 2288
gokhlayeh@430 2289 # Quietly check if recharging is needed.
gokhlayeh@430 2290 [ -f ID ] && mv ID ID.bak
mojo@575 2291 download_from "$(cat mirror)" ID >/dev/null 2>/dev/null
gokhlayeh@444 2292 if [ -f ID ] && fgrep -q `cat ID.bak 2>/dev/null || echo "null"` ID; then
gokhlayeh@430 2293 if [ "$path" = "$LOCALSTATE" ]; then
gokhlayeh@430 2294 repository_name=Main
gokhlayeh@430 2295 else
al@603 2296 base_path="$(basename $path)"
al@603 2297 repository_name="$(eval_gettext 'Undigest $base_path')"
gokhlayeh@430 2298 fi
al@603 2299 eval_gettext "\$repository_name is up to date."; echo
gokhlayeh@430 2300 rm ID.bak
gokhlayeh@430 2301 continue
gokhlayeh@430 2302 fi
gokhlayeh@432 2303
gokhlayeh@432 2304 # Don't let ID be a symlink when using local repository.
gokhlayeh@432 2305 if [ -f ID ]; then
gokhlayeh@432 2306 mv -f ID ID.bak
gokhlayeh@432 2307 cat ID.bak > ID
slaxemulator@576 2308 rm ID.bak
gokhlayeh@432 2309 fi
pankso@598 2310
pankso@600 2311 newline
pascal@187 2312 if [ "$path" != "$LOCALSTATE" ]; then
al@603 2313 base_path="$(basename $path)"
al@603 2314 eval_gettext "Recharging undigest \$base_path:"; echo
pascal@187 2315 fi
gokhlayeh@430 2316
pascal@187 2317 if [ -f "packages.list" ]; then
al@603 2318 action "Creating backup of the last packages list..."
slaxemulator@588 2319 for i in packages.desc packages.$SUM packages.txt \
pankso@580 2320 packages.list packages.equiv files.list.lzma \
pankso@580 2321 mirrors
pankso@580 2322 do
gokhlayeh@438 2323 mv -f $i $i.bak 2>/dev/null
gokhlayeh@438 2324 done
pascal@187 2325 status
pascal@187 2326 fi
gokhlayeh@546 2327
slaxemulator@576 2328 for i in desc md5 txt list equiv; do
mojo@575 2329 download_from "$(cat mirror)" packages.$i
gokhlayeh@438 2330 done
pankso@598 2331 download_from "$(cat mirror)" files.list.lzma
slaxemulator@576 2332 download_from "$(sed 's|packages/.*||' < mirror)" mirrors
pankso@598 2333
pascal@187 2334 if [ -f "packages.list.bak" ]; then
pascal@187 2335 diff -u packages.list.bak packages.list | grep ^+[a-z] > packages.diff
pascal@187 2336 sed -i s/+// packages.diff
al@603 2337 title 'Mirrored packages diff'
pascal@187 2338 cat packages.diff
pankso@344 2339 new_pkgs=`cat packages.diff | wc -l`
pankso@344 2340 if [ "$new_pkgs" != 0 ]; then
al@633 2341 num=$(emsg "<c 32>$new_pkgs</c>")
al@603 2342 footer "$(eval_ngettext \
al@633 2343 '$num new package on the mirror.' \
al@633 2344 '$num new packages on the mirror.' $new_pkgs)"
pascal@187 2345 else
pankso@344 2346 gettext "No new packages on the mirror."; echo
pankso@600 2347 newline
pascal@187 2348 fi
pankso@6 2349 else
al@603 2350 footer "$(gettext \
al@603 2351 'Last packages.list is ready to use. Note that next time you recharge the
pankso@344 2352 list, a list of differences will be displayed to show new and upgradeable
al@603 2353 packages.')"
pascal@187 2354 fi
pankso@309 2355 done ;;
al@603 2356 help-up)
al@603 2357 # Options available for the command: up
al@603 2358 newline; usage_up; newline
al@603 2359 exit 1
al@603 2360 ;;
al@603 2361 up|upgrade)
pankso@466 2362 #
paul@476 2363 # This is the new way to upgrade packages making 'upgrade' and
pankso@466 2364 # upgradeable out-of-date. This new way is much, much more faster!
paul@476 2365 # Look into installed packages and get data from receipt, it is fast
paul@476 2366 # and easy to handle vars after using only md5sum to compare packages
pankso@598 2367 #
pankso@466 2368 for opt in $@
pankso@466 2369 do
pankso@466 2370 case "$opt" in
pankso@466 2371 --recharge|-r)
pankso@466 2372 tazpkg recharge ;;
pankso@466 2373 --install|-i)
pankso@466 2374 install="y" ;;
pankso@466 2375 --check|-c)
pankso@466 2376 install="n" ;;
pankso@466 2377 esac
pankso@466 2378 done
pankso@598 2379 time=$(date +%s)
slaxemulator@588 2380 installed_sum=$LOCALSTATE/installed.$SUM
gokhlayeh@536 2381 look_for_priority
gokhlayeh@536 2382 for repo in $priority; do
gokhlayeh@536 2383 pkg_list=$repo/packages.list
gokhlayeh@536 2384 mtime=`find $pkg_list -mtime +7`
gokhlayeh@536 2385 if [ "$mtime" ]; then
gokhlayeh@536 2386 if [ "$repo" = "$LOCALSTATE" ]; then
gokhlayeh@536 2387 repo_name=main
gokhlayeh@536 2388 else
gokhlayeh@536 2389 repo_name="${repo##*/}"
slaxemulator@516 2390 fi
gokhlayeh@536 2391 eval_gettext "\$pkg_list is older than one week... recharging"; echo
gokhlayeh@536 2392 tazpkg recharge $repo_name
gokhlayeh@536 2393 fi
gokhlayeh@536 2394 done
al@603 2395 emsg "<n><b>$(gettext 'Package')</b><i 28> $(gettext 'Version')<i 48> $(gettext 'Status')<->"
slaxemulator@535 2396 cd $INSTALLED
pankso@600 2397 newline > $UP_LIST
ben@483 2398 blocked_count=0
pankso@466 2399 for pkg in *
pankso@466 2400 do
pankso@485 2401 unset VERSION EXTRAVERSION
pankso@466 2402 . $pkg/receipt
pankso@485 2403 md5=$(fgrep " $PACKAGE-${VERSION}$EXTRAVERSION.tazpkg" \
slaxemulator@588 2404 $installed_sum | awk '{print $1}')
gokhlayeh@536 2405 for repo in $priority; do
gokhlayeh@536 2406 pkg_desc=$repo/packages.desc
gokhlayeh@536 2407 pkg_list=$repo/packages.list
slaxemulator@588 2408 pkg_sum=$repo/packages.$SUM
gokhlayeh@536 2409
slaxemulator@588 2410 if ! fgrep -q "$md5 $PACKAGE-" $pkg_sum; then
gokhlayeh@536 2411 # Jump to next repository in priority if pkg doesn't exists
gokhlayeh@536 2412 # in this one.
gokhlayeh@536 2413 grep -q ^$PACKAGE- $pkg_list || continue
gokhlayeh@536 2414
al@603 2415 emsg -n "$PACKAGE<i 28> $VERSION"
pankso@598 2416
ben@483 2417 # Skip pkgs listed in $LOCALSTATE/blocked-packages.list
gokhlayeh@536 2418 if $(grep -qs "^$PACKAGE" $BLOCKED); then
pankso@598 2419 blocked_count=$(($blocked_count + 1))
al@603 2420 emsg "<i 48><c 31> $(gettext 'Blocked')</c>"
gokhlayeh@536 2421 break
gokhlayeh@536 2422 fi
pankso@598 2423
gokhlayeh@536 2424 new=$(grep "^$PACKAGE |" $pkg_desc | awk '{print $3}')
pankso@598 2425
ben@483 2426 if [ "$VERSION" == "$new" ]; then
al@603 2427 emsg "<i 48><c 34> $(gettext 'New build')</c>"
ben@483 2428 else
al@603 2429 emsg "<i 48><c 32> $(eval_gettext 'New version $new')</c>"
ben@483 2430 fi
ben@483 2431 echo "$PACKAGE" >> $UP_LIST
gokhlayeh@536 2432 break
pankso@466 2433 fi
gokhlayeh@536 2434 done
pankso@466 2435 done
pankso@466 2436 sed -i /^$/d $UP_LIST
pankso@496 2437 upnb=$(cat $UP_LIST | wc -l)
pankso@496 2438 pkgs=$(ls | wc -l)
pankso@598 2439 time=$(($(date +%s) - $time))
pankso@480 2440 if [ "$upnb" = 0 ]; then
pankso@480 2441 install="n"
al@603 2442 gettext "System is up-to-date..."; echo
al@603 2443 newline
pankso@598 2444 fi
al@633 2445 num=$(emsg "<c 32>$new_pkgs</c>")
al@603 2446 footer "$(eval_ngettext \
al@633 2447 '$num installed package scanned in ${time}s' \
al@633 2448 '$num installed packages scanned in ${time}s' $pkgs)"
pankso@598 2449 if [ "$upnb" != 0 ]; then
ben@483 2450 if [ "$blocked_count" -gt 0 ]; then
al@633 2451 num=$blocked_count
al@633 2452 blocked=$(eval_ngettext '$num blocked' '$num blocked' $num)
ben@483 2453 fi
al@633 2454 num=$upnb
al@603 2455 boldify "$(eval_ngettext \
al@633 2456 'You have $num available upgrade ($blocked)' \
al@633 2457 'You have $num available upgrades ($blocked)' $num)"
al@603 2458 newline
pankso@480 2459 fi
pankso@466 2460 # Pkgs to upgrade ? Skip, let install them all or ask user
pankso@466 2461 [ "$install" == "n" ] && exit 0
pankso@480 2462 if [ "$upnb" -gt 0 ]; then
pankso@466 2463 if [ "$install" == "y" ]; then
pankso@466 2464 continue
pankso@466 2465 else
pankso@485 2466 gettext "Do you wish to install them now: y/n ? "
pankso@466 2467 read install
pankso@466 2468 fi
pankso@466 2469 case "$install" in
pankso@466 2470 y|Y|yes|YES|Yes)
pankso@502 2471 for pkg in $(cat $UP_LIST)
pankso@466 2472 do
pankso@466 2473 echo 'y' | tazpkg get-install $pkg --forced
pankso@502 2474 done
paul@554 2475 # List is generated each time and must be cleaned so
al@633 2476 # tazpkg-notify don't find upgrade anymore.
pankso@502 2477 rm $UP_LIST && touch $UP_LIST ;;
pankso@466 2478 *)
al@603 2479 gettext "Leaving without any upgrades installed."; echo
al@603 2480 newline
pankso@466 2481 exit 0 ;;
pankso@466 2482 esac
pankso@466 2483 fi
pankso@600 2484 newline ;;
pascal@152 2485 bugs)
pascal@152 2486 # Show known bugs in package(s)
pascal@152 2487 cd $INSTALLED
pascal@159 2488 shift
pascal@159 2489 LIST=$@
pascal@159 2490 [ -n "$LIST" ] || LIST=`ls`
gokhlayeh@388 2491 MSG=$(gettext "No known bugs.")
pascal@152 2492 for PACKAGE in $LIST; do
pascal@152 2493 BUGS=""
pascal@154 2494 EXTRAVERSION=""
pascal@152 2495 . $PACKAGE/receipt
pascal@152 2496 if [ -n "$BUGS" ]; then
gokhlayeh@388 2497 MSG=$(gettext "Bug list completed")
pankso@600 2498 newline
pankso@344 2499 eval_gettext "Bugs in package \$PACKAGE version \$VERSION\$EXTRAVERSION:"; echo
pascal@152 2500 cat <<EOT
pascal@152 2501 $BUGS
pascal@152 2502 EOT
pascal@152 2503 fi
pascal@152 2504 done
pankso@309 2505 echo "$MSG" ;;
pascal@25 2506 check)
MikeDSmith25@135 2507 # Check installed packages set.
al@603 2508 check_root $@
pankso@598 2509
gokhlayeh@386 2510 # Get repositories priority list.
gokhlayeh@386 2511 look_for_priority
pankso@598 2512
pascal@25 2513 cd $INSTALLED
pascal@25 2514 for PACKAGE in `ls`; do
pascal@122 2515 if [ ! -f $PACKAGE/receipt ]; then
pankso@344 2516 eval_gettext "The package \$PACKAGE installation has not completed"; echo
pascal@122 2517 continue
pascal@122 2518 fi
pascal@29 2519 DEPENDS=""
pascal@114 2520 EXTRAVERSION=""
pascal@29 2521 . $PACKAGE/receipt
pascal@29 2522 if [ -s $PACKAGE/modifiers ]; then
pankso@344 2523 eval_gettext \
al@603 2524 "The package \$PACKAGE-\$VERSION\$EXTRAVERSION has been modified by:"; echo
pascal@29 2525 for i in $(cat $PACKAGE/modifiers); do
pascal@29 2526 echo " $i"
pascal@29 2527 done
pascal@29 2528 fi
al@603 2529 MSG="$(eval_gettext 'Files lost from $PACKAGE-$VERSION$EXTRAVERSION:')\n"
pascal@25 2530 while read file; do
pascal@25 2531 [ -e "$file" ] && continue
pascal@25 2532 if [ -L "$file" ]; then
al@603 2533 MSG="$MSG $(gettext 'target of symlink')"
pascal@25 2534 fi
pascal@25 2535 echo -e "$MSG $file"
pascal@25 2536 MSG=""
pascal@25 2537 done < $PACKAGE/files.list
al@603 2538 MSG="$(eval_gettext 'Missing dependencies for $PACKAGE-$VERSION$EXTRAVERSION:')\n"
pascal@25 2539 for i in $DEPENDS; do
pascal@25 2540 [ -d $i ] && continue
pascal@290 2541 [ -d $(equivalent_pkg $i) ] && continue
pascal@25 2542 echo -e "$MSG $i"
pascal@25 2543 MSG=""
pascal@25 2544 done
al@603 2545 MSG="$(eval_gettext 'Dependencies loop between $PACKAGE and:')\n"
pascal@122 2546 ALL_DEPS=""
pascal@122 2547 check_for_deps_loop $PACKAGE $DEPENDS
pascal@25 2548 done
al@603 2549 gettext "Looking for known bugs..."; echo
pascal@152 2550 tazpkg bugs
pascal@60 2551 if [ "$PACKAGE_FILE" = "--full" ]; then
slaxemulator@588 2552 for file in */$CHECKSUM; do
pascal@177 2553 CONFIG_FILES=""
pascal@177 2554 . $(dirname "$file")/receipt
pascal@106 2555 [ -s "$file" ] || continue
pascal@177 2556 while read md5 f; do
pascal@177 2557 [ -f $f ] || continue
pascal@177 2558 for i in $CONFIG_FILES; do
pascal@177 2559 case "$f" in
pascal@177 2560 $i|$i/*) continue 2;;
pascal@177 2561 esac
pascal@177 2562 done
pascal@177 2563 echo "$md5 $f"
slaxemulator@588 2564 done < "$file" | $CHECKSUM -c - 2> /dev/null | \
slaxemulator@588 2565 grep -v OK$ | sed 's/FAILED$/$CHECKSUM MISMATCH/'
pascal@106 2566 done
pascal@60 2567 FILES=" "
pascal@60 2568 for file in $(cat */files.list); do
pascal@60 2569 [ -d "$file" ] && continue
pascal@60 2570 case "$FILES" in *\ $file\ *) continue;; esac
pascal@377 2571 [ $(grep "^$(echo $file | grepesc)$" */files.list 2> /dev/null | \
pascal@60 2572 wc -l) -gt 1 ] || continue
pascal@60 2573 FILES="$FILES$file "
al@603 2574 eval_gettext "The following packages provide \$file:"; echo
pascal@377 2575 grep -l "^$(echo $file | grepesc)$" */files.list | while read f
pascal@60 2576 do
pascal@60 2577 pkg=${f%/files.list}
pascal@60 2578 if [ -f $pkg/modifiers ]; then
al@633 2579 pkg_list="$(cat $pkg/modifiers)"
al@633 2580 overriders=$(eval_gettext '(overridden by $pkg_list)')
al@603 2581 else
al@633 2582 overriders=''
pascal@60 2583 fi
al@633 2584 echo -n " $pkg $overriders"
pankso@600 2585 newline
pascal@60 2586 done
pascal@60 2587 done
al@603 2588 MSG="$(gettext 'No package has installed the following files:')\n"
pascal@155 2589 find /etc /bin /sbin /lib /usr /var/www \
pascal@155 2590 -not -type d 2> /dev/null | while read file; do
pascal@73 2591 case "$file" in *\[*) continue;; esac
pascal@377 2592 grep -q "^$(echo $file | grepesc)$" */files.list && continue
pascal@73 2593 echo -e "$MSG $file"
pascal@73 2594 MSG=""
pascal@73 2595 done
pascal@60 2596 fi
gokhlayeh@388 2597 gettext "Check completed."; echo ;;
pankso@10 2598 block)
pankso@10 2599 # Add a pkg name to the list of blocked packages.
al@603 2600 check_root $@
pankso@10 2601 check_for_package_on_cmdline
pankso@600 2602 newline
pascal@223 2603 if grep -qs "^$PACKAGE" $BLOCKED; then
pankso@344 2604 eval_gettext "\$PACKAGE is already in the blocked packages list."; echo
pankso@600 2605 newline
pankso@10 2606 exit 0
pankso@10 2607 else
al@603 2608 action "Add \$PACKAGE to: \$BLOCKED..."
pankso@10 2609 echo $PACKAGE >> $BLOCKED
pankso@10 2610 status
pascal@183 2611 # Log this activity
pascal@183 2612 . $INSTALLED/$PACKAGE/receipt
al@603 2613 log_pkg Blocked
pankso@10 2614 fi
pankso@600 2615 newline ;;
pankso@10 2616 unblock)
MikeDSmith25@135 2617 # Remove a pkg name from the list of blocked packages.
al@603 2618 check_root $@
pankso@10 2619 check_for_package_on_cmdline
pankso@600 2620 newline
pascal@223 2621 if grep -qs "^$PACKAGE" $BLOCKED; then
al@603 2622 action "Removing \$PACKAGE from: \$BLOCKED..."
pankso@10 2623 sed -i s/$PACKAGE/''/ $BLOCKED
pankso@10 2624 sed -i '/^$/d' $BLOCKED
pankso@10 2625 status
pascal@183 2626 # Log this activity
pascal@183 2627 . $INSTALLED/$PACKAGE/receipt
al@603 2628 log_pkg Unblocked
pankso@10 2629 else
gokhlayeh@388 2630 eval_gettext "\$PACKAGE is not in the blocked packages list."; echo
pankso@600 2631 newline
pankso@10 2632 exit 0
pankso@10 2633 fi
pankso@600 2634 newline ;;
pankso@6 2635 get)
al@603 2636 # Download a package with wget.
al@603 2637 check_root $@
pankso@6 2638 check_for_package_on_cmdline
pankso@6 2639 check_for_packages_list
pankso@598 2640
slaxemulator@478 2641 [ "$root" ] && ROOT="$root" && check_base_dir "$root"
slaxemulator@478 2642 if [ "$rootconfig" ]; then
slaxemulator@478 2643 if [ "$root" ]; then
slaxemulator@478 2644 CACHE_DIR=$root/$CACHE_DIR
slaxemulator@478 2645 SAVE_CACHE_DIR=$CACHE_DIR
slaxemulator@478 2646 LOCALSTATE=$root/$LOCALSTATE
slaxemulator@478 2647 else
al@603 2648 gettext "rootconfig needs --root= option used." >&2
al@603 2649 echo >&2
slaxemulator@478 2650 exit 1
slaxemulator@478 2651 fi
slaxemulator@478 2652 fi
pankso@598 2653
gokhlayeh@386 2654 # Get repositories priority list.
gokhlayeh@386 2655 look_for_priority
pankso@598 2656
slaxemulator@478 2657 CURRENT_DIR=$PWD
pankso@6 2658 check_for_package_in_list
slaxemulator@478 2659 cd $CACHE_DIR
slaxemulator@478 2660 if [ -f "$PACKAGE.tazpkg" ]; then
al@603 2661 eval_gettext "\$PACKAGE already in the cache: \$CACHE_DIR"; echo
slaxemulator@478 2662 # Check package download was finished
slaxemulator@478 2663 tail -c 2k $PACKAGE.tazpkg | fgrep -q 00000000TRAILER || {
slaxemulator@478 2664 eval_gettext "Continuing \$PACKAGE download"; echo
slaxemulator@478 2665 download $PACKAGE.tazpkg
slaxemulator@478 2666 }
slaxemulator@588 2667 if [ "$($CHECKSUM $PACKAGE.tazpkg)" != "$(fgrep " $PACKAGE.tazpkg" $rep/packages.$SUM)" ]; then
slaxemulator@378 2668 rm -f $PACKAGE.tazpkg
slaxemulator@378 2669 download $PACKAGE.tazpkg
slaxemulator@378 2670 fi
slaxemulator@378 2671 else
slaxemulator@378 2672 download $PACKAGE.tazpkg
slaxemulator@378 2673 fi
slaxemulator@478 2674 PACKAGE_FILE=$CACHE_DIR/$PACKAGE.tazpkg
slaxemulator@478 2675 cp -a $PACKAGE_FILE $CURRENT_DIR
slaxemulator@478 2676 ;;
pankso@504 2677 get-install|-gi)
pankso@6 2678 # Download and install a package.
al@603 2679 check_root $@
pankso@6 2680 check_for_package_on_cmdline
pankso@6 2681 check_for_packages_list
pankso@598 2682
pascal@121 2683 DO_CHECK=""
gokhlayeh@406 2684 [ "$forced" ] && DO_CHECK=no
gokhlayeh@429 2685 [ "$root" ] && ROOT="$root" && check_base_dir "$root"
gokhlayeh@406 2686 [ "$list" ] && INSTALL_LIST="$list"
gokhlayeh@431 2687 if [ "$rootconfig" ]; then
gokhlayeh@429 2688 if [ "$root" ]; then
gokhlayeh@429 2689 CACHE_DIR=$root/$CACHE_DIR
gokhlayeh@436 2690 SAVE_CACHE_DIR=$CACHE_DIR
gokhlayeh@429 2691 LOCALSTATE=$root/$LOCALSTATE
gokhlayeh@429 2692 else
al@603 2693 gettext "rootconfig needs --root= option used." >&2
al@603 2694 echo >&2
gokhlayeh@429 2695 exit 1
gokhlayeh@429 2696 fi
gokhlayeh@429 2697 fi
gokhlayeh@436 2698
gokhlayeh@436 2699 # Get repositories priority list.
gokhlayeh@436 2700 look_for_priority
gokhlayeh@436 2701
pascal@202 2702 AUTOEXEC="no"
gokhlayeh@416 2703 if ! check_for_package_in_list check; then
gokhlayeh@416 2704 PACKAGE=get-$PACKAGE
pascal@202 2705 AUTOEXEC=$PACKAGE
pascal@202 2706 check_for_package_in_list
pascal@202 2707 if [ -n "$(get_installed_package_pathname $PACKAGE $ROOT)" ]; then
gokhlayeh@419 2708 CACHE_DIR="${CACHE_DIR%/*}/get"
gokhlayeh@419 2709 [ -d "$CACHE_DIR" ] || mkdir -p $CACHE_DIR
pascal@202 2710 $AUTOEXEC $ROOT
pascal@202 2711 exit 0
pascal@202 2712 fi
gokhlayeh@416 2713 fi
pankso@6 2714 # Check if forced install.
gokhlayeh@423 2715 if ! [ "$forced" ]; then
pascal@121 2716 check_for_installed_package $ROOT
pankso@6 2717 fi
pankso@6 2718 cd $CACHE_DIR
pankso@6 2719 if [ -f "$PACKAGE.tazpkg" ]; then
al@603 2720 eval_gettext "\$PACKAGE already in the cache: \$CACHE_DIR"; echo
MikeDSmith25@135 2721 # Check package download was finished
gokhlayeh@409 2722 tail -c 2k $PACKAGE.tazpkg | fgrep -q 00000000TRAILER || {
paul@349 2723 eval_gettext "Continuing \$PACKAGE download"; echo
pascal@108 2724 download $PACKAGE.tazpkg
pascal@108 2725 }
slaxemulator@588 2726 if [ "$($CHECKSUM $PACKAGE.tazpkg)" != "$(fgrep " $PACKAGE.tazpkg" $rep/packages.$SUM)" ]; then
slaxemulator@375 2727 rm -f $PACKAGE.tazpkg
pascal@374 2728 download $PACKAGE.tazpkg
pascal@374 2729 fi
pankso@6 2730 else
pankso@600 2731 newline
pascal@17 2732 download $PACKAGE.tazpkg
pankso@6 2733 fi
pankso@14 2734 PACKAGE_FILE=$CACHE_DIR/$PACKAGE.tazpkg
gokhlayeh@448 2735 [ "$rootconfig" ] && LOCALSTATE=${LOCALSTATE#$root}
pascal@121 2736 install_package $ROOT
pankso@598 2737 [ "$AUTOEXEC" != "no" ] && $PACKAGE $ROOT
pankso@598 2738 update_desktop_database $ROOT
slaxemulator@369 2739 update_mime_database $ROOT ;;
pankso@504 2740 clean-cache|-cc)
pankso@6 2741 # Remove all downloaded packages.
al@603 2742 check_root $@
pankso@499 2743 files=$(find $CACHE_DIR -name *.tazpkg | wc -l)
al@603 2744 title 'Clean cache: $CACHE_DIR'
al@603 2745 action "Cleaning cache directory..."
pankso@6 2746 rm -rf $CACHE_DIR/*
al@603 2747 status
al@633 2748 num=$(emsg "<c 32>$new_pkgs</c>")
al@603 2749 footer "$(eval_ngettext \
al@633 2750 '$num file removed from cache.' \
al@633 2751 '$num files removed from cache.' $files)"
al@603 2752 ;;
pascal@187 2753 list-undigest)
pascal@187 2754 # list undigest URLs.
pascal@187 2755 if [ "$2" = "--box" ]; then
pascal@187 2756 for i in $LOCALSTATE/undigest/*/mirror; do
pascal@187 2757 [ -f $i ] || continue
pascal@187 2758 echo "$(basename $(dirname $i))|$(cat $i)"
pascal@187 2759 done
pascal@187 2760 else
al@603 2761 title 'Current undigest(s)'
pascal@187 2762 for i in $LOCALSTATE/undigest/*/mirror; do
pascal@187 2763 if [ ! -f $i ]; then
pankso@344 2764 gettext "No undigest mirror found."; echo
pascal@187 2765 exit 1
pascal@187 2766 fi
pascal@187 2767 echo "$(basename $(dirname $i)) $(cat $i)"
pascal@187 2768 done
pankso@600 2769 newline
pankso@309 2770 fi ;;
pascal@187 2771 remove-undigest)
pascal@187 2772 # remove undigest URL.
al@603 2773 check_root $@
gokhlayeh@388 2774 undigest="$2"
pascal@187 2775 if [ -d $LOCALSTATE/undigest/$2 ]; then
al@603 2776 eval_gettext "Remove \$undigest undigest" && confirm
al@603 2777 if [ $? = 0 ]; then
al@603 2778 action "Removing \$undigest undigest..."
pascal@187 2779 rm -rf $LOCALSTATE/undigest/$2
pascal@187 2780 status
pascal@187 2781 rmdir $LOCALSTATE/undigest 2> /dev/null
pascal@187 2782 fi
pascal@187 2783 else
gokhlayeh@388 2784 eval_gettext "Undigest \$undigest not found"; echo
pankso@309 2785 fi ;;
pascal@187 2786 add-undigest|setup-undigest)
pascal@187 2787 # Add undigest URL.
al@603 2788 check_root $@
pascal@187 2789 undigest=$2
pascal@187 2790 [ -d $LOCALSTATE/undigest ] || mkdir $LOCALSTATE/undigest
pascal@187 2791 if [ -z "$undigest" ]; then
pascal@187 2792 i=1
pascal@187 2793 while [ -d $LOCALSTATE/undigest/$i ]; do
pascal@187 2794 i=$(($i+1))
pascal@187 2795 done
pascal@187 2796 undigest=$i
pascal@187 2797 fi
pascal@187 2798 if [ ! -d $LOCALSTATE/undigest/$undigest ]; then
pankso@344 2799 eval_gettext "Creating new undigest \$undigest."; echo
pascal@187 2800 mkdir $LOCALSTATE/undigest/$undigest
pascal@187 2801 fi
pankso@309 2802 setup_mirror $LOCALSTATE/undigest/$undigest $3 ;;
pankso@600 2803 setup-mirror|-sm)
pankso@6 2804 # Change mirror URL.
al@603 2805 check_root $@
pankso@309 2806 setup_mirror $LOCALSTATE $2 ;;
erjo@56 2807 reconfigure)
erjo@56 2808 # Replay post_install from receipt
erjo@56 2809 check_for_package_on_cmdline
al@603 2810 check_root $@
pascal@250 2811 ROOT=""
pascal@250 2812 while [ -n "$3" ]; do
pascal@250 2813 case "$3" in
pascal@250 2814 --root=*)
pankso@309 2815 ROOT="${3#--root=}/" ;;
pascal@250 2816 *) shift 2
al@603 2817 u_opt="$*"
al@603 2818 echo -e "\n$(gettext 'Unknown option $u_opt.')\n" >&2
pankso@309 2819 exit 1 ;;
pascal@250 2820 esac
pascal@250 2821 shift
pascal@250 2822 done
pascal@250 2823 if [ -d "$ROOT$INSTALLED/$PACKAGE" ]; then
pascal@250 2824 check_for_receipt $ROOT
erjo@56 2825 # Check for post_install
pascal@250 2826 if grep -q ^post_install $ROOT$INSTALLED/$PACKAGE/receipt; then
pascal@250 2827 . $ROOT$INSTALLED/$PACKAGE/receipt
pascal@250 2828 post_install $ROOT
pascal@183 2829 # Log this activity
al@603 2830 [ -n "$ROOT" ] || log_pkg Reconfigured
pankso@279 2831 else
pankso@600 2832 newline
pankso@344 2833 eval_gettext "Nothing to do for \$PACKAGE."; echo
erjo@56 2834 fi
erjo@56 2835 else
pankso@600 2836 newline
paul@349 2837 eval_gettext "Package \$PACKAGE is not installed."; echo
pankso@344 2838 gettext "Install package with 'tazpkg install' or 'tazpkg get-install'"; echo
pankso@600 2839 newline
pankso@309 2840 fi ;;
pankso@55 2841 shell)
al@633 2842 # TazPkg SHell
pankso@55 2843 if test $(id -u) = 0 ; then
pankso@55 2844 PROMPT="\\033[1;33mtazpkg\\033[0;39m# "
pankso@55 2845 else
pankso@55 2846 PROMPT="\\033[1;33mtazpkg\\033[0;39m> "
pankso@55 2847 fi
pankso@55 2848 if [ ! "$2" = "--noheader" ]; then
pankso@55 2849 clear
al@633 2850 title 'TazPkg SHell.'
pankso@344 2851 gettext "Type 'usage' to list all available commands or 'quit' or 'q' to exit."; echo
pankso@600 2852 newline
pankso@55 2853 fi
pankso@55 2854 while true
pankso@55 2855 do
pankso@55 2856 echo -en "$PROMPT"; read cmd
pankso@55 2857 case $cmd in
pankso@55 2858 q|quit)
pankso@55 2859 break ;;
pankso@55 2860 shell)
al@633 2861 gettext "You are already running a TazPkg SHell."; echo ;;
pankso@55 2862 su)
pankso@55 2863 su -c 'exec tazpkg shell --noheader' && break ;;
pankso@55 2864 "")
pankso@55 2865 continue ;;
pankso@55 2866 *)
pankso@55 2867 tazpkg $cmd ;;
pankso@55 2868 esac
pankso@309 2869 done ;;
pascal@205 2870 depends)
paul@247 2871 # Display dependencies tree
pascal@205 2872 cd $INSTALLED
pascal@205 2873 ALL_DEPS=""
pascal@205 2874 if [ -f $2/receipt ]; then
pascal@205 2875 dep_scan $2 ""
pankso@309 2876 fi ;;
pascal@205 2877 rdepends)
paul@247 2878 # Display reverse dependencies tree
pascal@205 2879 cd $INSTALLED
pascal@205 2880 ALL_DEPS=""
pascal@205 2881 if [ -f $2/receipt ]; then
pascal@260 2882 rdep_scan $2
pankso@309 2883 fi ;;
pankso@504 2884 convert|-c)
pascal@262 2885 # convert misc package format to .tazpkg
pascal@263 2886 check_for_package_file
pankso@598 2887 [ -n "$TARGET_DIR" -a -s "$TARGET_DIR/files.list.lzma" ] &&
pascal@515 2888 TMPLOCALSTATE="$TARGET_DIR"
pascal@426 2889 if [ "$(dd if=$PACKAGE_FILE bs=8 count=1 skip=1 2> /dev/null)" \
pascal@426 2890 == "debian-b" ]; then
pascal@426 2891 convert_deb
pascal@426 2892 else
pascal@263 2893 case "$PACKAGE_FILE" in
pascal@262 2894 *.deb|*.udeb)
pascal@263 2895 convert_deb;;
pascal@264 2896 *.rpm)
pascal@264 2897 convert_rpm;;
pascal@639 2898 *.sb)
pascal@639 2899 convert_sb;;
pascal@637 2900 *.sfs)
pascal@637 2901 convert_sfs;;
pascal@636 2902 *.pet)
pascal@636 2903 convert_pet;;
pascal@275 2904 *.tgz)
pascal@275 2905 convert_tgz;;
pascal@638 2906 *.apk|*.pkg.tar.gz|*.pkg.tar.xz)
pascal@288 2907 convert_arch;;
pascal@296 2908 *.ipk|*.opk)
pascal@296 2909 convert_ipk;;
pascal@262 2910 *)
pankso@344 2911 gettext "Unsupported format"; echo ;;
pascal@426 2912 esac
pascal@426 2913 fi ;;
pascal@263 2914 link)
pascal@263 2915 # link a package from another slitaz installation
pascal@263 2916 PACKAGE=$2
pascal@263 2917 if [ ! -d "$TARGET_DIR" -o \
pascal@263 2918 ! -d "$TARGET_DIR$INSTALLED/$PACKAGE" ]; then
al@603 2919 gettext "
pascal@263 2920 usage: tazpkg link package_name slitaz_root
paul@272 2921 example: 'tazpkg link openoffice /mnt' will use less than 100k in
paul@437 2922 your running system ram.
al@603 2923 "
pascal@263 2924 exit 1
pascal@263 2925 fi
pascal@263 2926 if [ -e "$INSTALLED/$PACKAGE" ]; then
pankso@344 2927 eval_gettext "\$PACKAGE is already installed."; echo
pascal@263 2928 exit 1
pascal@263 2929 fi
pascal@263 2930 ln -s $TARGET_DIR$INSTALLED/$PACKAGE $INSTALLED
pascal@266 2931 DEPENDS="$(. $INSTALLED/$PACKAGE/receipt ; echo $DEPENDS)"
pascal@266 2932 MISSING=""
pascal@266 2933 for i in $DEPENDS; do
pascal@266 2934 [ -e $INSTALLED/$i ] && continue
pascal@266 2935 MISSING="$MISSING$i "
al@603 2936 eval_gettext "Missing: \$i"; echo
pascal@266 2937 done
pascal@266 2938 if [ -n "$MISSING" ]; then
pankso@600 2939 newline
al@603 2940 gettext "Link all missing dependencies" && confirm
al@603 2941 answer=$?
pankso@600 2942 newline
al@603 2943 if [ $answer = 0 ]; then
pascal@266 2944 for i in $MISSING; do
pascal@266 2945 tazpkg link $i $TARGET_DIR
pascal@266 2946 done
pascal@266 2947 else
pankso@600 2948 newline
al@603 2949 eval_gettext "Leaving dependencies unresolved for: \$PACKAGE"; echo
al@603 2950 gettext "The package is installed but probably will not work."; echo
pankso@600 2951 newline
pascal@266 2952 fi
pascal@266 2953 fi
pascal@266 2954 . $INSTALLED/$PACKAGE/receipt
pascal@266 2955 if grep -q ^pre_install $INSTALLED/$PACKAGE/receipt; then
pascal@266 2956 pre_install
pascal@266 2957 fi
pascal@263 2958 while read path; do
pascal@263 2959 [ -e $path ] && continue
pascal@263 2960 while true; do
pascal@263 2961 dir=$(dirname $path)
pascal@263 2962 [ -e $dir ] && break
pascal@263 2963 path=$dir
pascal@263 2964 done
pascal@263 2965 ln -s $TARGET_DIR$path $dir
pascal@263 2966 done < $INSTALLED/$PACKAGE/files.list
pascal@266 2967 if grep -q ^post_install $INSTALLED/$PACKAGE/receipt; then
pascal@266 2968 post_install
pankso@309 2969 fi ;;
pankso@6 2970 usage|*)
pascal@119 2971 # Print a short help or give usage for an unknown or empty command.
pankso@279 2972 usage ;;
pankso@6 2973 esac
pankso@6 2974
pankso@6 2975 exit 0