tazpkg annotate tazpkg @ rev 388

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