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