tazpkg annotate tazpkg @ rev 260

Speedup tazpkg rdepends
author Pascal Bellard <pascal.bellard@slitaz.org>
date Mon May 11 15:20:14 2009 +0200 (2009-05-11)
parents b6abe28b3a03
children 9d4ab409df71
rev   line source
pankso@6 1 #!/bin/sh
paul@247 2 # Tazpkg - Tiny autonomous zone packages manager.
pankso@6 3 #
pankso@6 4 # This is a lightwight packages manager for *.tazpkg files, all written in
MikeDSmith25@135 5 # SHell 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
MikeDSmith25@135 7 # use 'tazpkg usage' to get a list of commands with short descriptions. Tazpkg
pascal@119 8 # also resolves dependencies and can upgrade packages from a mirror.
pankso@6 9 #
pankso@33 10 # (C) 2007-2008 SliTaz - GNU General Public License v3.
pankso@6 11 #
pankso@27 12 # Authors : Christophe Lincoln <pankso@slitaz.org>
pankso@31 13 # Pascal Bellard <pascal.bellard@slitaz.org>
pankso@57 14 # Eric Joseph-Alexandre <erjo@slitaz.org>
pankso@27 15 #
pascal@256 16 VERSION=2.8.1
pankso@6 17
pankso@6 18 ####################
pankso@6 19 # Script variables #
pankso@6 20 ####################
pankso@6 21
pankso@6 22 # Packages categories.
pankso@39 23 CATEGORIES="
pankso@39 24 base-system
pascal@160 25 x-window
pankso@39 26 utilities
pankso@39 27 network
pankso@39 28 graphics
pankso@39 29 multimedia
pankso@39 30 office
pankso@39 31 development
pankso@39 32 system-tools
pankso@39 33 security
pankso@39 34 games
pankso@39 35 misc
pankso@57 36 meta
pankso@57 37 non-free"
pankso@6 38
pankso@6 39 # Initialize some variables to use words
pascal@119 40 # rather than numbers for functions and actions.
pankso@6 41 COMMAND=$1
pankso@34 42 if [ -f "$2" ]; then
pankso@10 43 # Set pkg basename for install, extract
pankso@10 44 PACKAGE=$(basename ${2%.tazpkg} 2>/dev/null)
pankso@10 45 else
pankso@10 46 # Pkg name for remove, search and all other cmds
pankso@10 47 PACKAGE=${2%.tazpkg}
pankso@10 48 fi
pankso@9 49 PACKAGE_FILE=$2
pankso@6 50 TARGET_DIR=$3
pankso@6 51 TOP_DIR=`pwd`
pankso@6 52 TMP_DIR=/tmp/tazpkg-$$-$RANDOM
pankso@6 53
pankso@6 54 # Path to tazpkg used dir and configuration files
pankso@6 55 LOCALSTATE=/var/lib/tazpkg
pankso@6 56 INSTALLED=$LOCALSTATE/installed
pankso@6 57 CACHE_DIR=/var/cache/tazpkg
pankso@6 58 MIRROR=$LOCALSTATE/mirror
pankso@10 59 BLOCKED=$LOCALSTATE/blocked-packages.list
pankso@117 60 DEFAULT_MIRROR="http://mirror.slitaz.org/packages/`cat /etc/slitaz-release`/"
pascal@120 61 INSTALL_LIST=""
pascal@183 62 LOG=/var/log/tazpkg.log
pankso@6 63
pascal@119 64 # Bold red warning for upgrade.
pankso@10 65 WARNING="\\033[1;31mWARNING\\033[0;39m"
pankso@6 66
pankso@6 67 # Check if the directories and files used by Tazpkg
MikeDSmith25@135 68 # exist. If not and user is root we create them.
pankso@6 69 if test $(id -u) = 0 ; then
pankso@6 70 if [ ! -d "$CACHE_DIR" ]; then
pankso@6 71 mkdir -p $CACHE_DIR
pankso@6 72 fi
pankso@6 73 if [ ! -d "$INSTALLED" ]; then
pankso@55 74 mkdir -p $INSTALLED
pankso@6 75 fi
pankso@6 76 if [ ! -f "$LOCALSTATE/mirror" ]; then
pankso@55 77 echo "$DEFAULT_MIRROR" > $LOCALSTATE/mirror
pankso@6 78 fi
pankso@6 79 fi
pankso@6 80
pankso@6 81 ####################
pankso@6 82 # Script functions #
pankso@6 83 ####################
pankso@6 84
pankso@6 85 # Print the usage.
pankso@6 86 usage ()
pankso@6 87 {
MikeDSmith25@135 88 echo -e "SliTaz package manager - Version: $VERSION\n
pankso@55 89 \033[1mUsage:\033[0m tazpkg [command] [package|dir|pattern|list|cat|--opt] [dir|--opt]
pankso@55 90 tazpkg shell\n
pankso@6 91 \033[1mCommands: \033[0m
erjo@59 92 usage Print this short usage.
pascal@152 93 bugs Show known bugs in packages
erjo@59 94 list List installed packages on the system by category or all.
MikeDSmith25@135 95 xhtml-list Create a xHTML list of installed packges.
erjo@59 96 list-mirror List all available packages on the mirror (--diff for new).
MikeDSmith25@135 97 info Print information about a package.
MikeDSmith25@135 98 desc Print description of a package (if it exists).
MikeDSmith25@135 99 list-files List the files installed with a package.
pascal@139 100 list-config List the configuration files.
erjo@59 101 search Search for a package by pattern or name (options: -i|-l|-m).
erjo@59 102 search-file Search for file(s) in all installed packages files.
erjo@59 103 install Install a local (*.tazpkg) package (--forced to force).
erjo@59 104 install-list Install all packages from a list of packages.
erjo@59 105 remove Remove the specified package and all installed files.
erjo@59 106 extract Extract a (*.tazpkg) package into a directory.
erjo@59 107 pack Pack an unpacked or prepared package tree.
erjo@59 108 recharge Recharge your packages.list from the mirror.
MikeDSmith25@157 109 repack Create a package archive from an installed package.
MikeDSmith25@157 110 repack-config Create a package archive with configuration files.
erjo@59 111 upgrade Upgrade all installed and listed packages on the mirror.
erjo@59 112 block|unblock Block an installed package version or unblock it for upgrade.
erjo@59 113 get Download a package into the current directory.
erjo@59 114 get-install Download and install a package from the mirror.
erjo@59 115 get-install-list Download and install a list of packages from the mirror.
MikeDSmith25@135 116 check Verify consistency of installed packages.
pascal@74 117 add-flavor Install the flavor list of packages.
pascal@74 118 install-flavor Install the flavor list of packages and remove other ones.
pascal@74 119 set-release Change release and update packages
erjo@59 120 clean-cache Clean all packages downloaded in cache directory.
paul@247 121 depends Display dependencies tree.
paul@247 122 rdepends Display reverse dependencies tree.
erjo@59 123 setup-mirror Change the mirror url configuration.
pascal@187 124 list-undigest List undigest mirrors.
pascal@187 125 remove-undigest Remove an undigest mirror.
pascal@187 126 add-undigest Add an undigest mirror.
pascal@187 127 setup-undigest Update an undigest mirror.
pascal@187 128 reconfigure Replay post install script from package."
pankso@6 129 }
pankso@6 130
pankso@6 131 # Status function with color (supported by Ash).
pankso@6 132 status()
pankso@6 133 {
pankso@6 134 local CHECK=$?
pankso@6 135 echo -en "\\033[70G[ "
pankso@6 136 if [ $CHECK = 0 ]; then
pankso@6 137 echo -en "\\033[1;33mOK"
pankso@6 138 else
pankso@6 139 echo -en "\\033[1;31mFailed"
pankso@6 140 fi
pankso@6 141 echo -e "\\033[0;39m ]"
pascal@20 142 return $CHECK
pankso@6 143 }
pankso@6 144
pankso@6 145 # Check if user is root to install, or remove packages.
pankso@6 146 check_root()
pankso@6 147 {
pankso@6 148 if test $(id -u) != 0 ; then
pankso@6 149 echo -e "\nYou must be root to run `basename $0` with this option."
pankso@55 150 echo -e "Please use 'su' and root password to become super-user.\n"
pankso@6 151 exit 0
pankso@6 152 fi
pankso@6 153 }
pankso@6 154
pankso@6 155 # Check for a package name on cmdline.
pankso@6 156 check_for_package_on_cmdline()
pankso@6 157 {
pankso@6 158 if [ -z "$PACKAGE" ]; then
pankso@6 159 echo -e "\nPlease specify a package name on the command line.\n"
pankso@6 160 exit 0
pankso@6 161 fi
pankso@6 162 }
pankso@6 163
pankso@9 164 # Check if the package (*.tazpkg) exist before installing or extracting.
pankso@6 165 check_for_package_file()
pankso@6 166 {
pankso@9 167 if [ ! -f "$PACKAGE_FILE" ]; then
pankso@6 168 echo -e "
pankso@9 169 Unable to find : $PACKAGE_FILE\n"
pankso@6 170 exit 0
pankso@6 171 fi
pankso@6 172 }
pankso@6 173
pankso@6 174 # Check for the receipt of an installed package.
pankso@6 175 check_for_receipt()
pankso@6 176 {
pascal@250 177 if [ ! -f "$1$INSTALLED/$PACKAGE/receipt" ]; then
pascal@250 178 echo -e "\nUnable to find the receipt : $1$INSTALLED/$PACKAGE/receipt\n"
pankso@6 179 exit 0
pankso@6 180 fi
pankso@6 181 }
pankso@6 182
pascal@110 183 # Get package name in a directory
pascal@110 184 package_fullname_in_dir()
pascal@110 185 {
pascal@123 186 [ -f $2$1/receipt ] || return
pascal@114 187 EXTRAVERSION=""
pascal@121 188 . $2$1/receipt
pascal@110 189 echo $PACKAGE-$VERSION$EXTRAVERSION
pascal@110 190 }
pascal@110 191
pascal@110 192 # Get package name that is already installed.
pascal@110 193 get_installed_package_pathname()
pascal@110 194 {
pascal@121 195 for i in $2$INSTALLED/${1%%-*}*; do
pascal@115 196 [ -d $i ] || continue
pascal@121 197 if [ "$1" = "$(package_fullname_in_dir $i $2)" ]; then
pascal@110 198 echo $i
pascal@110 199 return
pascal@110 200 fi
pascal@110 201 done
pascal@110 202 }
pascal@110 203
pankso@6 204 # Check if a package is already installed.
pankso@6 205 check_for_installed_package()
pankso@6 206 {
pascal@121 207 if [ -n "$(get_installed_package_pathname $PACKAGE $1)" ]; then
pankso@6 208 echo -e "
pankso@6 209 $PACKAGE is already installed. You can use the --forced option to force
pankso@6 210 installation or remove it and reinstall.\n"
pankso@6 211 exit 0
pankso@6 212 fi
pankso@6 213 }
pankso@6 214
pankso@6 215 # Check for packages.list to download and install packages.
pankso@6 216 check_for_packages_list()
pankso@6 217 {
pankso@6 218 if [ ! -f "$LOCALSTATE/packages.list" ]; then
pankso@71 219 if test $(id -u) = 0 ; then
pankso@71 220 tazpkg recharge
pankso@71 221 else
pankso@71 222 echo -e "
pankso@6 223 Unable to find the list : $LOCALSTATE/packages.list\n
MikeDSmith25@135 224 You should probably run 'tazpkg recharge' as root to get the latest list of
MikeDSmith25@135 225 packages available on the mirror.\n"
pankso@71 226 exit 0
pankso@71 227 fi
pankso@6 228 fi
pankso@6 229 }
pankso@6 230
pascal@226 231 # get package from packages.equiv
pascal@226 232 equivalent_pkg()
pascal@226 233 {
pascal@226 234 for i in $(grep -hs "^$1=" $LOCALSTATE/packages.equiv \
pascal@226 235 $LOCALSTATE/undigest/*/packages.equiv | sed "s/^$1=//"); do
pascal@226 236 if echo $i | grep -q : ; then
pascal@226 237 # format 'alternative:newname'
pascal@226 238 # if alternative is installed then substitute newname
pascal@226 239 if [ -f $2$INSTALLED/${i%:*}/receipt ]; then
pascal@226 240 # substitute package dependancy
pascal@226 241 echo ${i#*:}
pascal@226 242 return
pascal@226 243 fi
pascal@226 244 else
pascal@226 245 # if alternative is installed then nothing to install
pascal@241 246 if [ -f $2$INSTALLED/$i/receipt ]; then
pascal@226 247 # substitute installed package
pascal@226 248 echo $i
pascal@226 249 return
pascal@226 250 fi
pascal@226 251 fi
pascal@226 252 done
pascal@226 253 # if not found in packages.equiv then no substitution
pascal@226 254 echo $1
pascal@226 255 }
pascal@226 256
pascal@190 257 # Get package filename available on the mirror
pascal@190 258 get_package_filename()
pascal@190 259 {
pascal@190 260 local pkg
pascal@190 261 pkg=$(grep -A 1 -sh "^$1$" $LOCALSTATE/packages.txt \
pascal@190 262 $LOCALSTATE/undigest/*/packages.txt | tail -1)
pascal@190 263 pkg=$(echo $pkg)
pascal@190 264 [ -n "$pkg" ] && pkg=$(grep -sh "^$1-$pkg" \
pascal@190 265 $LOCALSTATE/packages.list \
pascal@190 266 $LOCALSTATE/undigest/*/packages.list | head -1)
pascal@190 267 [ -n "$pkg" ] || pkg=$(grep -sh "^$1-[0-9]" \
pascal@190 268 $LOCALSTATE/packages.list \
pascal@190 269 $LOCALSTATE/undigest/*/packages.list | head -1)
pascal@190 270 [ -n "$pkg" ] || pkg=$(grep -sh "^$1-.[\.0-9]" \
pascal@190 271 $LOCALSTATE/packages.list \
pascal@190 272 $LOCALSTATE/undigest/*/packages.list | head -1)
pascal@226 273 if [ -z "$pkg" ]; then
pascal@226 274 # Check for vitual package
pascal@226 275 local equiv
pascal@226 276 equiv=$(equivalent_pkg $1 virtual)
pascal@226 277 if [ "$equiv" != "$1" ]; then
pascal@226 278 PACKAGE=$equiv
pascal@226 279 get_package_filename $PACKAGE
pascal@226 280 return
pascal@226 281 fi
pascal@226 282 fi
pascal@190 283 echo $pkg
pascal@190 284 }
pascal@190 285
pankso@6 286 # Check for a package in packages.list. Used by get and get-install to grep
pankso@6 287 # package basename.
pankso@6 288 check_for_package_in_list()
pankso@6 289 {
pascal@190 290 local filename
pascal@202 291 local check_only
pascal@202 292 check_only="$1"
pascal@190 293 filename=$(get_package_filename $PACKAGE)
pascal@190 294 if [ -n "$filename" ]; then
pascal@190 295 PACKAGE=$filename
pankso@6 296 else
pankso@6 297 echo -e "\nUnable to find : $PACKAGE in the mirrored packages list.\n"
pascal@202 298 [ -n "$check_only" ] && return 1
pankso@6 299 exit 0
pankso@6 300 fi
pankso@6 301 }
pankso@6 302
pascal@183 303 # Log this activity
pascal@183 304 log()
pascal@183 305 {
pascal@207 306 local extra
pascal@207 307 [ "$1" = "Installed" ] && \
pascal@207 308 extra=" - $(grep $PACKAGE-$VERSION $LOCALSTATE/installed.md5 | awk '{ print $1 }')"
pascal@183 309 [ -e $LOG ] || touch $LOG
pascal@183 310 DATE=`date +'%F %T'`
pascal@183 311 [ -w $LOG ] &&
pascal@207 312 echo "$DATE - $1 - $PACKAGE ($VERSION$EXTRAVERSION)$extra" >> $LOG
pascal@183 313 }
pascal@183 314
pascal@187 315 # Download a file from this mirror
pascal@187 316 download_from()
pascal@187 317 {
pascal@187 318 local i
pascal@187 319 local mirrors
pascal@187 320 mirrors="$1"
pascal@187 321 shift
pascal@187 322 for i in $mirrors; do
pascal@187 323 case "$i" in
pascal@187 324 http://*|ftp://*) wget -c $i$@ && break;;
pascal@187 325 *) cp $i/$1 . && break;;
pascal@187 326 esac
pascal@187 327 done
pascal@187 328 }
pascal@187 329
pascal@17 330 # Download a file trying all mirrors
pascal@17 331 download()
pascal@17 332 {
pascal@187 333 local i
pascal@225 334 case "$1" in
pascal@225 335 *.tazpkg)
pascal@225 336 for i in $LOCALSTATE $LOCALSTATE/undigest/* ; do
pascal@225 337 grep "^${1%.tazpkg}$" $i/packages.list || continue
pascal@225 338 download_from "$(cat $i/mirror)" "$@" && return
pascal@225 339 done
pascal@225 340 esac
pascal@187 341 for i in $(cat $MIRROR $LOCALSTATE/undigest/*/mirror 2> /dev/null); do
pascal@191 342 download_from "$i" "$@" && break
pascal@17 343 done
pascal@17 344 }
pascal@17 345
pankso@6 346 # Extract a package with cpio and gzip.
pankso@6 347 extract_package()
pankso@6 348 {
pankso@52 349 echo -n "Extracting $PACKAGE... "
pascal@246 350 cpio -idm < $PACKAGE.tazpkg && rm -f $PACKAGE.tazpkg
pankso@6 351 echo -n "Extracting the pseudo fs... "
pascal@246 352 zcat fs.cpio.gz | cpio -idm && rm fs.cpio.gz
pankso@6 353 }
pankso@6 354
MikeDSmith25@135 355 # This function installs a package in the rootfs.
pankso@6 356 install_package()
pankso@6 357 {
pascal@20 358 ROOT=$1
pascal@20 359 if [ -n "$ROOT" ]; then
MikeDSmith25@135 360 # Get absolute path
pascal@20 361 ROOT=$(cd $ROOT; pwd)
pascal@20 362 fi
pascal@122 363 (
MikeDSmith25@134 364 # Create package path early to avoid dependencies loop
pascal@122 365 mkdir -p $TMP_DIR
pascal@122 366 ( cd $TMP_DIR ; cpio -i receipt > /dev/null) < $PACKAGE_FILE
pascal@122 367 . $TMP_DIR/receipt
pascal@224 368 if grep -q ^pre_depends $TMP_DIR/receipt; then
pascal@224 369 pre_depends $ROOT
pascal@224 370 fi
pascal@249 371 # keep modifers list on upgrade
pascal@249 372 cp $ROOT$INSTALLED/$PACKAGE/modifiers $TMP_DIR 2> /dev/null
pascal@249 373 rm -rf $ROOT$INSTALLED/$PACKAGE 2> /dev/null
pascal@122 374 # Make the installed package data dir to store
pascal@122 375 # the receipt and the files list.
pascal@122 376 mkdir -p $ROOT$INSTALLED/$PACKAGE
pascal@249 377 cp $TMP_DIR/modifiers $ROOT$INSTALLED/$PACKAGE 2> /dev/null
pascal@249 378 rm -rf $TMP_DIR 2> /dev/null
pascal@195 379 sed -i "/ $(basename $PACKAGE_FILE)$/d" \
pascal@191 380 $ROOT$LOCALSTATE/installed.md5 2> /dev/null
pascal@195 381 cd $(dirname $PACKAGE_FILE)
pascal@195 382 md5sum $(basename $PACKAGE_FILE) >> $ROOT$LOCALSTATE/installed.md5
pascal@122 383 )
MikeDSmith25@134 384 # Resolve package deps.
pascal@120 385 check_for_deps $ROOT
pascal@120 386 if [ ! "$MISSING_PACKAGE" = "" ]; then
pascal@120 387 install_deps $ROOT
pascal@120 388 fi
pankso@6 389 mkdir -p $TMP_DIR
pascal@121 390 [ -n "$INSTALL_LIST" ] && echo "$PACKAGE_FILE" >> $INSTALL_LIST-processed
pankso@6 391 echo ""
pankso@6 392 echo -e "\033[1mInstallation of :\033[0m $PACKAGE"
pankso@6 393 echo "================================================================================"
pankso@6 394 echo -n "Copying $PACKAGE... "
pankso@9 395 cp $PACKAGE_FILE $TMP_DIR
pankso@6 396 status
pankso@6 397 cd $TMP_DIR
pankso@6 398 extract_package
pascal@20 399 SELF_INSTALL=0
pascal@114 400 EXTRAVERSION=""
pascal@144 401 CONFIG_FILES=""
pankso@6 402 # Include temporary receipt to get the right variables.
pankso@6 403 . $PWD/receipt
pascal@20 404 if [ $SELF_INSTALL -ne 0 -a -n "$ROOT" ]; then
pascal@20 405 echo -n "Checking post install dependencies... "
pascal@125 406 [ -f $INSTALLED/$PACKAGE/receipt ]
pascal@20 407 if ! status; then
pascal@110 408 echo "Please run 'tazpkg install $PACKAGE_FILE' in / and retry."
pascal@20 409 cd .. && rm -rf $TMP_DIR
pascal@20 410 exit 1
pascal@20 411 fi
pascal@20 412 fi
pascal@21 413 # Remember modified packages
pascal@69 414 for i in $(grep -v '\[' files.list); do
pascal@69 415 [ -e "$ROOT$i" ] || continue
pascal@69 416 [ -d "$ROOT$i" ] && continue
pascal@70 417 for j in $(grep -l "^$i$" $ROOT$INSTALLED/*/files.list); do
pascal@249 418 local dir
pascal@249 419 dir=$(dirname $j)
pascal@67 420 [ "$j" = "$ROOT$INSTALLED/$PACKAGE/files.list" ] && continue
pascal@249 421 if grep -qs ^$(basename $dir)$ \
pascal@249 422 $ROOT$INSTALLED/$PACKAGE/modifiers; then
pascal@249 423 # Do not overload an overloaded file !
pascal@249 424 rm .$i 2> /dev/null
pascal@249 425 continue
pascal@249 426 fi
pascal@249 427 grep -qs ^$PACKAGE$ $dir/modifiers && continue
pascal@249 428 if [ -s "$dir/volatile.cpio.gz" ]; then
MikeDSmith25@134 429 # We can modify backed up files
pascal@249 430 zcat $dir/volatile.cpio.gz | \
pascal@128 431 cpio -t 2> /dev/null | \
pascal@128 432 grep -q "^${i#/}$" && continue
pascal@128 433 fi
pascal@249 434 echo "$PACKAGE" >> $dir/modifiers
pascal@65 435 done
pascal@21 436 done
pascal@20 437 cp receipt files.list $ROOT$INSTALLED/$PACKAGE
pascal@20 438 # Copy the description if found.
pankso@6 439 if [ -f "description.txt" ]; then
pascal@20 440 cp description.txt $ROOT$INSTALLED/$PACKAGE
pankso@6 441 fi
pascal@128 442 # Copy the md5sum if found.
pascal@128 443 if [ -f "md5sum" ]; then
pascal@128 444 cp md5sum $ROOT$INSTALLED/$PACKAGE
pascal@128 445 fi
pankso@38 446 # Pre install commands.
pankso@38 447 if grep -q ^pre_install $ROOT$INSTALLED/$PACKAGE/receipt; then
pascal@20 448 pre_install $ROOT
pankso@6 449 fi
pascal@144 450 if [ -n "$CONFIG_FILES" ]; then
pascal@144 451 # save 'official' configuration files
pascal@144 452 echo -n "Save configuration files for $PACKAGE... "
pascal@144 453 for i in $CONFIG_FILES; do
pascal@148 454 ( cd fs ; find ${i#/} -type f )
pascal@144 455 done | ( cd fs ; cpio -o -H newc | gzip -9 ) > \
pascal@144 456 $ROOT$INSTALLED/$PACKAGE/volatile.cpio.gz
pascal@144 457 # keep user configuration files
pascal@144 458 for i in $CONFIG_FILES; do
pascal@148 459 ( cd fs ; find ${i#/} -type f )
pascal@148 460 done | while read i; do
pascal@148 461 [ -e $ROOT/$i ] || continue
pascal@148 462 cp -a $ROOT/$i fs/$i
pascal@144 463 done
pascal@144 464 status
pascal@144 465 fi
pankso@6 466 echo -n "Installing $PACKAGE... "
pascal@20 467 cp -a fs/* $ROOT/
pankso@6 468 status
pankso@6 469 # Remove the temporary random directory.
pankso@6 470 echo -n "Removing all tmp files... "
pankso@6 471 cd .. && rm -rf $TMP_DIR
pankso@6 472 status
pankso@38 473 # Post install commands.
pankso@38 474 if grep -q ^post_install $ROOT$INSTALLED/$PACKAGE/receipt; then
pascal@20 475 post_install $ROOT
pankso@6 476 fi
pankso@6 477 cd $TOP_DIR
pankso@6 478 echo "================================================================================"
pascal@114 479 echo "$PACKAGE ($VERSION$EXTRAVERSION) is installed."
pankso@6 480 echo ""
pascal@183 481 # Log this activity
pascal@184 482 [ -n "$ROOT" ] || log Installed
pascal@183 483
pankso@6 484 }
pankso@6 485
pascal@122 486 # Check for loop in deps tree.
pascal@122 487 check_for_deps_loop()
pascal@122 488 {
pascal@122 489 local list
pascal@122 490 local pkg
pascal@122 491 local deps
pascal@122 492 pkg=$1
pascal@122 493 shift
pascal@122 494 [ -n "$1" ] || return
pascal@122 495 list=""
pascal@122 496 # Filter out already processed deps
pascal@122 497 for i in $@; do
pascal@122 498 case " $ALL_DEPS" in
pascal@122 499 *\ $i\ *);;
pascal@122 500 *) list="$list $i";;
pascal@122 501 esac
pascal@122 502 done
pascal@122 503 ALL_DEPS="$ALL_DEPS$list "
pascal@122 504 for i in $list; do
pascal@122 505 [ -f $i/receipt ] || continue
pascal@122 506 deps="$(DEPENDS=""; . $i/receipt; echo $DEPENDS)"
pascal@122 507 case " $deps " in
pascal@122 508 *\ $pkg\ *) echo -e "$MSG $i"; MSG="";;
pascal@122 509 *) check_for_deps_loop $pkg $deps;;
pascal@122 510 esac
pascal@122 511 done
pascal@122 512 }
pascal@122 513
pankso@6 514 # Check for missing deps listed in a receipt packages.
pankso@6 515 check_for_deps()
pankso@6 516 {
pascal@116 517 local saved;
pascal@116 518 saved=$PACKAGE
pascal@116 519 mkdir -p $TMP_DIR
pascal@122 520 ( cd $TMP_DIR ; cpio -i receipt > /dev/null ) < $PACKAGE_FILE
pascal@116 521 . $TMP_DIR/receipt
pascal@116 522 PACKAGE=$saved
pascal@116 523 rm -rf $TMP_DIR
pascal@164 524 for pkgorg in $DEPENDS
pankso@6 525 do
pascal@164 526 i=$(equivalent_pkg $pkgorg $1)
pascal@120 527 if [ ! -d "$1$INSTALLED/$i" ]; then
pankso@6 528 MISSING_PACKAGE=$i
pankso@6 529 deps=$(($deps+1))
pascal@122 530 elif [ ! -f "$1$INSTALLED/$i/receipt" ]; then
MikeDSmith25@134 531 echo -e "$WARNING Dependency loop between $PACKAGE and $i."
pankso@6 532 fi
pankso@6 533 done
pankso@6 534 if [ ! "$MISSING_PACKAGE" = "" ]; then
pankso@6 535 echo -e "\033[1mTracking dependencies for :\033[0m $PACKAGE"
pankso@6 536 echo "================================================================================"
pascal@164 537 for pkgorg in $DEPENDS
pankso@6 538 do
pascal@164 539 i=$(equivalent_pkg $pkgorg $1)
pascal@120 540 if [ ! -d "$1$INSTALLED/$i" ]; then
pankso@6 541 MISSING_PACKAGE=$i
pankso@6 542 echo "Missing : $MISSING_PACKAGE"
pankso@6 543 fi
pankso@6 544 done
pankso@6 545 echo "================================================================================"
pankso@6 546 echo "$deps missing package(s) to install."
pankso@6 547 fi
pankso@6 548 }
pankso@6 549
pankso@6 550 # Install all missing deps. First ask user then install all missing deps
pankso@6 551 # from local dir, cdrom, media or from the mirror. In case we want to
pankso@6 552 # install packages from local, we need a packages.list to find the version.
pankso@6 553 install_deps()
pankso@6 554 {
pascal@120 555 local root
pascal@120 556 root=""
pascal@121 557 [ -n "$1" ] && root="--root=$1"
pankso@6 558 echo ""
pankso@10 559 echo -n "Install all missing dependencies (y/N) ? "; read anser
pascal@121 560 echo ""
pankso@6 561 if [ "$anser" = "y" ]; then
pascal@164 562 for pkgorg in $DEPENDS
pankso@6 563 do
pascal@164 564 pkg=$(equivalent_pkg $pkgorg $1)
pascal@120 565 if [ ! -d "$1$INSTALLED/$pkg" ]; then
pascal@121 566 local list
pascal@121 567 list="$INSTALL_LIST"
pascal@121 568 [ -n "$list" ] || list="$TOP_DIR/packages.list"
pankso@6 569 # We can install packages from a local dir by greping
pankso@6 570 # the TAZPKG_BASENAME in the local packages.list.
pascal@153 571 found=0
pascal@121 572 if [ -f "$list" ]; then
paul@247 573 echo "Checking if $pkg exists in local list... "
pascal@110 574 mkdir $TMP_DIR
pascal@110 575 for i in $pkg-*.tazpkg; do
pascal@124 576 [ -f $i ] || continue
pascal@121 577 ( cd $TMP_DIR ; cpio -i receipt > /dev/null) < $i
pascal@153 578 [ "$(. $TMP_DIR/receipt; echo $PACKAGE)" = "$pkg" ] || continue
pascal@121 579 if grep -q ^$(package_fullname_in_dir $TMP_DIR).tazpkg$ $list
pascal@110 580 then
pascal@153 581 found=1
pascal@121 582 tazpkg install $i $root --list=$list
pascal@110 583 break
pascal@110 584 fi
pascal@110 585 done
pascal@110 586 rm -rf $TMP_DIR
pascal@153 587 fi
pankso@6 588 # Install deps from the mirror.
pascal@153 589 if [ $found -eq 0 ]; then
pascal@121 590 if [ ! -f "$LOCALSTATE/packages.list" ]; then
pankso@6 591 tazpkg recharge
pankso@6 592 fi
pascal@120 593 tazpkg get-install $pkg $root
pankso@6 594 fi
pankso@6 595 fi
pankso@6 596 done
pankso@6 597 else
pankso@6 598 echo -e "\nLeaving dependencies for $PACKAGE unsolved."
pankso@6 599 echo -e "The package is installed but will probably not work.\n"
pankso@6 600 fi
pankso@6 601 }
pankso@6 602
pankso@37 603 # xHTML packages list header.
pankso@37 604 xhtml_header()
pankso@37 605 {
pankso@37 606 cat > $XHTML_LIST << _EOT_
pankso@37 607 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
pankso@37 608 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
pankso@37 609 <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
pankso@37 610 <head>
pankso@37 611 <title>Installed packages list</title>
pankso@37 612 <meta http-equiv="content-type" content="text/html; charset=ISO-8859-1" />
pankso@37 613 <meta name="modified" content="$DATE" />
pankso@37 614 <meta name="generator" content="Tazpkg" />
pankso@37 615 <style type="text/css"><!--
pankso@37 616 body { font: 12px sans-serif, vernada, arial; margin: 0; }
pankso@37 617 #header { background: #f0ba08; color: black; height: 50px;
pankso@37 618 border-top: 1px solid black; border-bottom: 1px solid black; }
pankso@37 619 #content { margin: 0px 50px 26px 50px; }
pankso@37 620 #footer { border-top: 1px solid black; padding-top: 10px;}
pankso@37 621 h1 { margin: 14px 0px 0px 16px; }
pankso@37 622 pre { padding-left: 5px; }
pankso@37 623 hr { color: white; background: white; height: 1px; border: 0; }
pankso@37 624 --></style>
pankso@37 625 </head>
pankso@37 626 <body bgcolor="#ffffff">
pankso@37 627 <div id="header">
pankso@37 628 <h1><font color="#3e1220">Installed packages list</font></h1>
pankso@37 629 </div>
pankso@37 630 <hr />
pankso@37 631 <!-- Start content -->
pankso@37 632 <div id="content">
pankso@37 633
pankso@37 634 <p>
pankso@37 635 _packages_ packages installed - List generated on : $DATE
pankso@37 636 <p>
pankso@37 637
pankso@37 638 _EOT_
pankso@37 639 }
pankso@37 640
MikeDSmith25@135 641 # xHTML content with packages info.
pankso@37 642 xhtml_pkg_info()
pankso@37 643 {
pankso@37 644 cat >> $XHTML_LIST << _EOT_
pankso@37 645 <h3>$PACKAGE</h3>
pankso@37 646 <pre>
pascal@114 647 Version : $VERSION$EXTRAVERSION
pankso@37 648 Short desc : $SHORT_DESC
pankso@37 649 Web site : <a href="$WEB_SITE">$WEB_SITE</a>
pankso@37 650 </pre>
pankso@37 651
pankso@37 652 _EOT_
pankso@37 653 }
pankso@37 654
pankso@37 655 # xHTML packages list footer.
pankso@37 656 xhtml_footer()
pankso@37 657 {
pankso@37 658 cat >> $XHTML_LIST << _EOT_
pankso@37 659 <hr />
pankso@37 660 <p id="footer">
pankso@37 661 $packages packages installed - List generated on : $DATE
pankso@37 662 </p>
pankso@37 663
pankso@37 664 <!-- End content -->
pankso@37 665 </div>
pankso@37 666 </body>
pankso@37 667 </html>
pankso@37 668 _EOT_
pankso@37 669 }
pankso@37 670
pankso@54 671 # Search pattern in installed packages.
pankso@54 672 search_in_installed_packages()
pankso@54 673 {
pankso@54 674 echo "Installed packages"
pankso@54 675 echo "================================================================================"
erjo@62 676 list=`ls -1 $INSTALLED | grep -i "$PATTERN"`
pankso@54 677 for pkg in $list
pankso@54 678 do
pascal@114 679 EXTRAVERSION=""
pascal@122 680 [ -f $INSTALLED/$pkg/receipt ] || continue
pankso@54 681 . $INSTALLED/$pkg/receipt
pankso@54 682 echo -n "$PACKAGE "
pascal@114 683 echo -en "\033[24G $VERSION$EXTRAVERSION"
pankso@54 684 echo -e "\033[42G $CATEGORY"
pankso@54 685 packages=$(($packages+1))
pankso@54 686 done
pankso@54 687 # Set correct ending messages.
pankso@54 688 if [ "$packages" = "" ]; then
pankso@54 689 echo "0 installed packages found for : $PATTERN"
pankso@54 690 echo ""
pankso@54 691 else
pankso@54 692 echo "================================================================================"
pankso@54 693 echo "$packages installed package(s) found for : $PATTERN"
pankso@54 694 echo ""
pankso@54 695 fi
pankso@54 696 }
pankso@54 697
MikeDSmith25@135 698 # Search in packages.list for available pkgs.
pankso@54 699 search_in_packages_list()
pankso@54 700 {
pankso@54 701 echo "Available packages name-version"
pankso@54 702 echo "================================================================================"
pascal@187 703 packages=0
pascal@187 704 for i in $LOCALSTATE/packages.list $LOCALSTATE/undigest/*/packages.list; do
pascal@187 705 grep -is "$PATTERN" $i
pascal@187 706 packages=$(($packages + `grep -is "$PATTERN" $i | wc -l`))
pascal@187 707 done
pascal@187 708 if [ ! -f "$LOCALSTATE/packages.list" ]; then
pankso@54 709 echo -e "
pankso@54 710 No 'packages.list' found to check for mirrored packages. For more results,
MikeDSmith25@135 711 please run 'tazpkg recharge' once as root before searching.\n"
pankso@54 712 fi
pankso@54 713 if [ "$packages" = "0" ]; then
pankso@54 714 echo "0 available packages found for : $PATTERN"
pankso@54 715 echo ""
pankso@54 716 else
pankso@54 717 echo "================================================================================"
pankso@54 718 echo "$packages available package(s) found for : $PATTERN"
pankso@54 719 echo ""
pankso@54 720 fi
pankso@54 721 }
pankso@54 722
MikeDSmith25@135 723 # search --mirror: Search in packages.txt for available pkgs and give more
MikeDSmith25@135 724 # info than --list or default.
pankso@54 725 search_in_packages_txt()
pankso@54 726 {
pankso@54 727 echo "Matching packages name with version and desc"
pankso@54 728 echo "================================================================================"
pascal@187 729 packages=0
pascal@187 730 for i in $LOCALSTATE/packages.txt $LOCALSTATE/undigest/*/packages.txt; do
pascal@187 731 grep -is -A 2 "^$PATTERN" $i
pascal@187 732 packages=$(($packages + `grep -is "^$PATTERN" $i | wc -l`))
pascal@187 733 done
pascal@187 734 if [ ! -f "$LOCALSTATE/packages.txt" ]; then
pankso@54 735 echo -e "
pankso@54 736 No 'packages.txt' found to check for mirrored packages. For more results,
MikeDSmith25@135 737 please run 'tazpkg recharge' once as root before searching.\n"
pankso@54 738 fi
pankso@54 739 if [ "$packages" = "0" ]; then
pankso@54 740 echo "0 available packages found for : $PATTERN"
pankso@54 741 echo ""
pankso@54 742 else
pankso@54 743 echo "================================================================================"
pankso@54 744 echo "$packages available package(s) found for : $PATTERN"
pankso@54 745 echo ""
pankso@54 746 fi
pankso@54 747 }
pankso@54 748
pascal@74 749 # Install package-list from a flavor
pascal@74 750 install_flavor()
pascal@74 751 {
pascal@74 752 check_root
pascal@74 753 FLAVOR=$1
pascal@74 754 ARG=$2
pascal@74 755 mkdir -p $TMP_DIR
pascal@74 756 [ -f $FLAVOR.flavor ] && cp $FLAVOR.flavor $TMP_DIR
pascal@74 757 cd $TMP_DIR
pascal@74 758 if [ -f $FLAVOR.flavor ] || download $FLAVOR.flavor; then
pascal@74 759 zcat $FLAVOR.flavor | cpio -i 2>/dev/null
pascal@74 760 while read file; do
pascal@74 761 for pkg in $(ls -d $INSTALLED/${file%%-*}*); do
pascal@122 762 [ -f $pkg/receipt ] || continue
pascal@114 763 EXTRAVERSION=""
pascal@74 764 . $pkg/receipt
pascal@114 765 [ "$PACKAGE-$VERSION$EXTRAVERSION" = "$file" ] && break
pascal@74 766 done
pascal@114 767 [ "$PACKAGE-$VERSION$EXTRAVERSION" = "$file" ] && continue
pascal@74 768 cd $CACHE_DIR
pascal@74 769 download $file.tazpkg
pascal@74 770 cd $TMP_DIR
pascal@74 771 tazpkg install $CACHE_DIR/$file.tazpkg --forced
pascal@74 772 done < $FLAVOR.pkglist
pascal@75 773 [ -f $FLAVOR.nonfree ] && while read pkg; do
pascal@75 774 [ -d $INSTALLED/$pkg ] || continue
pascal@75 775 [ -d $INSTALLED/get-$pkg ] && tazpkg get-install get-$pkg
pascal@75 776 get-$pkg
pascal@75 777 done < $FLAVOR.nonfree
pascal@74 778 [ "$ARG" == "--purge" ] && for pkg in $(ls $INSTALLED); do
pascal@122 779 [ -f $INSTALLED/$pkg/receipt ] || continue
pascal@114 780 EXTRAVERSION=""
pascal@74 781 . $INSTALLED/$pkg/receipt
pascal@114 782 grep -q ^$PACKAGE-$VERSION$EXTRAVERSION$ $FLAVOR.pkglist && continue
pascal@75 783 grep -qs ^$PACKAGE$ $FLAVOR.nonfree && continue
pascal@74 784 tazpkg remove $PACKAGE
pascal@74 785 done
pascal@74 786 else
pascal@74 787 echo "Can't find flavor $FLAVOR Abort."
pascal@74 788 fi
pascal@74 789 cd $TOP_DIR
pascal@74 790 rm -rf $TMP_DIR
pascal@74 791 }
pascal@74 792
pascal@187 793 # Update mirror urls
pascal@187 794 setup_mirror()
pascal@187 795 {
pascal@187 796 # Backup old list.
pascal@187 797 if [ -f "$1/mirror" ]; then
pascal@187 798 cp -f $1/mirror $1/mirror.bak
pascal@187 799 fi
pascal@187 800 echo ""
pascal@187 801 echo -e "\033[1mCurrent mirror(s)\033[0m"
pascal@187 802 echo "================================================================================"
pascal@187 803 echo " `cat $1/mirror 2> /dev/null`"
pascal@187 804 echo "
pascal@187 805 Please enter URL of the new mirror (http, ftp or local path). You must specify
pascal@187 806 the complete address to the directory of the packages and packages.list file."
pascal@187 807 echo ""
pascal@187 808 echo -n "New mirror(s) URL : "
pascal@187 809 NEW_MIRROR_URL=$2
pascal@187 810 if [ -n "$NEW_MIRROR_URL" ]; then
pascal@187 811 echo $NEW_MIRROR_URL
pascal@187 812 else
pascal@187 813 read NEW_MIRROR_URL
pascal@187 814 fi
pascal@187 815 if [ "$NEW_MIRROR_URL" = "" ]; then
pascal@187 816 echo "Nothing has been changed."
pascal@187 817 else
pascal@187 818 echo "Setting mirror(s) to : $NEW_MIRROR_URL"
pascal@187 819 rm -f $1/mirror
pascal@187 820 for i in $NEW_MIRROR_URL; do
pascal@187 821 echo "$i" >> $1/mirror
pascal@187 822 done
pascal@187 823 fi
pascal@187 824 echo ""
pascal@187 825 }
pascal@187 826
paul@247 827 # recursive dependencies scan
pascal@205 828 dep_scan()
pascal@205 829 {
pascal@205 830 for i in $1; do
pascal@205 831 case " $ALL_DEPS " in
pascal@205 832 *\ $i\ *) continue;;
pascal@205 833 esac
pascal@205 834 ALL_DEPS="$ALL_DEPS $i"
pascal@205 835 [ -n "$2" ] && echo "$2$i"
pascal@205 836 [ -f $i/receipt ] || continue
pascal@205 837 DEPENDS=""
pascal@205 838 . $i/receipt
pascal@205 839 [ -n "$DEPENDS" ] && dep_scan "$DEPENDS" "$2 "
pascal@205 840 done
pascal@205 841 }
pascal@205 842
paul@247 843 # recursive reverse dependencies scan
pascal@205 844 rdep_scan()
pascal@205 845 {
pascal@260 846 SEARCH=$1
pascal@260 847
pascal@260 848 for i in * ; do
pascal@260 849 DEPENDS=""
pascal@260 850 . $i/receipt
pascal@260 851 echo "$i $(echo $DEPENDS)"
pascal@260 852 done | awk -v search=$SEARCH '
pascal@260 853 function show_deps(deps, all_deps, pkg, space)
pascal@260 854 {
pascal@260 855 if (all_deps[pkg] == 1) return
pascal@260 856 all_deps[pkg] = 1
pascal@260 857 if (space != "") printf "%s%s\n",space,pkg
pascal@260 858 for (i = 1; i <= split(deps[pkg], mydeps, " "); i++) {
pascal@260 859 show_deps(deps, all_deps, mydeps[i]," " space)
pascal@260 860 }
pascal@260 861 }
pascal@260 862
pascal@260 863 {
pascal@260 864 all_deps[$1] = 0
pascal@260 865 for (i = 2; i <= NF; i++)
pascal@260 866 deps[$i] = deps[$i] " " $1
pascal@260 867 }
pascal@260 868
pascal@260 869 END {
pascal@260 870 show_deps(deps, all_deps, search, "")
pascal@260 871 }
pascal@260 872 '
pascal@205 873 }
pascal@205 874
pankso@6 875 ###################
pankso@6 876 # Tazpkg commands #
pankso@6 877 ###################
pankso@6 878
pankso@6 879 case "$COMMAND" in
pankso@6 880 list)
pankso@6 881 # List all installed packages or a specific category.
pankso@6 882 #
pankso@45 883 if [ "$2" = "blocked" ]; then
pankso@45 884 echo ""
pankso@45 885 echo -e "\033[1mBlocked packages\033[0m"
pankso@45 886 echo "================================================================================"
pascal@183 887 if [ -s "$BLOCKED" ];then
pascal@183 888 cat $BLOCKED
pankso@45 889 echo ""
pankso@45 890 else
pankso@45 891 echo -e "No blocked packages found.\n"
pankso@45 892 fi
pankso@45 893 exit 0
pankso@45 894 fi
pankso@45 895 # Display the list of categories.
pankso@46 896 if [ "$2" = "cat" -o "$2" = "categories" ]; then
pankso@45 897 echo ""
pankso@45 898 echo -e "\033[1mPackages categories :\033[0m"
pankso@45 899 echo "================================================================================"
pankso@45 900 for i in $CATEGORIES
pankso@45 901 do
pankso@45 902 echo $i
pankso@45 903 categories=$(($categories+1))
pankso@45 904 done
pankso@45 905 echo "================================================================================"
pankso@45 906 echo "$categories categories"
pankso@45 907 echo ""
pankso@6 908 exit 0
pankso@6 909 fi
pankso@6 910 # Check for an asked category.
pankso@6 911 if [ -n "$2" ]; then
pankso@6 912 ASKED_CATEGORY=$2
pankso@6 913 echo ""
pankso@6 914 echo -e "\033[1mInstalled packages of category :\033[0m $ASKED_CATEGORY"
pankso@6 915 echo "================================================================================"
pankso@6 916 for pkg in $INSTALLED/*
pankso@6 917 do
pascal@122 918 [ -f $pkg/receipt ] || continue
pascal@114 919 EXTRAVERSION=""
pankso@6 920 . $pkg/receipt
pankso@6 921 if [ "$CATEGORY" == "$ASKED_CATEGORY" ]; then
pankso@6 922 echo -n "$PACKAGE"
pascal@114 923 echo -e "\033[24G $VERSION$EXTRAVERSION"
pankso@6 924 packages=$(($packages+1))
pankso@6 925 fi
pankso@6 926 done
pankso@6 927 echo "================================================================================"
pankso@6 928 echo -e "$packages packages installed of category $ASKED_CATEGORY."
pankso@6 929 echo ""
pankso@6 930 else
MikeDSmith25@135 931 # By default list all packages and versions.
pankso@6 932 echo ""
pankso@6 933 echo -e "\033[1mList of all installed packages\033[0m"
pankso@6 934 echo "================================================================================"
pankso@6 935 for pkg in $INSTALLED/*
pankso@6 936 do
pascal@122 937 [ -f $pkg/receipt ] || continue
pascal@114 938 EXTRAVERSION=""
pankso@6 939 . $pkg/receipt
pankso@6 940 echo -n "$PACKAGE"
pascal@114 941 echo -en "\033[24G $VERSION$EXTRAVERSION"
pankso@6 942 echo -e "\033[42G $CATEGORY"
pankso@6 943 packages=$(($packages+1))
pankso@6 944 done
pankso@6 945 echo "================================================================================"
pankso@6 946 echo "$packages packages installed."
pankso@6 947 echo ""
pankso@6 948 fi
pankso@6 949 ;;
pankso@37 950 xhtml-list)
MikeDSmith25@135 951 # Get info in receipts and build list.
pankso@37 952 DATE=`date +%Y-%m-%d\ \%H:%M:%S`
pankso@37 953 if [ -n "$2" ]; then
pankso@37 954 XHTML_LIST=$2
pankso@37 955 else
pankso@38 956 XHTML_LIST=installed-packages.html
pankso@37 957 fi
pankso@37 958 echo ""
pankso@37 959 echo -e "\033[1mCreating xHTML list of installed packages\033[0m"
pankso@37 960 echo "================================================================================"
pankso@37 961 echo -n "Generating xHTML header..."
pankso@37 962 xhtml_header
pankso@37 963 status
pankso@37 964 # Packages
MikeDSmith25@135 965 echo -n "Creating packages information..."
pankso@37 966 for pkg in $INSTALLED/*
pankso@37 967 do
pascal@122 968 [ -f $pkg/receipt ] || continue
pascal@114 969 EXTRAVERSION=""
pankso@37 970 . $pkg/receipt
pankso@37 971 xhtml_pkg_info
pankso@37 972 packages=$(($packages+1))
pankso@37 973 done
pankso@37 974 status
pankso@37 975 echo -n "Generating xHTML footer..."
pankso@37 976 xhtml_footer
pankso@37 977 status
pankso@37 978 # sed pkgs nb in header.
pankso@37 979 sed -i s/'_packages_'/"$packages"/ $XHTML_LIST
pankso@37 980 echo "================================================================================"
pankso@37 981 echo "$XHTML_LIST created - $packages packages."
pankso@37 982 echo ""
pankso@37 983 ;;
pankso@6 984 list-mirror)
paul@247 985 # List all available packages on the mirror. Option --diff displays
pankso@6 986 # last mirrored packages diff (see recharge).
pankso@6 987 check_for_packages_list
pankso@53 988 case $2 in
pankso@53 989 --diff)
pankso@53 990 if [ -f "$LOCALSTATE/packages.diff" ]; then
pankso@53 991 echo ""
pankso@53 992 echo -e "\033[1mMirrored packages diff\033[0m"
pankso@53 993 echo "================================================================================"
pankso@53 994 cat $LOCALSTATE/packages.diff
pankso@53 995 echo "================================================================================"
pankso@53 996 pkgs=`cat $LOCALSTATE/packages.diff | wc -l`
pankso@53 997 echo "$pkgs new packages listed on the mirror."
pankso@53 998 echo ""
pankso@53 999 else
pankso@53 1000 echo -e "\nUnable to list anything, no packages.diff found."
MikeDSmith25@135 1001 echo -e "Recharge your current list to create a first diff.\n"
pankso@53 1002 fi && exit 0 ;;
pankso@53 1003 --text|--txt)
pankso@6 1004 echo ""
pankso@53 1005 echo -e "\033[1mList of available packages on the mirror\033[0m"
pankso@6 1006 echo "================================================================================"
pankso@53 1007 cat $LOCALSTATE/packages.txt ;;
pankso@53 1008 --raw|*)
pankso@53 1009 echo ""
pankso@53 1010 echo -e "\033[1mList of available packages on the mirror\033[0m"
pankso@6 1011 echo "================================================================================"
pankso@53 1012 cat $LOCALSTATE/packages.list ;;
pankso@53 1013 esac
pankso@53 1014 echo "================================================================================"
pankso@53 1015 pkgs=`cat $LOCALSTATE/packages.list | wc -l`
pankso@53 1016 echo "$pkgs packages in the last recharged list."
pankso@53 1017 echo ""
pankso@6 1018 ;;
pankso@6 1019 list-files)
pankso@6 1020 # List files installed with the package.
pankso@6 1021 #
pankso@6 1022 check_for_package_on_cmdline
pankso@6 1023 check_for_receipt
pankso@6 1024 echo ""
pankso@6 1025 echo -e "\033[1mInstalled files with :\033[0m $PACKAGE"
pankso@6 1026 echo "================================================================================"
pankso@6 1027 cat $INSTALLED/$PACKAGE/files.list | sort
pankso@6 1028 echo "================================================================================"
pankso@6 1029 files=`cat $INSTALLED/$PACKAGE/files.list | wc -l`
pankso@6 1030 echo "$files files installed with $PACKAGE."
pankso@6 1031 echo ""
pankso@6 1032 ;;
pankso@6 1033 info)
pascal@119 1034 # Information about package.
pankso@6 1035 #
pankso@6 1036 check_for_package_on_cmdline
pankso@6 1037 check_for_receipt
pascal@114 1038 EXTRAVERSION=""
pankso@6 1039 . $INSTALLED/$PACKAGE/receipt
pankso@6 1040 echo ""
MikeDSmith25@135 1041 echo -e "\033[1mTazpkg information\033[0m
pankso@6 1042 ================================================================================
pankso@6 1043 Package : $PACKAGE
pascal@114 1044 Version : $VERSION$EXTRAVERSION
pankso@6 1045 Category : $CATEGORY
pankso@6 1046 Short desc : $SHORT_DESC
pankso@6 1047 Maintainer : $MAINTAINER"
pankso@6 1048 if [ ! "$DEPENDS" = "" ]; then
pankso@6 1049 echo -e "Depends : $DEPENDS"
pankso@6 1050 fi
pankso@38 1051 if [ ! "$SUGGESTED" = "" ]; then
pankso@38 1052 echo -e "Suggested : $SUGGESTED"
pankso@38 1053 fi
pankso@38 1054 if [ ! "$BUILD_DEPENDS" = "" ]; then
pankso@38 1055 echo -e "Build deps : $BUILD_DEPENDS"
pankso@38 1056 fi
pankso@6 1057 if [ ! "$WANTED" = "" ]; then
pankso@6 1058 echo -e "Wanted src : $WANTED"
pankso@6 1059 fi
pankso@6 1060 if [ ! "$WEB_SITE" = "" ]; then
pankso@6 1061 echo -e "Web site : $WEB_SITE"
pankso@6 1062 fi
pankso@6 1063 echo "================================================================================"
pankso@6 1064 echo ""
pankso@6 1065 ;;
pankso@6 1066 desc)
pankso@6 1067 # Display package description.txt if available.
pankso@6 1068 if [ -f "$INSTALLED/$PACKAGE/description.txt" ]; then
pankso@6 1069 echo ""
pankso@6 1070 echo -e "\033[1mDescription of :\033[0m $PACKAGE"
pankso@6 1071 echo "================================================================================"
pankso@6 1072 cat $INSTALLED/$PACKAGE/description.txt
pankso@6 1073 echo "================================================================================"
pankso@6 1074 echo ""
pankso@6 1075 else
pankso@6 1076 echo -e "\nSorry, no description available for this package.\n"
pankso@6 1077 fi
pankso@6 1078 ;;
pankso@6 1079 search)
pankso@6 1080 # Search for a package by pattern or name.
pankso@6 1081 #
pankso@54 1082 PATTERN="$2"
pankso@54 1083 if [ -z "$PATTERN" ]; then
MikeDSmith25@135 1084 echo -e "\nPlease specify a pattern or package name to search for."
pankso@54 1085 echo -e "Example : 'tazpkg search paint'.\n"
pankso@6 1086 exit 0
pankso@6 1087 fi
pankso@6 1088 echo ""
pankso@54 1089 echo -e "\033[1mSearch result for :\033[0m $PATTERN"
pankso@6 1090 echo ""
pankso@54 1091 # Default is to search in installed pkgs and the raw list.
pankso@54 1092 case $3 in
pankso@54 1093 -i|--installed)
pankso@54 1094 search_in_installed_packages ;;
pankso@54 1095 -l|--list)
pankso@54 1096 search_in_packages_list ;;
pankso@54 1097 -m|--mirror)
pankso@54 1098 search_in_packages_txt ;;
pankso@54 1099 *)
pankso@54 1100 search_in_installed_packages
pankso@54 1101 search_in_packages_list ;;
pankso@54 1102 esac
pankso@12 1103 ;;
pankso@12 1104 search-file)
pankso@12 1105 # Search for a file by pattern or name in all files.list.
pankso@12 1106 #
pankso@12 1107 if [ -z "$2" ]; then
MikeDSmith25@135 1108 echo -e "\nPlease specify a pattern or file name to search for."
pankso@12 1109 echo -e "Example : 'tazpkg search-file libnss'. \n"
pankso@12 1110 exit 0
pankso@12 1111 fi
pankso@12 1112 echo ""
pankso@12 1113 echo -e "\033[1mSearch result for file :\033[0m $2"
pankso@6 1114 echo "================================================================================"
pascal@98 1115
pascal@98 1116 if [ "$3" == "--mirror" ]; then
pascal@98 1117
pascal@187 1118 match=0
pascal@187 1119 for i in $LOCALSTATE/files.list.lzma \
pascal@187 1120 $LOCALSTATE/undigest/*/files.list.lzma; do
pascal@187 1121 [ -f $i ] || continue
pascal@187 1122 unlzma -c $i | grep -- ".*:.*$2" | awk '
pascal@98 1123 BEGIN { last="" }
pascal@98 1124 {
pascal@98 1125 pkg=substr($0,0,index($0,":")-1);
pascal@98 1126 file=substr($0,index($0,":")+2);
pascal@98 1127 if (last != pkg) {
pascal@98 1128 last = pkg;
pascal@98 1129 printf("\n%c[1mPackage %s :%c[0m\n",27,pkg,27);
pascal@98 1130 }
pascal@98 1131 printf("%s\n",file);
pascal@98 1132 }'
pascal@187 1133 match=$(($match + `unlzma -c $i | grep -- ".*:.*$2" | wc -l`))
pascal@187 1134 done
pascal@98 1135
pascal@98 1136 else
pascal@98 1137
pankso@12 1138 # Check all pkg files.list in search match with specify the package
pankso@12 1139 # name and the full path to the file(s).
pankso@12 1140 for pkg in $INSTALLED/*
pankso@12 1141 do
pascal@122 1142 if grep -qs "$2" $pkg/files.list; then
pankso@12 1143 . $pkg/receipt
pankso@12 1144 echo ""
pankso@12 1145 echo -e "\033[1mPackage $PACKAGE :\033[0m"
pankso@54 1146 grep "$2" $pkg/files.list
pankso@12 1147 files=`grep $2 $pkg/files.list | wc -l`
pankso@12 1148 match=$(($match+$files))
pankso@12 1149 fi
pankso@12 1150 done
pascal@98 1151
pascal@98 1152 fi
pascal@98 1153
pankso@12 1154 if [ "$match" = "" ]; then
pankso@12 1155 echo "0 file found for : $2"
pankso@12 1156 echo ""
pankso@12 1157 else
pankso@12 1158 echo ""
pankso@12 1159 echo "================================================================================"
pankso@12 1160 echo "$match file(s) found for : $2"
pankso@12 1161 echo ""
pankso@12 1162 fi
pankso@6 1163 ;;
pankso@6 1164 install)
pankso@6 1165 # Install .tazpkg packages.
pankso@6 1166 #
pankso@6 1167 check_root
pankso@6 1168 check_for_package_on_cmdline
pankso@6 1169 check_for_package_file
pankso@6 1170 # Check if forced install.
pascal@20 1171 DO_CHECK="yes"
pascal@120 1172 ROOT=""
pascal@20 1173 while [ -n "$3" ]; do
pascal@20 1174 case "$3" in
pascal@20 1175 --forced)
pascal@20 1176 DO_CHECK="no"
pascal@20 1177 ;;
pascal@20 1178 --root=*)
pascal@120 1179 ROOT="${3#--root=}"
pascal@20 1180 ;;
pascal@121 1181 --list=*)
pascal@121 1182 INSTALL_LIST="${3#--list=}"
pascal@121 1183 ;;
pascal@20 1184 *) shift 2
pascal@20 1185 echo -e "\nUnknown option $*.\n"
pascal@20 1186 exit 1
pascal@20 1187 ;;
pascal@20 1188 esac
pascal@20 1189 shift
pascal@20 1190 done
pascal@20 1191 if [ "$DO_CHECK" = "yes" ]; then
pascal@121 1192 check_for_installed_package $ROOT
pankso@6 1193 fi
pascal@120 1194 install_package $ROOT
pankso@6 1195 ;;
erjo@59 1196 install-list|get-install-list)
pankso@6 1197 # Install a set of packages from a list.
pankso@6 1198 #
pankso@6 1199 check_root
pankso@6 1200 if [ -z "$2" ]; then
pankso@6 1201 echo -e "
pankso@6 1202 Please change directory (cd) to the packages repository, and specify the
pankso@6 1203 list of packages to install. Example : tazpkg install-list packages.list\n"
pankso@6 1204 exit 0
pankso@6 1205 fi
pankso@6 1206 # Check if the packages list exist.
pankso@6 1207 if [ ! -f "$2" ]; then
pankso@6 1208 echo "Unable to find : $2"
pankso@6 1209 exit 0
pankso@6 1210 else
pankso@6 1211 LIST=`cat $2`
pankso@6 1212 fi
pascal@120 1213
pascal@120 1214 # Remember processed list
pascal@121 1215 export INSTALL_LIST="$2"
pascal@120 1216
erjo@59 1217 # Set $COMMAND and install all packages.
erjo@59 1218 if [ "$1" = "get-install-list" ]; then
Eric@64 1219 COMMAND=get-install
erjo@59 1220 else
erjo@59 1221 COMMAND=install
erjo@59 1222 fi
pascal@121 1223 touch $2-processed
pankso@6 1224 for pkg in $LIST
pankso@6 1225 do
pascal@121 1226 grep -qs ^$pkg$ $2-processed && continue
pascal@121 1227 tazpkg $COMMAND $pkg --list=$2 "$3" "$4" "$5"
pankso@6 1228 done
pascal@121 1229 rm -f $2-processed
pankso@6 1230 ;;
pankso@76 1231 add-flavor)
pascal@74 1232 # Install a set of packages from a flavor.
pascal@74 1233 #
pascal@74 1234 install_flavor $2
pascal@74 1235 ;;
pankso@76 1236 install-flavor)
pascal@74 1237 # Install a set of packages from a flavor and purge other ones.
pascal@74 1238 #
pascal@74 1239 install_flavor $2 --purge
pascal@74 1240 ;;
pankso@76 1241 set-release)
pascal@74 1242 # Change curent release and upgrade packages.
pascal@74 1243 #
pascal@74 1244 RELEASE=$2
pankso@76 1245 if [ -z "$RELEASE" ]; then
pankso@76 1246 echo -e "\nPlease specify the release you want on the command line."
pankso@76 1247 echo -e "Example: tazpkg set-release cooking\n"
pankso@76 1248 exit 0
pankso@76 1249 fi
pascal@74 1250 rm /var/lib/tazpkg/mirror
pascal@74 1251 echo "$RELEASE" > /etc/slitaz-release
pascal@74 1252 tazpkg recharge && tazpkg upgrade
pascal@222 1253
pascal@222 1254 # Install missing depends
pascal@222 1255 cd $INSTALLED
pascal@222 1256 for i in * ; do
pascal@222 1257 DEPENDS=""
pascal@222 1258 . $i/receipt
pascal@222 1259 for j in $DEPENDS ; do
pascal@222 1260 [ -d $j ] || tazpkg get-install $j
pascal@222 1261 done
pascal@222 1262 done
pascal@74 1263 ;;
pankso@6 1264 remove)
pankso@6 1265 # Remove packages.
pankso@6 1266 #
pankso@6 1267 check_root
pankso@6 1268 check_for_package_on_cmdline
pascal@122 1269 if [ ! -f "$INSTALLED/$PACKAGE/receipt" ]; then
pankso@6 1270 echo -e "\n$PACKAGE is not installed.\n"
pankso@6 1271 exit 0
pankso@6 1272 else
pascal@30 1273 ALTERED=""
pascal@30 1274 THE_PACKAGE=$PACKAGE # altered by receipt
pascal@30 1275 for i in $(cd $INSTALLED ; ls); do
pascal@203 1276 [ -f $INSTALLED/$i/receipt ] || continue
pankso@37 1277 DEPENDS=""
pascal@30 1278 . $INSTALLED/$i/receipt
pascal@30 1279 case " $(echo $DEPENDS) " in
pascal@30 1280 *\ $THE_PACKAGE\ *) ALTERED="$ALTERED $i";;
pascal@30 1281 esac
pascal@30 1282 done
pascal@114 1283 EXTRAVERSION=""
pascal@30 1284 . $INSTALLED/$THE_PACKAGE/receipt
pankso@6 1285 fi
pankso@6 1286 echo ""
pascal@30 1287 if [ -n "$ALTERED" ]; then
pascal@30 1288 echo "The following packages depend on $PACKAGE :"
pascal@30 1289 for i in $ALTERED; do
pascal@30 1290 echo " $i"
pascal@30 1291 done
pascal@30 1292 fi
pascal@163 1293 REFRESH=$(cd $INSTALLED ; grep -sl ^$PACKAGE$ */modifiers)
pascal@163 1294 if [ -n "$REFRESH" ]; then
pascal@170 1295 echo "The following packages have been modified by $PACKAGE :"
pascal@163 1296 for i in $REFRESH; do
pascal@170 1297 echo " ${i%/modifiers}"
pascal@163 1298 done
pascal@163 1299 fi
pascal@114 1300 echo "Remove $PACKAGE ($VERSION$EXTRAVERSION) ?"
pankso@6 1301 echo -n "Please confirm uninstallation (y/N) : "; read anser
pankso@6 1302 if [ "$anser" = "y" ]; then
pankso@6 1303 echo ""
pankso@6 1304 echo -e "\033[1mRemoving :\033[0m $PACKAGE"
pankso@6 1305 echo "================================================================================"
pankso@38 1306 # Pre remove commands.
pankso@38 1307 if grep -q ^pre_remove $INSTALLED/$PACKAGE/receipt; then
pankso@38 1308 pre_remove
pankso@38 1309 fi
pankso@6 1310 echo -n "Removing all files installed..."
pascal@255 1311 if [ -f $INSTALLED/$PACKAGE/modifiers ]; then
pascal@255 1312 for mod in `cat $INSTALLED/$PACKAGE/modifiers`
pascal@255 1313 do
pascal@251 1314 for file in `cat $INSTALLED/$PACKAGE/files.list`
pascal@251 1315 do
pascal@251 1316 [ $(grep ^$file$ $INSTALLED/$mod/files.list | wc -l) -gt 1 ] && continue
pascal@251 1317 rm -f $file 2>/dev/null
pascal@251 1318 dir="$file"
pascal@251 1319 while [ "$dir" != "/" ]; do
pascal@251 1320 dir="$(dirname $dir)"
pascal@251 1321 rmdir $dir 2> /dev/null || break
pascal@251 1322 done
pascal@206 1323 done
pascal@255 1324 done
pascal@255 1325 else
pascal@255 1326 for file in `cat $INSTALLED/$PACKAGE/files.list`
pascal@255 1327 do
pascal@255 1328 rm -f $file 2>/dev/null
pascal@255 1329 dir="$file"
pascal@255 1330 while [ "$dir" != "/" ]; do
pascal@255 1331 dir="$(dirname $dir)"
pascal@255 1332 rmdir $dir 2> /dev/null || break
pascal@255 1333 done
pascal@255 1334 done
pascal@255 1335 fi
pankso@6 1336 status
pankso@51 1337 if grep -q ^post_remove $INSTALLED/$PACKAGE/receipt; then
pankso@51 1338 post_remove
pankso@51 1339 fi
pankso@6 1340 # Remove package receipt.
pankso@6 1341 echo -n "Removing package receipt..."
pankso@6 1342 rm -rf $INSTALLED/$PACKAGE
pankso@6 1343 status
pascal@253 1344 sed -i "/ $PACKAGE-$VERSION$EXTRAVERSION$/d" \
pascal@253 1345 $LOCALSTATE/installed.md5 2> /dev/null
pascal@183 1346 # Log this activity
pascal@183 1347 log Removed
pascal@30 1348 if [ -n "$ALTERED" ]; then
pascal@30 1349 echo -n "Remove packages depending on $PACKAGE"
pascal@30 1350 echo -n " (y/N) ? "; read anser
pascal@30 1351 if [ "$anser" = "y" ]; then
pascal@30 1352 for i in $ALTERED; do
pankso@37 1353 if [ -d "$INSTALLED/$i" ]; then
pankso@37 1354 tazpkg remove $i
pankso@37 1355 fi
pascal@30 1356 done
pascal@30 1357 fi
pascal@30 1358 fi
pascal@163 1359 if [ -n "$REFRESH" ]; then
pascal@163 1360 echo -n "Reinstall packages modified by $PACKAGE"
pascal@163 1361 echo -n " (y/N) ? "; read anser
pascal@163 1362 if [ "$anser" = "y" ]; then
pascal@163 1363 for i in $REFRESH; do
pascal@199 1364 if [ $(wc -l < $INSTALLED/$i) -gt 1 ]; then
pascal@170 1365 echo "Check $INSTALLED/$i for reinstallation"
pascal@163 1366 continue
pascal@163 1367 fi
pascal@170 1368 rm -r $INSTALLED/$i
pascal@170 1369 tazpkg get-install ${i%/modifiers} --forced
pascal@163 1370 done
pascal@163 1371 fi
pascal@163 1372 fi
pankso@6 1373 else
pankso@6 1374 echo ""
pankso@6 1375 echo "Uninstallation of $PACKAGE cancelled."
pankso@6 1376 fi
pankso@6 1377 echo ""
pankso@6 1378 ;;
pankso@6 1379 extract)
pankso@6 1380 # Extract .tazpkg cpio archive into a directory.
pankso@6 1381 #
pankso@6 1382 check_for_package_on_cmdline
pankso@6 1383 check_for_package_file
pankso@6 1384 echo ""
pankso@6 1385 echo -e "\033[1mExtracting :\033[0m $PACKAGE"
pankso@6 1386 echo "================================================================================"
MikeDSmith25@135 1387 # If no directory destination is found on the cmdline
MikeDSmith25@135 1388 # we create one in the current dir using the package name.
pankso@6 1389 if [ -n "$TARGET_DIR" ]; then
pankso@6 1390 DESTDIR=$TARGET_DIR/$PACKAGE
pankso@6 1391 else
pankso@6 1392 DESTDIR=$PACKAGE
pankso@6 1393 fi
pankso@6 1394 mkdir -p $DESTDIR
pankso@6 1395 echo -n "Copying original package..."
pankso@9 1396 cp $PACKAGE_FILE $DESTDIR
pankso@6 1397 status
pankso@6 1398 cd $DESTDIR
pankso@6 1399 extract_package
pankso@6 1400 echo "================================================================================"
pankso@6 1401 echo "$PACKAGE is extracted to : $DESTDIR"
pankso@6 1402 echo ""
pankso@6 1403 ;;
pascal@139 1404 list-config)
pascal@139 1405 # List configuration files installed.
pascal@139 1406 #
pascal@141 1407 if [ "$2" = "--box" ]; then
pascal@141 1408 mkdir -p $TMP_DIR && cd $TMP_DIR
pascal@210 1409 FILES="$INSTALLED/*/volatile.cpio.gz"
pascal@210 1410 [ -n "$3" ] && FILES="$INSTALLED/$3/volatile.cpio.gz"
pascal@210 1411 for i in $FILES; do
pascal@246 1412 zcat $i | cpio -idm > /dev/null
pascal@190 1413 find * -type f 2>/dev/null | while read file; do
pascal@190 1414 if [ ! -e /$file ]; then
pascal@190 1415 echo -n "|--|--|--|File lost"
pascal@190 1416 else
pascal@143 1417 echo -n "$(stat -c "%A|%U|%G|%s|" /$file)"
pascal@141 1418 cmp $file /$file > /dev/null 2>&1 || \
pascal@141 1419 echo -n "$(stat -c "%.16y" /$file)"
pascal@190 1420 fi
pascal@143 1421 echo "|/$file"
pascal@141 1422 done
pascal@141 1423 rm -rf *
pascal@146 1424 done
pascal@141 1425 cd $TOP_DIR
pascal@141 1426 rm -rf $TMP_DIR
pascal@141 1427 else
pascal@141 1428 echo ""
pascal@141 1429 echo -e "\033[1mConfiguration files"
pascal@141 1430 echo "================================================================================"
pascal@146 1431 for i in $INSTALLED/*/volatile.cpio.gz; do
pascal@146 1432 [ -n "$2" -a "$i" != "$INSTALLED/$2/volatile.cpio.gz" ] && continue
pascal@146 1433 [ -f "$i" ] || continue
pascal@146 1434 zcat $i | cpio -t | grep -v "[0-9]* blocks"
pascal@146 1435 done | sed 's|^|/|' | sort
pascal@141 1436 echo "================================================================================"
pascal@141 1437 echo ""
pascal@141 1438 fi
pascal@139 1439 ;;
pascal@139 1440 repack-config)
pascal@137 1441 # Create SliTaz package archive from configuration files.
pascal@137 1442 #
pascal@137 1443 mkdir -p $TMP_DIR && cd $TMP_DIR
pascal@137 1444 CONFIG_VERSION=1.0
pascal@137 1445 mkdir config-$CONFIG_VERSION
pascal@137 1446 cd config-$CONFIG_VERSION
pascal@137 1447 for i in $INSTALLED/*/volatile.cpio.gz; do
pascal@137 1448 zcat $i | cpio -t | grep -v "[0-9]* blocks"
pascal@137 1449 done > files.list
pascal@137 1450 mkdir fs
pascal@137 1451 cd fs
pascal@246 1452 ( cd / ; cpio -o -H newc ) < ../files.list | cpio -idm > /dev/null
pascal@137 1453 mkdir -p etc/tazlito
pascal@137 1454 for i in $INSTALLED/*/receipt; do
pascal@137 1455 EXTRAVERSION=""
pascal@137 1456 . $i
pascal@137 1457 echo "$PACKAGE-$VERSION$EXTRAVERSION"
pascal@137 1458 done > etc/tazlito/config-packages.list
pascal@137 1459 cd ..
pascal@137 1460 echo "etc/tazlito/config-packages.list" >> files.list
pascal@137 1461 cat > receipt <<EOT
pascal@137 1462 # SliTaz package receipt.
pascal@137 1463
pascal@137 1464 PACKAGE="config"
pascal@137 1465 VERSION="$CONFIG_VERSION"
pascal@137 1466 CATEGORY="base-system"
pascal@137 1467 SHORT_DESC="User configuration backup on $(date)"
pascal@137 1468 DEPENDS="$(ls $INSTALLED)"
pascal@137 1469 EOT
pascal@137 1470 cd ..
pascal@137 1471 tazpkg pack config-$CONFIG_VERSION
pascal@137 1472 cp config-$CONFIG_VERSION.tazpkg $TOP_DIR
pascal@137 1473 cd $TOP_DIR
pascal@137 1474 rm -rf $TMP_DIR
pascal@137 1475 ;;
pascal@18 1476 repack)
MikeDSmith25@135 1477 # Create SliTaz package archive from an installed package.
pascal@18 1478 #
pascal@18 1479 check_for_package_on_cmdline
pascal@18 1480 check_for_receipt
pascal@114 1481 EXTRAVERSION=""
pascal@114 1482 . $INSTALLED/$PACKAGE/receipt
pascal@18 1483 echo ""
pascal@114 1484 echo -e "\033[1mRepacking :\033[0m $PACKAGE-$VERSION$EXTRAVERSION.tazpkg"
pascal@18 1485 echo "================================================================================"
pascal@24 1486 if grep -qs ^NO_REPACK= $INSTALLED/$PACKAGE/receipt; then
pascal@24 1487 echo "Can't repack $PACKAGE"
pascal@24 1488 exit 1
pascal@24 1489 fi
pascal@21 1490 if [ -s $INSTALLED/$PACKAGE/modifiers ]; then
pascal@21 1491 echo "Can't repack, $PACKAGE files have been modified by:"
pascal@21 1492 for i in $(cat $INSTALLED/$PACKAGE/modifiers); do
pascal@21 1493 echo " $i"
pascal@21 1494 done
pascal@21 1495 exit 1
pascal@21 1496 fi
pascal@18 1497 MISSING=""
pascal@63 1498 while read i; do
pascal@18 1499 [ -e "$i" ] && continue
pascal@63 1500 [ -L "$i" ] || MISSING="$MISSING\n $i"
pascal@63 1501 done < $INSTALLED/$PACKAGE/files.list
pascal@18 1502 if [ -n "$MISSING" ]; then
pascal@63 1503 echo -n "Can't repack, the following files are lost:"
pascal@63 1504 echo -e "$MISSING"
pascal@18 1505 exit 1
pascal@18 1506 fi
pascal@24 1507 mkdir -p $TMP_DIR && cd $TMP_DIR
pascal@24 1508 FILES="fs.cpio.gz\n"
pascal@24 1509 for i in $(ls $INSTALLED/$PACKAGE) ; do
pascal@128 1510 [ "$i" = "volatile.cpio.gz" ] && continue
pascal@128 1511 [ "$i" = "modifiers" ] && continue
pascal@24 1512 cp $INSTALLED/$PACKAGE/$i . && FILES="$FILES$i\n"
pascal@24 1513 done
pascal@72 1514 ln -s / rootfs
pascal@72 1515 mkdir tmp
pascal@72 1516 sed 's/^/rootfs/' < files.list | cpio -o -H newc 2>/dev/null |\
pascal@246 1517 ( cd tmp ; cpio -idm 2>/dev/null )
pascal@72 1518 mv tmp/rootfs fs
pascal@145 1519 if [ -f $INSTALLED/$PACKAGE/volatile.cpio.gz ]; then
pascal@145 1520 zcat $INSTALLED/$PACKAGE/volatile.cpio.gz | \
pascal@246 1521 ( cd fs; cpio -idm )
pascal@145 1522 fi
pascal@107 1523 if grep -q repack_cleanup $INSTALLED/$PACKAGE/receipt; then
pascal@107 1524 . $INSTALLED/$PACKAGE/receipt
pascal@107 1525 repack_cleanup fs
pascal@107 1526 fi
pascal@107 1527 if [ -f $INSTALLED/$PACKAGE/md5sum ]; then
pascal@107 1528 sed 's, , fs,' < $INSTALLED/$PACKAGE/md5sum | \
pascal@214 1529 md5sum -s -c || {
pascal@214 1530 echo "Can't repack, md5sum error."
pascal@107 1531 cd $TOP_DIR
pascal@214 1532 rm -rf $TMP_DIR
pascal@107 1533 exit 1
pascal@214 1534 }
pascal@107 1535 fi
pascal@19 1536 find fs | cpio -o -H newc 2> /dev/null | gzip -9 > fs.cpio.gz
pascal@24 1537 echo -e "$FILES" | cpio -o -H newc 2> /dev/null > \
pascal@114 1538 $TOP_DIR/$PACKAGE-$VERSION$EXTRAVERSION.tazpkg
pascal@74 1539 cd $TOP_DIR
pascal@18 1540 \rm -R $TMP_DIR
pascal@18 1541 echo "Package $PACKAGE repacked successfully."
pascal@114 1542 echo "Size : `du -sh $PACKAGE-$VERSION$EXTRAVERSION.tazpkg`"
pascal@18 1543 echo ""
pascal@18 1544 ;;
pankso@6 1545 pack)
MikeDSmith25@135 1546 # Create SliTaz package archive using cpio and gzip.
pankso@6 1547 #
pankso@6 1548 check_for_package_on_cmdline
pankso@6 1549 cd $PACKAGE
pankso@6 1550 if [ ! -f "receipt" ]; then
pankso@6 1551 echo "Receipt is missing. Please read the documentation."
pankso@6 1552 exit 0
pankso@6 1553 else
pankso@6 1554 echo ""
pankso@6 1555 echo -e "\033[1mPacking :\033[0m $PACKAGE"
pankso@6 1556 echo "================================================================================"
MikeDSmith25@135 1557 # Create files.list with redirecting find outpout.
pankso@6 1558 echo -n "Creating the list of files..." && cd fs
pankso@6 1559 find . -type f -print > ../files.list
pankso@6 1560 find . -type l -print >> ../files.list
pankso@6 1561 cd .. && sed -i s/'^.'/''/ files.list
pankso@6 1562 status
pascal@138 1563 echo -n "Creating md5sum of files..."
pascal@138 1564 while read file; do
pascal@138 1565 [ -L "fs$file" ] && continue
pascal@138 1566 [ -f "fs$file" ] || continue
pascal@158 1567 case "$file" in
pascal@158 1568 /lib/modules/*/modules.*|*.pyc) continue;;
pascal@158 1569 esac
pascal@138 1570 md5sum "fs$file" | sed 's/ fs/ /'
pascal@138 1571 done < files.list > md5sum
pascal@138 1572 status
pascal@147 1573 UNPACKED_SIZE=$(du -chs fs receipt files.list md5sum \
pascal@147 1574 description.txt 2> /dev/null | awk \
pascal@147 1575 '{ sz=$1 } END { print sz }')
pankso@6 1576 # Build cpio archives.
pankso@6 1577 echo -n "Compressing the fs... "
pascal@138 1578 find fs -print | cpio -o -H newc | gzip > fs.cpio.gz
pascal@138 1579 rm -rf fs
pascal@147 1580 status
pascal@147 1581 PACKED_SIZE=$(du -chs fs.cpio.gz receipt files.list \
pascal@147 1582 md5sum description.txt 2> /dev/null | awk \
pascal@147 1583 '{ sz=$1 } END { print sz }')
pascal@147 1584 echo -n "Undating receipt sizes..."
pascal@147 1585 sed -i s/^PACKED_SIZE.*$// receipt
pascal@147 1586 sed -i s/^UNPACKED_SIZE.*$// receipt
pascal@147 1587 sed -i "s/^PACKAGE=/PACKED_SIZE=\"$PACKED_SIZE\"\nUNPACKED_SIZE=\"$UNPACKED_SIZE\"\nPACKAGE=/" receipt
pascal@147 1588 status
pankso@6 1589 echo -n "Creating full cpio archive... "
pankso@6 1590 find . -print | cpio -o -H newc > ../$PACKAGE.tazpkg
pascal@147 1591 status
pankso@6 1592 echo -n "Restoring original package tree... "
pascal@246 1593 zcat fs.cpio.gz | cpio -idm
pascal@147 1594 status
pascal@128 1595 rm fs.cpio.gz && cd ..
pankso@6 1596 echo "================================================================================"
pascal@18 1597 echo "Package $PACKAGE compressed successfully."
pankso@6 1598 echo "Size : `du -sh $PACKAGE.tazpkg`"
pankso@6 1599 echo ""
pankso@6 1600 fi
pankso@6 1601 ;;
pankso@6 1602 recharge)
pankso@6 1603 # Recharge packages.list from a mirror.
pankso@6 1604 #
pankso@6 1605 check_root
pascal@187 1606 for path in $LOCALSTATE $LOCALSTATE/undigest/*; do
pascal@187 1607 [ -f $path/mirror ] || continue
pankso@6 1608 echo ""
pascal@187 1609 if [ "$path" != "$LOCALSTATE" ]; then
pascal@187 1610 echo "Recharge undigest $(basename $path):"
pascal@187 1611 fi
pascal@187 1612 cd $path
pascal@187 1613 if [ -f "packages.list" ]; then
pascal@187 1614 echo -n "Creating backup of the last packages list..."
pascal@187 1615 mv -f packages.desc packages.desc.bak 2>/dev/null
pascal@187 1616 mv -f packages.md5 packages.md5.txt 2>/dev/null
pascal@187 1617 mv -f packages.txt packages.txt.bak 2>/dev/null
pascal@187 1618 mv -f packages.list packages.list.bak 2>/dev/null
pascal@187 1619 mv -f packages.equiv packages.equiv.bak 2>/dev/null
pascal@248 1620 mv -f files.list.lzma files.list.lzma.bak 2> /dev/null
pascal@248 1621 mv -f mirrors mirrors.bak 2> /dev/null
pascal@187 1622 status
pascal@187 1623 fi
pascal@187 1624 download_from "$(cat mirror)" packages.desc
pascal@187 1625 download_from "$(cat mirror)" packages.md5
pascal@187 1626 download_from "$(cat mirror)" packages.txt
pascal@187 1627 download_from "$(cat mirror)" packages.list
pascal@187 1628 download_from "$(cat mirror)" packages.equiv
pascal@187 1629 download_from "$(cat mirror)" files.list.lzma
pascal@218 1630 download_from "$(cat mirror)" mirrors
pascal@248 1631 [ -f mirrors ] || mv mirrors.bak mirrors 2> /dev/null
pascal@218 1632 suffix=$(head -1 mirror)
pascal@218 1633 suffix=packages${suffix#*/packages}
pascal@218 1634 for i in $(cat mirrors 2> /dev/null); do
pascal@223 1635 grep -qs $i mirror || echo $i$suffix >> mirror
pascal@218 1636 done
pascal@187 1637 if [ -f "packages.list.bak" ]; then
pascal@187 1638 diff -u packages.list.bak packages.list | grep ^+[a-z] > packages.diff
pascal@187 1639 sed -i s/+// packages.diff
pascal@187 1640 echo ""
pascal@187 1641 echo -e "\033[1mMirrored packages diff\033[0m"
pankso@6 1642 echo "================================================================================"
pascal@187 1643 cat packages.diff
pascal@187 1644 if [ ! "`cat packages.diff | wc -l`" = 0 ]; then
pascal@187 1645 echo "================================================================================"
pascal@187 1646 echo "`cat packages.diff | wc -l` new packages on the mirror."
pascal@187 1647 echo ""
pascal@187 1648 else
pascal@187 1649 echo "`cat packages.diff | wc -l` new packages on the mirror."
pascal@187 1650 echo ""
pascal@187 1651 fi
pankso@6 1652 else
pascal@187 1653 echo -e "
pankso@6 1654 ================================================================================
pankso@6 1655 Last packages.list is ready to use. Note that next time you recharge the list,
MikeDSmith25@135 1656 a list of differencies will be displayed to show new and upgradeable packages.\n"
pascal@187 1657 fi
pascal@187 1658 done
pankso@6 1659 ;;
pankso@6 1660 upgrade)
pankso@6 1661 # Upgrade all installed packages with the new version from the mirror.
pankso@6 1662 #
pankso@6 1663 check_root
pankso@6 1664 check_for_packages_list
pankso@6 1665 cd $LOCALSTATE
pankso@10 1666 # Touch the blocked pkgs list to avoid errors and remove any old
pankso@10 1667 # upgrade list.
pankso@10 1668 touch blocked-packages.list
MikeDSmith25@134 1669 rm -f upgradeable-packages.list
pankso@6 1670 echo ""
MikeDSmith25@136 1671 echo -e "\033[1mAvailable upgrades\033[0m"
pankso@6 1672 echo "================================================================================"
pankso@52 1673 echo ""
pascal@66 1674 # Some packages must be installed first
pascal@121 1675 FIRST_CLASS_PACKAGE=" glibc-base slitaz-base-files slitaz-boot-scripts "
pankso@6 1676 for pkg in $INSTALLED/*
pascal@122 1677 do
pascal@122 1678 [ -f $pkg/receipt ] || continue
pascal@114 1679 EXTRAVERSION=""
pankso@6 1680 . $pkg/receipt
MikeDSmith25@135 1681 # Display package name to show that Tazpkg is working...
pankso@52 1682 echo -en "\\033[0G "
pankso@52 1683 echo -en "\\033[0G$PACKAGE"
pankso@10 1684 # Skip specified pkgs listed in $LOCALSTATE/blocked-packages.list
pascal@223 1685 if grep -qs "^$PACKAGE" $BLOCKED; then
pankso@10 1686 blocked=$(($blocked+1))
pankso@10 1687 else
pankso@10 1688 # Check if the installed package is in the current list (other
pankso@10 1689 # mirror or local).
pascal@190 1690 NEW_PACKAGE=$(get_package_filename $PACKAGE)
pascal@112 1691
pascal@110 1692 if [ -n "$NEW_PACKAGE" ]; then
paul@247 1693 # Set new pkg and version for future comparison
pankso@10 1694 NEW_VERSION=`echo $NEW_PACKAGE | sed s/$PACKAGE-/''/`
pankso@43 1695 # Change '-' and 'pre' to points.
pankso@43 1696 NEW_VERSION=`echo $NEW_VERSION | sed s/'-'/'.'/`
pascal@114 1697 VERSION=`echo $VERSION | sed s/'-'/'.'/`$EXTRAVERSION
pankso@43 1698 NEW_VERSION=`echo $NEW_VERSION | sed s/'pre'/'.'/`
pankso@43 1699 VERSION=`echo $VERSION | sed s/'pre'/'.'/`
pascal@112 1700 NEW_VERSION=`echo $NEW_VERSION | sed 's/[A-Z]\.//'`
pascal@112 1701 VERSION=`echo $VERSION | sed 's/[A-Z]\.//'`
paul@247 1702 # Compare version. Upgrades are only available for official
paul@247 1703 # packages, so we control the mirror and it should be ok if
paul@247 1704 # we just check for equality.
pascal@191 1705 RELEASE=""
pascal@191 1706 if [ -f installed.md5 -a -f packages.md5 ]; then
pascal@195 1707 current_md5=$(grep -s " $PACKAGE-$VERSION" installed.md5 | awk '{ print $1 }')
pascal@197 1708 new_md5=$(grep -hs " $PACKAGE-$VERSION" packages.md5 undigest/*/packages.md5 | head -1 | awk '{ print $1 }')
pascal@191 1709 [ -n "$current_md5" ] && [ -n "$new_md5" ] &&
pascal@191 1710 [ "$current_md5" != "$new_md5" ] && RELEASE=build
pascal@191 1711 fi
pascal@191 1712 if [ "$VERSION" != "$NEW_VERSION" -o -n "$RELEASE" ]; then
pankso@10 1713 # Version seems different. Check for major, minor or
pankso@10 1714 # revision
pascal@105 1715 PKG_MAJOR=`echo ${VERSION%_*} | cut -f1 -d"."`
pascal@105 1716 NEW_MAJOR=`echo ${NEW_VERSION%_*} | cut -f1 -d"."`
pascal@105 1717 PKG_MINOR=`echo ${VERSION%_*} | cut -f2 -d"."`
pascal@105 1718 NEW_MINOR=`echo ${NEW_VERSION%_*} | cut -f2 -d"."`
pankso@10 1719 # Minor
pascal@168 1720 if [ "$NEW_MINOR" -gt "$PKG_MINOR" ] 2> /dev/null; then
pankso@10 1721 RELEASE=minor
pankso@10 1722 fi
pascal@168 1723 if [ "$NEW_MINOR" -lt "$PKG_MINOR" ] 2> /dev/null; then
pankso@10 1724 RELEASE=$WARNING
pankso@10 1725 FIXE=yes
pankso@10 1726 fi
pankso@41 1727 # Major
pascal@168 1728 if [ "$NEW_MAJOR" -gt "$PKG_MAJOR" ] 2> /dev/null; then
pankso@41 1729 RELEASE=major
pankso@41 1730 FIXE=""
pankso@41 1731 fi
pascal@168 1732 if [ "$NEW_MAJOR" -lt "$PKG_MAJOR" ] 2> /dev/null; then
pankso@41 1733 RELEASE=$WARNING
pankso@41 1734 FIXE=yes
pankso@41 1735 fi
pankso@10 1736 # Default to revision.
pankso@10 1737 if [ -z $RELEASE ]; then
pankso@10 1738 RELEASE=revision
pankso@10 1739 fi
pankso@52 1740 # Pkg name is already displayed by the check process.
pankso@10 1741 echo -en "\033[24G $VERSION"
pankso@10 1742 echo -en "\033[38G --->"
pankso@44 1743 echo -en "\033[43G $NEW_VERSION"
pankso@44 1744 echo -en "\033[58G $CATEGORY"
pankso@10 1745 echo -e "\033[72G $RELEASE"
pankso@10 1746 up=$(($up+1))
MikeDSmith25@134 1747 echo "$PACKAGE" >> upgradeable-packages.list
pascal@66 1748 case "$FIRST_CLASS_PACKAGE" in
MikeDSmith25@134 1749 *\ $PACKAGE\ *) echo "$PACKAGE" >> upgradeable-packages.list$$;;
pascal@66 1750 esac
pankso@14 1751 unset RELEASE
pankso@10 1752 fi
pankso@10 1753 packages=$(($packages+1))
pankso@6 1754 fi
pankso@10 1755 fi
pankso@6 1756 done
pankso@45 1757 if [ -z $blocked ]; then
pankso@44 1758 blocked=0
pankso@44 1759 fi
pankso@52 1760 # Clean last checked package and display summary.
pankso@6 1761 if [ ! "$up" = "" ]; then
pankso@52 1762 echo -e "\\033[0G "
pankso@6 1763 echo "================================================================================"
pankso@10 1764 echo "$packages installed and listed packages to consider, $up to upgrade, $blocked blocked."
pankso@6 1765 echo ""
pankso@6 1766 else
MikeDSmith25@136 1767 echo -e "\\033[0GSystem is up-to-date. "
pankso@52 1768 echo ""
pankso@52 1769 echo "================================================================================"
pankso@10 1770 echo "$packages installed and listed packages to consider, 0 to upgrade, $blocked blocked."
pankso@6 1771 echo ""
pankso@6 1772 exit 0
pankso@6 1773 fi
pankso@10 1774 # What to do if major or minor version is smaller.
pankso@10 1775 if [ "$FIXE" == "yes" ]; then
pankso@10 1776 echo -e "$WARNING ---> Installed package seems more recent than the mirrored one."
pankso@10 1777 echo "You can block packages using the command : 'tazpkg block package'"
paul@247 1778 echo "Or upgrade packages at your own risk."
pankso@10 1779 echo ""
pankso@10 1780 fi
MikeDSmith25@135 1781 # Ask for upgrade, it can be done another time.
pankso@6 1782 echo -n "Upgrade now (y/N) ? "; read anser
pankso@6 1783 if [ ! "$anser" = "y" ]; then
pankso@6 1784 echo -e "\nExiting. No package upgraded.\n"
pankso@6 1785 exit 0
pankso@6 1786 fi
MikeDSmith25@135 1787 # If anser is yes (y). Install all new versions.
MikeDSmith25@134 1788 cat upgradeable-packages.list >> upgradeable-packages.list$$
MikeDSmith25@134 1789 mv -f upgradeable-packages.list$$ upgradeable-packages.list
pascal@191 1790 yes y | tazpkg get-install-list upgradeable-packages.list --forced
pascal@191 1791 rm -f upgradeable-packages.list
pankso@6 1792 ;;
pascal@152 1793 bugs)
pascal@152 1794 # Show known bugs in package(s)
pascal@152 1795 #
pascal@152 1796 cd $INSTALLED
pascal@159 1797 shift
pascal@159 1798 LIST=$@
pascal@159 1799 [ -n "$LIST" ] || LIST=`ls`
pascal@152 1800 MSG="No known bugs."
pascal@152 1801 for PACKAGE in $LIST; do
pascal@152 1802 BUGS=""
pascal@154 1803 EXTRAVERSION=""
pascal@152 1804 . $PACKAGE/receipt
pascal@152 1805 if [ -n "$BUGS" ]; then
pascal@152 1806 MSG="
pascal@152 1807 Bug list completed"
pascal@152 1808 cat <<EOT
pascal@152 1809
pascal@162 1810 Bugs in package $PACKAGE version $VERSION$EXTRAVERSION:
pascal@152 1811 $BUGS
pascal@152 1812 EOT
pascal@152 1813 fi
pascal@152 1814 done
pascal@152 1815 echo "$MSG"
pascal@152 1816 ;;
pascal@25 1817 check)
MikeDSmith25@135 1818 # Check installed packages set.
pascal@25 1819 #
pascal@25 1820 check_root
pascal@25 1821 cd $INSTALLED
pascal@25 1822 for PACKAGE in `ls`; do
pascal@122 1823 if [ ! -f $PACKAGE/receipt ]; then
pascal@122 1824 echo "The package $PACKAGE installation is not completed"
pascal@122 1825 continue
pascal@122 1826 fi
pascal@29 1827 DEPENDS=""
pascal@114 1828 EXTRAVERSION=""
pascal@29 1829 . $PACKAGE/receipt
pascal@29 1830 if [ -s $PACKAGE/modifiers ]; then
pascal@114 1831 echo "The package $PACKAGE $VERSION$EXTRAVERSION has been modified by :"
pascal@29 1832 for i in $(cat $PACKAGE/modifiers); do
pascal@29 1833 echo " $i"
pascal@29 1834 done
pascal@29 1835 fi
pascal@114 1836 MSG="Files lost from $PACKAGE $VERSION$EXTRAVERSION :\n"
pascal@25 1837 while read file; do
pascal@25 1838 [ -e "$file" ] && continue
pascal@25 1839 if [ -L "$file" ]; then
pascal@25 1840 MSG="$MSG target of symlink"
pascal@25 1841 fi
pascal@25 1842 echo -e "$MSG $file"
pascal@25 1843 MSG=""
pascal@25 1844 done < $PACKAGE/files.list
pascal@114 1845 MSG="Missing dependencies for $PACKAGE $VERSION$EXTRAVERSION :\n"
pascal@25 1846 for i in $DEPENDS; do
pascal@25 1847 [ -d $i ] && continue
pascal@25 1848 echo -e "$MSG $i"
pascal@25 1849 MSG=""
pascal@25 1850 done
pascal@122 1851 MSG="Dependencies loop between $PACKAGE and :\n"
pascal@122 1852 ALL_DEPS=""
pascal@122 1853 check_for_deps_loop $PACKAGE $DEPENDS
pascal@25 1854 done
pascal@159 1855 echo -n "Looking for known bugs... "
pascal@152 1856 tazpkg bugs
pascal@60 1857 if [ "$PACKAGE_FILE" = "--full" ]; then
pascal@106 1858 for file in */md5sum; do
pascal@177 1859 CONFIG_FILES=""
pascal@177 1860 . $(dirname "$file")/receipt
pascal@106 1861 [ -s "$file" ] || continue
pascal@177 1862 while read md5 f; do
pascal@177 1863 [ -f $f ] || continue
pascal@177 1864 for i in $CONFIG_FILES; do
pascal@177 1865 case "$f" in
pascal@177 1866 $i|$i/*) continue 2;;
pascal@177 1867 esac
pascal@177 1868 done
pascal@177 1869 echo "$md5 $f"
pascal@177 1870 done < "$file" | md5sum -c - 2> /dev/null | \
pascal@177 1871 grep -v OK$ | sed 's/FAILED$/MD5SUM MISMATCH/'
pascal@106 1872 done
pascal@60 1873 FILES=" "
pascal@60 1874 for file in $(cat */files.list); do
pascal@60 1875 [ -d "$file" ] && continue
pascal@60 1876 case "$FILES" in *\ $file\ *) continue;; esac
pascal@60 1877 [ $(grep "^$file$" */files.list 2> /dev/null | \
pascal@60 1878 wc -l) -gt 1 ] || continue
pascal@60 1879 FILES="$FILES$file "
pascal@60 1880 echo "The following packages provide $file :"
pascal@60 1881 grep -l "^$file$" */files.list | while read f
pascal@60 1882 do
pascal@60 1883 pkg=${f%/files.list}
pascal@60 1884 echo -n " $pkg"
pascal@60 1885 if [ -f $pkg/modifiers ]; then
pascal@153 1886 echo -n " (overridden by $(echo "$(cat $pkg/modifiers)"))"
pascal@60 1887 fi
pascal@60 1888 echo ""
pascal@60 1889 done
pascal@60 1890 done
pascal@73 1891 MSG="No package has installed the following files:\n"
pascal@155 1892 find /etc /bin /sbin /lib /usr /var/www \
pascal@155 1893 -not -type d 2> /dev/null | while read file; do
pascal@73 1894 case "$file" in *\[*) continue;; esac
pascal@73 1895 grep -q "^$file$" */files.list && continue
pascal@73 1896 echo -e "$MSG $file"
pascal@73 1897 MSG=""
pascal@73 1898 done
pascal@60 1899 fi
pascal@25 1900 echo "Check completed."
pascal@25 1901 ;;
pankso@10 1902 block)
pankso@10 1903 # Add a pkg name to the list of blocked packages.
pankso@10 1904 #
pankso@10 1905 check_root
pankso@10 1906 check_for_package_on_cmdline
pankso@10 1907 echo ""
pascal@223 1908 if grep -qs "^$PACKAGE" $BLOCKED; then
pankso@10 1909 echo "$PACKAGE is already in the blocked packages list."
pankso@10 1910 echo ""
pankso@10 1911 exit 0
pankso@10 1912 else
pankso@10 1913 echo -n "Add $PACKAGE to : $BLOCKED..."
pankso@10 1914 echo $PACKAGE >> $BLOCKED
pankso@10 1915 status
pascal@183 1916 # Log this activity
pascal@183 1917 . $INSTALLED/$PACKAGE/receipt
pascal@183 1918 log Blocked
pankso@10 1919 fi
pankso@10 1920 echo ""
pankso@10 1921 ;;
pankso@10 1922 unblock)
MikeDSmith25@135 1923 # Remove a pkg name from the list of blocked packages.
pankso@10 1924 #
pankso@10 1925 check_root
pankso@10 1926 check_for_package_on_cmdline
pankso@10 1927 echo ""
pascal@223 1928 if grep -qs "^$PACKAGE" $BLOCKED; then
pankso@10 1929 echo -n "Removing $PACKAGE from : $BLOCKED..."
pankso@10 1930 sed -i s/$PACKAGE/''/ $BLOCKED
pankso@10 1931 sed -i '/^$/d' $BLOCKED
pankso@10 1932 status
pascal@183 1933 # Log this activity
pascal@183 1934 . $INSTALLED/$PACKAGE/receipt
pascal@183 1935 log Unblocked
pankso@10 1936 else
pankso@10 1937 echo "$PACKAGE is not in the blocked packages list."
pankso@10 1938 echo ""
pankso@10 1939 exit 0
pankso@10 1940 fi
pankso@10 1941 echo ""
pankso@10 1942 ;;
pankso@6 1943 get)
pankso@6 1944 # Downlowd a package with wget.
pankso@6 1945 #
pankso@6 1946 check_for_package_on_cmdline
pankso@6 1947 check_for_packages_list
pankso@6 1948 check_for_package_in_list
pankso@6 1949 echo ""
pascal@17 1950 download $PACKAGE.tazpkg
pankso@6 1951 echo ""
pankso@6 1952 ;;
pankso@6 1953 get-install)
pankso@6 1954 # Download and install a package.
pankso@6 1955 #
pankso@6 1956 check_root
pankso@6 1957 check_for_package_on_cmdline
pankso@6 1958 check_for_packages_list
pascal@121 1959 DO_CHECK=""
pascal@121 1960 while [ -n "$3" ]; do
pascal@121 1961 case "$3" in
pascal@121 1962 --forced)
pascal@121 1963 DO_CHECK="no"
pascal@121 1964 ;;
pascal@121 1965 --root=*)
pascal@121 1966 ROOT="${3#--root=}"
pascal@121 1967 ;;
pascal@121 1968 --list=*)
pascal@121 1969 INSTALL_LIST="${3#--list=}"
pascal@121 1970 ;;
pascal@121 1971 *) shift 2
pascal@121 1972 echo -e "\nUnknown option $*.\n"
pascal@121 1973 exit 1
pascal@121 1974 ;;
pascal@121 1975 esac
pascal@121 1976 shift
pascal@121 1977 done
pascal@202 1978 AUTOEXEC="no"
pascal@202 1979 if ! check_for_package_in_list check; then
pascal@202 1980 PACKAGE=get-$PACKAGE
pascal@202 1981 AUTOEXEC=$PACKAGE
pascal@202 1982 check_for_package_in_list
pascal@202 1983 if [ -n "$(get_installed_package_pathname $PACKAGE $ROOT)" ]; then
pascal@202 1984 $AUTOEXEC $ROOT
pascal@202 1985 exit 0
pascal@202 1986 fi
pascal@202 1987 fi
pankso@6 1988 # Check if forced install.
pascal@121 1989 if [ "$DO_CHECK" = "no" ]; then
pankso@6 1990 rm -f $CACHE_DIR/$PACKAGE.tazpkg
pankso@6 1991 else
pascal@121 1992 check_for_installed_package $ROOT
pankso@6 1993 fi
pankso@6 1994 cd $CACHE_DIR
pankso@6 1995 if [ -f "$PACKAGE.tazpkg" ]; then
pankso@6 1996 echo "$PACKAGE already in the cache : $CACHE_DIR"
MikeDSmith25@135 1997 # Check package download was finished
pascal@109 1998 tail -c 2k $PACKAGE.tazpkg | grep -q 00000000TRAILER || {
pascal@108 1999 echo "Continue $PACKAGE download"
pascal@108 2000 download $PACKAGE.tazpkg
pascal@108 2001 }
pankso@6 2002 else
pankso@6 2003 echo ""
pascal@17 2004 download $PACKAGE.tazpkg
pankso@6 2005 fi
pankso@14 2006 PACKAGE_FILE=$CACHE_DIR/$PACKAGE.tazpkg
pascal@121 2007 install_package $ROOT
pascal@202 2008 [ "$AUTOEXEC" != "no" ] && $PACKAGE $ROOT
pankso@6 2009 ;;
pankso@6 2010 clean-cache)
pankso@6 2011 # Remove all downloaded packages.
pankso@6 2012 #
pankso@6 2013 check_root
pankso@6 2014 files=`ls -1 $CACHE_DIR | wc -l`
pankso@6 2015 echo ""
pankso@44 2016 echo -e "\033[1mClean cache :\033[0m $CACHE_DIR"
pankso@6 2017 echo "================================================================================"
pankso@44 2018 echo -n "Cleaning cache directory..."
pankso@6 2019 rm -rf $CACHE_DIR/*
pankso@44 2020 status
pankso@44 2021 echo "================================================================================"
pankso@6 2022 echo "$files file(s) removed from cache."
pankso@6 2023 echo ""
pankso@6 2024 ;;
pascal@187 2025 list-undigest)
pascal@187 2026 # list undigest URLs.
pascal@187 2027 #
pascal@187 2028 if [ "$2" = "--box" ]; then
pascal@187 2029 for i in $LOCALSTATE/undigest/*/mirror; do
pascal@187 2030 [ -f $i ] || continue
pascal@187 2031 echo "$(basename $(dirname $i))|$(cat $i)"
pascal@187 2032 done
pascal@187 2033 else
pascal@187 2034 echo ""
pascal@187 2035 echo -e "\033[1mCurrent undigest(s)\033[0m"
pascal@187 2036 echo "================================================================================"
pascal@187 2037 for i in $LOCALSTATE/undigest/*/mirror; do
pascal@187 2038 if [ ! -f $i ]; then
pascal@187 2039 echo "No undigest mirror found."
pascal@187 2040 exit 1
pascal@187 2041 fi
pascal@187 2042 echo "$(basename $(dirname $i)) $(cat $i)"
pascal@187 2043 done
pascal@187 2044 echo ""
pascal@187 2045 fi
pascal@187 2046 ;;
pascal@187 2047 remove-undigest)
pascal@187 2048 # remove undigest URL.
pascal@187 2049 #
pascal@187 2050 check_root
pascal@187 2051 if [ -d $LOCALSTATE/undigest/$2 ]; then
pascal@187 2052 echo -n "Remove $2 undigest (y/N) ? "; read anser
pascal@187 2053 if [ "$anser" = "y" ]; then
pascal@187 2054 echo -n "Removing $2 undigest..."
pascal@187 2055 rm -rf $LOCALSTATE/undigest/$2
pascal@187 2056 status
pascal@187 2057 rmdir $LOCALSTATE/undigest 2> /dev/null
pascal@187 2058 fi
pascal@187 2059 else
pascal@187 2060 echo "Undigest $2 not found"
pascal@187 2061 fi
pascal@187 2062 ;;
pascal@187 2063 add-undigest|setup-undigest)
pascal@187 2064 # Add undigest URL.
pascal@187 2065 #
pascal@187 2066 check_root
pascal@187 2067 undigest=$2
pascal@187 2068 [ -d $LOCALSTATE/undigest ] || mkdir $LOCALSTATE/undigest
pascal@187 2069 if [ -z "$undigest" ]; then
pascal@187 2070 i=1
pascal@187 2071 while [ -d $LOCALSTATE/undigest/$i ]; do
pascal@187 2072 i=$(($i+1))
pascal@187 2073 done
pascal@187 2074 undigest=$i
pascal@187 2075 fi
pascal@187 2076 if [ ! -d $LOCALSTATE/undigest/$undigest ]; then
pascal@187 2077 echo "Creating new undigest $undigest."
pascal@187 2078 mkdir $LOCALSTATE/undigest/$undigest
pascal@187 2079 fi
pascal@187 2080 setup_mirror $LOCALSTATE/undigest/$undigest $3
pascal@187 2081 ;;
pankso@6 2082 setup-mirror)
pankso@6 2083 # Change mirror URL.
pankso@6 2084 #
pankso@6 2085 check_root
pascal@187 2086 setup_mirror $LOCALSTATE $2
pankso@6 2087 ;;
erjo@56 2088 reconfigure)
erjo@56 2089 # Replay post_install from receipt
erjo@56 2090 #
erjo@56 2091 check_for_package_on_cmdline
erjo@56 2092 check_root
pascal@250 2093 ROOT=""
pascal@250 2094 while [ -n "$3" ]; do
pascal@250 2095 case "$3" in
pascal@250 2096 --root=*)
pascal@250 2097 ROOT="${3#--root=}/"
pascal@250 2098 ;;
pascal@250 2099 *) shift 2
pascal@250 2100 echo -e "\nUnknown option $*.\n"
pascal@250 2101 exit 1
pascal@250 2102 ;;
pascal@250 2103 esac
pascal@250 2104 shift
pascal@250 2105 done
pascal@250 2106 if [ -d "$ROOT$INSTALLED/$PACKAGE" ]; then
pascal@250 2107 check_for_receipt $ROOT
erjo@56 2108 # Check for post_install
pascal@250 2109 if grep -q ^post_install $ROOT$INSTALLED/$PACKAGE/receipt; then
pascal@250 2110 . $ROOT$INSTALLED/$PACKAGE/receipt
pascal@250 2111 post_install $ROOT
pascal@183 2112 # Log this activity
pascal@250 2113 [ -n "$ROOT" ] || log Reconfigured
erjo@56 2114 else
erjo@56 2115 echo -e "\nNothing to do for $PACKAGE."
erjo@56 2116 fi
erjo@56 2117 else
erjo@56 2118 echo -e "\npackage $PACKAGE is not installed."
erjo@56 2119 echo -e "Install package with 'tazpkg install' or 'tazpkg get-install'\n"
erjo@56 2120 fi
erjo@56 2121 ;;
pankso@55 2122 shell)
pankso@55 2123 # Tazpkg SHell
pankso@55 2124 #
pankso@55 2125 if test $(id -u) = 0 ; then
pankso@55 2126 PROMPT="\\033[1;33mtazpkg\\033[0;39m# "
pankso@55 2127 else
pankso@55 2128 PROMPT="\\033[1;33mtazpkg\\033[0;39m> "
pankso@55 2129 fi
pankso@55 2130 if [ ! "$2" = "--noheader" ]; then
pankso@55 2131 clear
pankso@55 2132 echo ""
pankso@55 2133 echo -e "\033[1mTazpkg SHell.\033[0m"
pankso@55 2134 echo "================================================================================"
MikeDSmith25@135 2135 echo "Type 'usage' to list all available commands or 'quit' or 'q' to exit."
pankso@55 2136 echo ""
pankso@55 2137 fi
pankso@55 2138 while true
pankso@55 2139 do
pankso@55 2140 echo -en "$PROMPT"; read cmd
pankso@55 2141 case $cmd in
pankso@55 2142 q|quit)
pankso@55 2143 break ;;
pankso@55 2144 shell)
pankso@55 2145 echo "You are already running a Tazpkg SHell." ;;
pankso@55 2146 su)
pankso@55 2147 su -c 'exec tazpkg shell --noheader' && break ;;
pankso@55 2148 "")
pankso@55 2149 continue ;;
pankso@55 2150 *)
pankso@55 2151 tazpkg $cmd ;;
pankso@55 2152 esac
pankso@55 2153 done
pankso@55 2154 ;;
pascal@205 2155 depends)
paul@247 2156 # Display dependencies tree
pascal@205 2157 cd $INSTALLED
pascal@205 2158 ALL_DEPS=""
pascal@205 2159 if [ -f $2/receipt ]; then
pascal@205 2160 dep_scan $2 ""
pascal@205 2161 fi
pascal@205 2162 ;;
pascal@205 2163 rdepends)
paul@247 2164 # Display reverse dependencies tree
pascal@205 2165 cd $INSTALLED
pascal@205 2166 ALL_DEPS=""
pascal@205 2167 if [ -f $2/receipt ]; then
pascal@260 2168 rdep_scan $2
pascal@205 2169 fi
pascal@205 2170 ;;
pankso@6 2171 usage|*)
pascal@119 2172 # Print a short help or give usage for an unknown or empty command.
pankso@6 2173 #
pankso@6 2174 usage
pankso@6 2175 ;;
pankso@6 2176 esac
pankso@6 2177
pankso@6 2178 exit 0