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