tazpkg annotate tazpkg @ rev 485

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