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