tazpkg annotate tazpkg @ rev 673

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