tazpkg annotate tazpkg @ rev 458

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