tazpkg annotate tazpkg @ rev 355

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