tazpkg view tazpkg @ rev 374
tazpkg: check md5 for packages in cache
| author | Pascal Bellard <pascal.bellard@slitaz.org> |
|---|---|
| date | Fri Nov 12 10:34:22 2010 +0100 (2010-11-12) |
| parents | b1cbfecc1363 |
| children | f789401d2fc3 |
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 if [ "$ROOT" ]; then
1761 ROOTOPTS="--root=$ROOT"
1762 else
1763 ROOTOPTS=""
1764 fi
1765 ;;
1766 *) shift 2
1767 echo -e "\nUnknown option $*.\n"
1768 exit 1
1769 ;;
1770 esac
1771 shift
1772 done
1773 if [ ! -f "$ROOT$INSTALLED/$PACKAGE/receipt" ]; then
1774 echo ""
1775 eval_gettext "\$PACKAGE is not installed."; echo
1776 exit 0
1777 else
1778 ALTERED=""
1779 THE_PACKAGE=$PACKAGE # altered by receipt
1780 for i in $(cd $ROOT$INSTALLED ; ls); do
1781 [ -f $ROOT$INSTALLED/$i/receipt ] || continue
1782 DEPENDS=""
1783 . $ROOT$INSTALLED/$i/receipt
1784 case " $(echo $DEPENDS) " in
1785 *\ $THE_PACKAGE\ *) ALTERED="$ALTERED $i";;
1786 esac
1787 done
1788 EXTRAVERSION=""
1789 . $ROOT$INSTALLED/$THE_PACKAGE/receipt
1790 fi
1791 echo ""
1792 if [ -n "$ALTERED" ]; then
1793 eval_gettext "The following packages depend on \$PACKAGE:"; echo
1794 for i in $ALTERED; do
1795 echo " $i"
1796 done
1797 fi
1798 REFRESH=$(cd $ROOT$INSTALLED ; grep -sl ^$PACKAGE$ */modifiers)
1799 if [ -n "$REFRESH" ]; then
1800 eval_gettext "The following packages have been modified by \$PACKAGE:"; echo
1801 for i in $REFRESH; do
1802 echo " ${i%/modifiers}"
1803 done
1804 fi
1805 eval_gettext "Remove \$PACKAGE (\$VERSION\$EXTRAVERSION) ?"; echo
1806 gettext "Please confirm uninstallation (y/N) : "; read anser
1807 if [ "$anser" = "y" ]; then
1808 echo ""
1809 echo -e "\033[1m`gettext \"Removing:\"`\033[0m $PACKAGE"
1810 echo "================================================================================"
1811 # Pre remove commands.
1812 if grep -q ^pre_remove $ROOT$INSTALLED/$PACKAGE/receipt; then
1813 pre_remove
1814 fi
1815 gettext "Removing all files installed..."
1816 if [ -f $ROOT$INSTALLED/$PACKAGE/modifiers ]; then
1817 for mod in `cat $ROOT$INSTALLED/$PACKAGE/modifiers`
1818 do
1819 for file in `cat $ROOT$INSTALLED/$PACKAGE/files.list`
1820 do
1821 [ $(grep ^$file$ $ROOT$INSTALLED/$mod/files.list | wc -l) -gt 1 ] && continue
1822 remove_with_path $ROOT$file
1823 done
1824 done
1825 else
1826 for file in `cat $ROOT$INSTALLED/$PACKAGE/files.list`
1827 do
1828 remove_with_path $ROOT$file
1829 done
1830 fi
1831 status
1832 if grep -q ^post_remove $ROOT$INSTALLED/$PACKAGE/receipt; then
1833 post_remove
1834 fi
1835 # Remove package receipt.
1836 gettext "Removing package receipt..."
1837 rm -rf $ROOT$INSTALLED/$PACKAGE
1838 status
1839 sed -i "/ $PACKAGE-$VERSION$EXTRAVERSION$/d" \
1840 $LOCALSTATE/installed.md5 2> /dev/null
1841 # Log this activity
1842 log Removed
1843 if [ -n "$ALTERED" ]; then
1844 eval_gettext "Remove packages depending on \$PACKAGE"
1845 echo -n " (y/N) ? "; read anser
1846 if [ "$anser" = "y" ]; then
1847 for i in $ALTERED; do
1848 if [ -d "$ROOT$INSTALLED/$i" ]; then
1849 tazpkg remove $i $ROOTOPTS
1850 fi
1851 done
1852 fi
1853 fi
1854 if [ -n "$REFRESH" ]; then
1855 eval_gettext "Reinstall packages modified by \$PACKAGE"
1856 echo -n " (y/N) ? "; read anser
1857 if [ "$anser" = "y" ]; then
1858 for i in $REFRESH; do
1859 if [ $(wc -l < $ROOT$INSTALLED/$i) -gt 1 ]; then
1860 eval_gettext "Check \$INSTALLED/\$i for reinstallation"; echo
1861 continue
1862 fi
1863 rm -r $ROOT$INSTALLED/$i
1864 tazpkg get-install ${i%/modifiers} $ROOTOPTS --forced
1865 done
1866 fi
1867 fi
1868 else
1869 echo ""
1870 eval_gettext "Uninstallation of \$PACKAGE cancelled."; echo
1871 fi
1872 echo "" ;;
1873 extract)
1874 # Extract .tazpkg cpio archive into a directory.
1875 #
1876 check_for_package_on_cmdline
1877 check_for_package_file
1878 echo ""
1879 echo -e "\033[1m`gettext \"Extracting:\"`\033[0m $PACKAGE"
1880 echo "================================================================================"
1881 # If no directory destination is found on the cmdline
1882 # we create one in the current dir using the package name.
1883 if [ -n "$TARGET_DIR" ]; then
1884 DESTDIR=$TARGET_DIR/$PACKAGE
1885 else
1886 DESTDIR=$PACKAGE
1887 fi
1888 mkdir -p $DESTDIR
1889 gettext "Copying original package..."
1890 cp $PACKAGE_FILE $DESTDIR
1891 status
1892 cd $DESTDIR
1893 extract_package
1894 echo "================================================================================"
1895 eval_gettext "\$PACKAGE is extracted to: \$DESTDIR"; echo
1896 echo "" ;;
1897 recompress)
1898 # Recompress .tazpkg cpio archive with lzma.
1899 #
1900 check_for_package_on_cmdline
1901 check_for_package_file
1902 echo ""
1903 echo -e "\033[1m`gettext \"Recompressing:\"`\033[0m $PACKAGE"
1904 echo "================================================================================"
1905 mkdir -p $TMP_DIR
1906 gettext "Copying original package..."
1907 cp $PACKAGE_FILE $TMP_DIR
1908 status
1909 cd $TMP_DIR
1910 extract_package
1911 gettext "Recompressing the fs... "
1912 find fs | cpio -o -H newc 2> /dev/null | lzma e fs.cpio.lzma -si
1913 rm -rf fs
1914 status
1915 gettext "Creating new package... "
1916 find . -print | cpio -o -H newc > \
1917 $TOP_DIR/$(basename $PACKAGE_FILE).$$ && mv -f \
1918 $TOP_DIR/$(basename $PACKAGE_FILE).$$ \
1919 $TOP_DIR/$(basename $PACKAGE_FILE)
1920 status
1921 cd $TOP_DIR
1922 rm -rf $TMP_DIR ;;
1923 list-config)
1924 # List configuration files installed.
1925 #
1926 if [ "$2" = "--box" ]; then
1927 mkdir -p $TMP_DIR && cd $TMP_DIR
1928 FILES="$INSTALLED/*/volatile.cpio.gz"
1929 [ -n "$3" ] && FILES="$INSTALLED/$3/volatile.cpio.gz"
1930 for i in $FILES; do
1931 zcat $i | cpio -idm > /dev/null
1932 find * -type f 2>/dev/null | while read file; do
1933 if [ ! -e /$file ]; then
1934 echo -n "|--|--|--|File lost"
1935 else
1936 echo -n "$(stat -c "%A|%U|%G|%s|" /$file)"
1937 cmp $file /$file > /dev/null 2>&1 || \
1938 echo -n "$(stat -c "%.16y" /$file)"
1939 fi
1940 echo "|/$file"
1941 done
1942 rm -rf *
1943 done
1944 cd $TOP_DIR
1945 rm -rf $TMP_DIR
1946 else
1947 echo ""
1948 echo -e "\033[1m`gettext \"Configuration files\"`"
1949 echo "================================================================================"
1950 for i in $INSTALLED/*/volatile.cpio.gz; do
1951 [ -n "$2" -a "$i" != "$INSTALLED/$2/volatile.cpio.gz" ] && continue
1952 [ -f "$i" ] || continue
1953 zcat $i | cpio -t | grep -v "[0-9]* blocks"
1954 done | sed 's|^|/|' | sort
1955 echo "================================================================================"
1956 echo ""
1957 fi ;;
1958 repack-config)
1959 # Create SliTaz package archive from configuration files.
1960 #
1961 mkdir -p $TMP_DIR && cd $TMP_DIR
1962 CONFIG_VERSION=1.0
1963 mkdir config-$CONFIG_VERSION
1964 cd config-$CONFIG_VERSION
1965 for i in $INSTALLED/*/volatile.cpio.gz; do
1966 zcat $i | cpio -t | grep -v "[0-9]* blocks"
1967 done > files.list
1968 mkdir fs
1969 cd fs
1970 ( cd / ; cpio -o -H newc ) < ../files.list | cpio -idm > /dev/null
1971 mkdir -p etc/tazlito
1972 for i in $INSTALLED/*/receipt; do
1973 EXTRAVERSION=""
1974 . $i
1975 echo "$PACKAGE-$VERSION$EXTRAVERSION"
1976 done > etc/tazlito/config-packages.list
1977 cd ..
1978 echo "etc/tazlito/config-packages.list" >> files.list
1979 cat > receipt <<EOT
1980 # SliTaz package receipt.
1982 PACKAGE="config"
1983 VERSION="$CONFIG_VERSION"
1984 CATEGORY="base-system"
1985 SHORT_DESC="User configuration backup on $(date)"
1986 DEPENDS="$(ls $INSTALLED)"
1987 EOT
1988 cd ..
1989 tazpkg pack config-$CONFIG_VERSION
1990 cp config-$CONFIG_VERSION.tazpkg $TOP_DIR
1991 cd $TOP_DIR
1992 rm -rf $TMP_DIR
1993 ;;
1994 repack)
1995 # Create SliTaz package archive from an installed package.
1996 #
1997 check_for_package_on_cmdline
1998 check_for_receipt
1999 EXTRAVERSION=""
2000 . $INSTALLED/$PACKAGE/receipt
2001 echo ""
2002 echo -e "\033[1mRepacking :\033[0m $PACKAGE-$VERSION$EXTRAVERSION.tazpkg"
2003 echo "================================================================================"
2004 if grep -qs ^NO_REPACK= $INSTALLED/$PACKAGE/receipt; then
2005 echo "Can't repack $PACKAGE"
2006 exit 1
2007 fi
2008 if [ -s $INSTALLED/$PACKAGE/modifiers ]; then
2009 eval_gettext "Can't repack, \$PACKAGE files have been modified by:"; echo
2010 for i in $(cat $INSTALLED/$PACKAGE/modifiers); do
2011 echo " $i"
2012 done
2013 exit 1
2014 fi
2015 MISSING=""
2016 while read i; do
2017 [ -e "$i" ] && continue
2018 [ -L "$i" ] || MISSING="$MISSING\n $i"
2019 done < $INSTALLED/$PACKAGE/files.list
2020 if [ -n "$MISSING" ]; then
2021 gettext "Can't repack, the following files are lost:"
2022 echo -e "$MISSING"
2023 exit 1
2024 fi
2025 mkdir -p $TMP_DIR && cd $TMP_DIR
2026 FILES="fs.cpio.lzma\n"
2027 for i in $(ls $INSTALLED/$PACKAGE) ; do
2028 [ "$i" = "volatile.cpio.gz" ] && continue
2029 [ "$i" = "modifiers" ] && continue
2030 cp $INSTALLED/$PACKAGE/$i . && FILES="$FILES$i\n"
2031 done
2032 ln -s / rootfs
2033 mkdir tmp
2034 sed 's/^/rootfs/' < files.list | cpio -o -H newc 2>/dev/null |\
2035 ( cd tmp ; cpio -idm >/dev/null )
2036 mv tmp/rootfs fs
2037 if [ -f $INSTALLED/$PACKAGE/volatile.cpio.gz ]; then
2038 zcat $INSTALLED/$PACKAGE/volatile.cpio.gz | \
2039 ( cd fs; cpio -idm )
2040 fi
2041 if grep -q repack_cleanup $INSTALLED/$PACKAGE/receipt; then
2042 . $INSTALLED/$PACKAGE/receipt
2043 repack_cleanup fs
2044 fi
2045 if [ -f $INSTALLED/$PACKAGE/md5sum ]; then
2046 sed 's, , fs,' < $INSTALLED/$PACKAGE/md5sum | \
2047 md5sum -s -c || {
2048 echo "Can't repack, md5sum error."
2049 cd $TOP_DIR
2050 rm -rf $TMP_DIR
2051 exit 1
2052 }
2053 fi
2054 find fs | cpio -o -H newc 2> /dev/null | lzma e fs.cpio.lzma -si
2055 echo -e "$FILES" | cpio -o -H newc 2> /dev/null > \
2056 $TOP_DIR/$PACKAGE-$VERSION$EXTRAVERSION.tazpkg
2057 cd $TOP_DIR
2058 \rm -R $TMP_DIR
2059 eval_gettext "Package \$PACKAGE repacked successfully."; echo
2060 echo "Size : `du -sh $PACKAGE-$VERSION$EXTRAVERSION.tazpkg`"
2061 echo "" ;;
2062 pack)
2063 # Create SliTaz package archive using cpio and gzip.
2064 #
2065 check_for_package_on_cmdline
2066 cd $PACKAGE
2067 if [ ! -f "receipt" ]; then
2068 gettext "Receipt is missing. Please read the documentation."; echo
2069 exit 0
2070 else
2071 echo ""
2072 echo -e "\033[1mPacking :\033[0m $PACKAGE"
2073 echo "================================================================================"
2074 # Create files.list with redirecting find outpout.
2075 gettext "Creating the list of files..." && cd fs
2076 find . -type f -print > ../files.list
2077 find . -type l -print >> ../files.list
2078 cd .. && sed -i s/'^.'/''/ files.list
2079 status
2080 gettext "Creating md5sum of files..."
2081 while read file; do
2082 [ -L "fs$file" ] && continue
2083 [ -f "fs$file" ] || continue
2084 case "$file" in
2085 /lib/modules/*/modules.*|*.pyc) continue;;
2086 esac
2087 md5sum "fs$file" | sed 's/ fs/ /'
2088 done < files.list > md5sum
2089 status
2090 UNPACKED_SIZE=$(du -chs fs receipt files.list md5sum \
2091 description.txt 2> /dev/null | awk \
2092 '{ sz=$1 } END { print sz }')
2093 # Build cpio archives.
2094 gettext "Compressing the fs... "
2095 find fs | cpio -o -H newc | lzma e fs.cpio.lzma -si
2096 rm -rf fs
2097 status
2098 PACKED_SIZE=$(du -chs fs.cpio.lzma receipt files.list \
2099 md5sum description.txt 2> /dev/null | awk \
2100 '{ sz=$1 } END { print sz }')
2101 gettext "Updating receipt sizes..."
2102 sed -i s/^PACKED_SIZE.*$// receipt
2103 sed -i s/^UNPACKED_SIZE.*$// receipt
2104 sed -i "s/^PACKAGE=/PACKED_SIZE=\"$PACKED_SIZE\"\nUNPACKED_SIZE=\"$UNPACKED_SIZE\"\nPACKAGE=/" receipt
2105 status
2106 gettext "Creating full cpio archive... "
2107 find . -print | cpio -o -H newc > ../$PACKAGE.tazpkg
2108 status
2109 gettext "Restoring original package tree... "
2110 unlzma -c fs.cpio.lzma | cpio -idm
2111 status
2112 rm fs.cpio.lzma && cd ..
2113 echo "================================================================================"
2114 eval_gettext "Package \$PACKAGE compressed successfully."; echo
2115 echo "Size : `du -sh $PACKAGE.tazpkg`"
2116 echo ""
2117 fi ;;
2118 recharge)
2119 # Recharge packages.list from a mirror.
2120 #
2121 check_root
2122 for path in $LOCALSTATE $LOCALSTATE/undigest/*; do
2123 [ -f $path/mirror ] || continue
2124 echo ""
2125 if [ "$path" != "$LOCALSTATE" ]; then
2126 echo "Recharging undigest $(basename $path):"
2127 fi
2128 cd $path
2129 if [ -f "packages.list" ]; then
2130 gettext "Creating backup of the last packages list..."
2131 mv -f packages.desc packages.desc.bak 2>/dev/null
2132 mv -f packages.md5 packages.md5.txt 2>/dev/null
2133 mv -f packages.txt packages.txt.bak 2>/dev/null
2134 mv -f packages.list packages.list.bak 2>/dev/null
2135 mv -f packages.equiv packages.equiv.bak 2>/dev/null
2136 mv -f files.list.lzma files.list.lzma.bak 2> /dev/null
2137 mv -f mirrors mirrors.bak 2> /dev/null
2138 status
2139 fi
2140 download_from "$(cat mirror)" packages.desc
2141 download_from "$(cat mirror)" packages.md5
2142 download_from "$(cat mirror)" packages.txt
2143 download_from "$(cat mirror)" packages.list
2144 download_from "$(cat mirror)" packages.equiv
2145 download_from "$(cat mirror)" files.list.lzma
2146 download_from "$(sed 's|packages/.*||' < mirror)" mirrors
2147 [ -f mirrors ] || mv mirrors.bak mirrors 2> /dev/null
2148 suffix=$(head -1 mirror)
2149 suffix=packages${suffix#*/packages}
2150 for i in $(cat mirrors 2> /dev/null); do
2151 grep -qs $i mirror || echo $i$suffix >> mirror
2152 done
2153 if [ -f "packages.list.bak" ]; then
2154 diff -u packages.list.bak packages.list | grep ^+[a-z] > packages.diff
2155 sed -i s/+// packages.diff
2156 echo ""
2157 echo -e "\033[1m`gettext \"Mirrored packages diff\"`\033[0m"
2158 echo "================================================================================"
2159 cat packages.diff
2160 new_pkgs=`cat packages.diff | wc -l`
2161 if [ "$new_pkgs" != 0 ]; then
2162 echo "================================================================================"
2163 eval_gettext "\$new_pkgs new packages on the mirror."; echo
2164 echo ""
2165 else
2166 gettext "No new packages on the mirror."; echo
2167 echo ""
2168 fi
2169 else
2170 echo -e "
2171 ================================================================================"
2172 gettext \
2173 "Last packages.list is ready to use. Note that next time you recharge the
2174 list, a list of differences will be displayed to show new and upgradeable
2175 packages."
2176 echo ""
2177 fi
2178 done ;;
2179 upgradeable)
2180 # Build upgradeable-packages.list quickly.
2181 #
2182 check_root
2183 cd $LOCALSTATE
2184 while read md5 file ; do
2185 grep -qs "$md5 $file" packages.md5 && continue
2186 for i in 1 2 3 4 5; do
2187 file=${file%-*}
2188 [ -d installed/$file ] || continue
2189 echo $file
2190 break
2191 done
2192 done < installed.md5 > upgradeable-packages.list ;;
2193 upgrade)
2194 # Upgrade all installed packages with the new version from the mirror.
2195 #
2196 check_root
2197 check_for_packages_list
2198 cd $LOCALSTATE
2199 # Touch the blocked pkgs list to avoid errors and remove any old
2200 # upgrade list.
2201 touch blocked-packages.list
2202 rm -f upgradeable-packages.list
2203 echo ""
2204 echo -e "\033[1m`gettext \"Available upgrades\"`\033[0m"
2205 echo "================================================================================"
2206 echo ""
2207 # Some packages must be installed first
2208 FIRST_CLASS_PACKAGE=" glibc-base slitaz-base-files slitaz-boot-scripts "
2209 if [ -n "$PACKAGE_FILE" -a -d "$INSTALLED/$PACKAGE_FILE" ]; then
2210 ALL=$INSTALLED/$PACKAGE_FILE
2211 else
2212 ALL="$(ls -d $INSTALLED/*)"
2213 fi
2214 for pkg in $ALL
2215 do
2216 [ -f $pkg/receipt ] || continue
2217 EXTRAVERSION=""
2218 . $pkg/receipt
2219 # Display package name to show that Tazpkg is working...
2220 echo -en "\\033[0G "
2221 echo -en "\\033[0G$PACKAGE"
2222 # Skip specified pkgs listed in $LOCALSTATE/blocked-packages.list
2223 if grep -qs "^$PACKAGE" $BLOCKED; then
2224 blocked=$(($blocked+1))
2225 else
2226 # Check if the installed package is in the current list (other
2227 # mirror or local).
2228 NEW_PACKAGE=$(get_package_filename $PACKAGE)
2230 if [ -n "$NEW_PACKAGE" ]; then
2231 # Set new pkg and version for future comparison
2232 NEW_VERSION=`echo $NEW_PACKAGE | sed s/$PACKAGE-/''/`
2233 # Change '-' and 'pre' to points.
2234 NEW_VERSION=`echo $NEW_VERSION | sed s/'-'/'.'/`
2235 VERSION=`echo $VERSION | sed s/'-'/'.'/`$EXTRAVERSION
2236 NEW_VERSION=`echo $NEW_VERSION | sed s/'pre'/'.'/`
2237 VERSION=`echo $VERSION | sed s/'pre'/'.'/`
2238 NEW_VERSION=`echo $NEW_VERSION | sed 's/[A-Z]\.//'`
2239 VERSION=`echo $VERSION | sed 's/[A-Z]\.//'`
2240 # Compare version. Upgrades are only available for official
2241 # packages, so we control the mirror and it should be ok if
2242 # we just check for equality.
2243 RELEASE=""
2244 if [ -f installed.md5 -a -f packages.md5 ]; then
2245 current_md5=$(grep -s " $PACKAGE-$VERSION" installed.md5 | awk '{ print $1 }')
2246 new_md5=$(grep -hs " $PACKAGE-$VERSION" packages.md5 undigest/*/packages.md5 | head -1 | awk '{ print $1 }')
2247 [ -n "$current_md5" ] && [ -n "$new_md5" ] &&
2248 [ "$current_md5" != "$new_md5" ] && RELEASE=build
2249 fi
2250 if [ "$VERSION" != "$NEW_VERSION" -o -n "$RELEASE" ]; then
2251 # Version seems different. Check for major, minor or
2252 # revision
2253 PKG_MAJOR=`echo ${VERSION%_*} | cut -f1 -d"."`
2254 NEW_MAJOR=`echo ${NEW_VERSION%_*} | cut -f1 -d"."`
2255 PKG_MINOR=`echo ${VERSION%_*} | cut -f2 -d"."`
2256 NEW_MINOR=`echo ${NEW_VERSION%_*} | cut -f2 -d"."`
2257 # Minor
2258 if [ "$NEW_MINOR" -gt "$PKG_MINOR" ] 2> /dev/null; then
2259 RELEASE=minor
2260 fi
2261 if [ "$NEW_MINOR" -lt "$PKG_MINOR" ] 2> /dev/null; then
2262 RELEASE=$WARNING
2263 FIXE=yes
2264 fi
2265 # Major
2266 if [ "$NEW_MAJOR" -gt "$PKG_MAJOR" ] 2> /dev/null; then
2267 RELEASE=major
2268 FIXE=""
2269 fi
2270 if [ "$NEW_MAJOR" -lt "$PKG_MAJOR" ] 2> /dev/null; then
2271 RELEASE=WARNING
2272 FIXE=yes
2273 fi
2274 # Default to revision.
2275 if [ -z $RELEASE ]; then
2276 RELEASE=revision
2277 fi
2278 # Pkg name is already displayed by the check process.
2279 echo -en "\033[24G $VERSION"
2280 echo -en "\033[38G --->"
2281 echo -en "\033[43G $NEW_VERSION"
2282 echo -en "\033[58G $CATEGORY"
2283 echo -e "\033[72G $RELEASE"
2284 up=$(($up+1))
2285 echo "$PACKAGE" >> upgradeable-packages.list
2286 case "$FIRST_CLASS_PACKAGE" in
2287 *\ $PACKAGE\ *) echo "$PACKAGE" >> upgradeable-packages.list$$;;
2288 esac
2289 unset RELEASE
2290 fi
2291 packages=$(($packages+1))
2292 fi
2293 fi
2294 done
2295 if [ -z $blocked ]; then
2296 blocked=0
2297 fi
2298 # Clean last checked package and display summary.
2299 if [ ! "$up" = "" ]; then
2300 echo -e "\\033[0G "
2301 echo "================================================================================"
2302 eval_gettext "\$packages installed and listed packages to consider, \$up to upgrade, \$blocked blocked."; echo
2303 echo ""
2304 else
2305 echo -e "\\033[0G`gettext \"System is up-to-date.\"` "
2306 echo ""
2307 echo "================================================================================"
2308 eval_gettext "\$packages installed and listed packages to consider, 0 to upgrade, \$blocked blocked."; echo
2309 echo ""
2310 exit 0
2311 fi
2312 # What to do if major or minor version is smaller.
2313 if [ "$FIXE" == "yes" ]; then
2314 gettext \
2315 "WARNING ---> Installed package seems more recent than the mirrored
2316 one. You can block packages using the command : 'tazpkg block package'.
2317 Or upgrade packages at your own risk."
2318 echo ""
2319 fi
2320 # Ask for upgrade, it can be done another time.
2321 echo -n "Upgrade now (y/N) ? "; read anser
2322 if [ ! "$anser" = "y" ]; then
2323 echo ""
2324 gettext "Exiting. No package upgraded."; echo
2325 echo ""
2326 exit 0
2327 fi
2328 # If anser is yes (y). Install all new versions.
2329 cat upgradeable-packages.list >> upgradeable-packages.list$$
2330 mv -f upgradeable-packages.list$$ upgradeable-packages.list
2331 yes y | tazpkg get-install-list upgradeable-packages.list --forced
2332 rm -f upgradeable-packages.list
2333 ;;
2334 bugs)
2335 # Show known bugs in package(s)
2336 #
2337 cd $INSTALLED
2338 shift
2339 LIST=$@
2340 [ -n "$LIST" ] || LIST=`ls`
2341 MSG=`gettext "No known bugs."`
2342 for PACKAGE in $LIST; do
2343 BUGS=""
2344 EXTRAVERSION=""
2345 . $PACKAGE/receipt
2346 if [ -n "$BUGS" ]; then
2347 MSG=`gettext "Bug list completed"`
2348 echo ""
2349 eval_gettext "Bugs in package \$PACKAGE version \$VERSION\$EXTRAVERSION:"; echo
2350 cat <<EOT
2351 $BUGS
2352 EOT
2353 fi
2354 done
2355 echo "$MSG" ;;
2356 check)
2357 # Check installed packages set.
2358 #
2359 check_root
2360 cd $INSTALLED
2361 for PACKAGE in `ls`; do
2362 if [ ! -f $PACKAGE/receipt ]; then
2363 eval_gettext "The package \$PACKAGE installation has not completed"; echo
2364 continue
2365 fi
2366 DEPENDS=""
2367 EXTRAVERSION=""
2368 . $PACKAGE/receipt
2369 if [ -s $PACKAGE/modifiers ]; then
2370 eval_gettext \
2371 "The package \$PACKAGE \$VERSION\$EXTRAVERSION has been modified by:"; echo
2372 for i in $(cat $PACKAGE/modifiers); do
2373 echo " $i"
2374 done
2375 fi
2376 MSG="Files lost from $PACKAGE $VERSION$EXTRAVERSION :\n"
2377 while read file; do
2378 [ -e "$file" ] && continue
2379 if [ -L "$file" ]; then
2380 MSG="$MSG target of symlink"
2381 fi
2382 echo -e "$MSG $file"
2383 MSG=""
2384 done < $PACKAGE/files.list
2385 MSG="Missing dependencies for $PACKAGE $VERSION$EXTRAVERSION :\n"
2386 for i in $DEPENDS; do
2387 [ -d $i ] && continue
2388 [ -d $(equivalent_pkg $i) ] && continue
2389 echo -e "$MSG $i"
2390 MSG=""
2391 done
2392 MSG="Dependencies loop between $PACKAGE and :\n"
2393 ALL_DEPS=""
2394 check_for_deps_loop $PACKAGE $DEPENDS
2395 done
2396 echo -n "Looking for known bugs... "
2397 tazpkg bugs
2398 if [ "$PACKAGE_FILE" = "--full" ]; then
2399 for file in */md5sum; do
2400 CONFIG_FILES=""
2401 . $(dirname "$file")/receipt
2402 [ -s "$file" ] || continue
2403 while read md5 f; do
2404 [ -f $f ] || continue
2405 for i in $CONFIG_FILES; do
2406 case "$f" in
2407 $i|$i/*) continue 2;;
2408 esac
2409 done
2410 echo "$md5 $f"
2411 done < "$file" | md5sum -c - 2> /dev/null | \
2412 grep -v OK$ | sed 's/FAILED$/MD5SUM MISMATCH/'
2413 done
2414 FILES=" "
2415 for file in $(cat */files.list); do
2416 [ -d "$file" ] && continue
2417 case "$FILES" in *\ $file\ *) continue;; esac
2418 [ $(grep "^$file$" */files.list 2> /dev/null | \
2419 wc -l) -gt 1 ] || continue
2420 FILES="$FILES$file "
2421 echo "The following packages provide $file :"
2422 grep -l "^$file$" */files.list | while read f
2423 do
2424 pkg=${f%/files.list}
2425 echo -n " $pkg"
2426 if [ -f $pkg/modifiers ]; then
2427 echo -n " (overridden by $(echo "$(cat $pkg/modifiers)"))"
2428 fi
2429 echo ""
2430 done
2431 done
2432 MSG="No package has installed the following files:\n"
2433 find /etc /bin /sbin /lib /usr /var/www \
2434 -not -type d 2> /dev/null | while read file; do
2435 case "$file" in *\[*) continue;; esac
2436 grep -q "^$file$" */files.list && continue
2437 echo -e "$MSG $file"
2438 MSG=""
2439 done
2440 fi
2441 echo "Check completed." ;;
2442 block)
2443 # Add a pkg name to the list of blocked packages.
2444 #
2445 check_root
2446 check_for_package_on_cmdline
2447 echo ""
2448 if grep -qs "^$PACKAGE" $BLOCKED; then
2449 eval_gettext "\$PACKAGE is already in the blocked packages list."; echo
2450 echo ""
2451 exit 0
2452 else
2453 eval_gettext "Add \$PACKAGE to : \$BLOCKED..."
2454 echo $PACKAGE >> $BLOCKED
2455 status
2456 # Log this activity
2457 . $INSTALLED/$PACKAGE/receipt
2458 log Blocked
2459 fi
2460 echo "" ;;
2461 unblock)
2462 # Remove a pkg name from the list of blocked packages.
2463 #
2464 check_root
2465 check_for_package_on_cmdline
2466 echo ""
2467 if grep -qs "^$PACKAGE" $BLOCKED; then
2468 eval_gettext "Removing \$PACKAGE from : \$BLOCKED..."
2469 sed -i s/$PACKAGE/''/ $BLOCKED
2470 sed -i '/^$/d' $BLOCKED
2471 status
2472 # Log this activity
2473 . $INSTALLED/$PACKAGE/receipt
2474 log Unblocked
2475 else
2476 eval_gettext "\$PACKAGE is not in the blocked packages list."
2477 echo ""
2478 exit 0
2479 fi
2480 echo "" ;;
2481 get)
2482 # Downlowd a package with wget.
2483 #
2484 check_for_package_on_cmdline
2485 check_for_packages_list
2486 check_for_package_in_list
2487 echo ""
2488 download $PACKAGE.tazpkg
2489 echo "" ;;
2490 get-install)
2491 # Download and install a package.
2492 #
2493 check_root
2494 check_for_package_on_cmdline
2495 check_for_packages_list
2496 DO_CHECK=""
2497 while [ -n "$3" ]; do
2498 case "$3" in
2499 --forced)
2500 DO_CHECK="no"
2501 ;;
2502 --root=*)
2503 ROOT="${3#--root=}"
2504 ;;
2505 --list=*)
2506 INSTALL_LIST="${3#--list=}"
2507 ;;
2508 *) shift 2
2509 echo -e "\nUnknown option $*.\n"
2510 exit 1
2511 ;;
2512 esac
2513 shift
2514 done
2515 AUTOEXEC="no"
2516 if ! check_for_package_in_list check; then
2517 PACKAGE=get-$PACKAGE
2518 AUTOEXEC=$PACKAGE
2519 check_for_package_in_list
2520 if [ -n "$(get_installed_package_pathname $PACKAGE $ROOT)" ]; then
2521 $AUTOEXEC $ROOT
2522 exit 0
2523 fi
2524 fi
2525 # Check if forced install.
2526 if [ "$DO_CHECK" = "no" ]; then
2527 rm -f $CACHE_DIR/$PACKAGE.tazpkg
2528 else
2529 check_for_installed_package $ROOT
2530 fi
2531 cd $CACHE_DIR
2532 if [ -f "$PACKAGE.tazpkg" ]; then
2533 echo "$PACKAGE already in the cache : $CACHE_DIR"
2534 # Check package download was finished
2535 tail -c 2k $PACKAGE.tazpkg | grep -q 00000000TRAILER || {
2536 eval_gettext "Continuing \$PACKAGE download"; echo
2537 download $PACKAGE.tazpkg
2538 }
2539 if [ "$(md5sum $PACKAGE.tazpkg)" !=
2540 "$(grep $PACKAGE.tazpkg /var/lib/tazpkg/packages.md5)" ]; then
2541 rm -f $PACKAGE.tazpkg
2542 download $PACKAGE.tazpkg
2543 fi
2544 else
2545 echo ""
2546 download $PACKAGE.tazpkg
2547 fi
2548 PACKAGE_FILE=$CACHE_DIR/$PACKAGE.tazpkg
2549 install_package $ROOT
2550 [ "$AUTOEXEC" != "no" ] && $PACKAGE $ROOT
2551 update_desktop_database $ROOT
2552 update_mime_database $ROOT ;;
2553 clean-cache)
2554 # Remove all downloaded packages.
2555 #
2556 check_root
2557 files=`ls -1 $CACHE_DIR | wc -l`
2558 echo ""
2559 echo -e "\033[1m`gettext \"Clean cache:\"`\033[0m $CACHE_DIR"
2560 echo "================================================================================"
2561 gettext "Cleaning cache directory..."
2562 rm -rf $CACHE_DIR/*
2563 status
2564 echo "================================================================================"
2565 eval_gettext "\$files file(s) removed from cache."; echo
2566 echo "" ;;
2567 list-undigest)
2568 # list undigest URLs.
2569 #
2570 if [ "$2" = "--box" ]; then
2571 for i in $LOCALSTATE/undigest/*/mirror; do
2572 [ -f $i ] || continue
2573 echo "$(basename $(dirname $i))|$(cat $i)"
2574 done
2575 else
2576 echo ""
2577 echo -e "\033[1m`gettext \"Current undigest(s)\"`\033[0m"
2578 echo "================================================================================"
2579 for i in $LOCALSTATE/undigest/*/mirror; do
2580 if [ ! -f $i ]; then
2581 gettext "No undigest mirror found."; echo
2582 exit 1
2583 fi
2584 echo "$(basename $(dirname $i)) $(cat $i)"
2585 done
2586 echo ""
2587 fi ;;
2588 remove-undigest)
2589 # remove undigest URL.
2590 #
2591 check_root
2592 if [ -d $LOCALSTATE/undigest/$2 ]; then
2593 echo -n "Remove $2 undigest (y/N) ? "; read anser
2594 if [ "$anser" = "y" ]; then
2595 echo -n "Removing $2 undigest..."
2596 rm -rf $LOCALSTATE/undigest/$2
2597 status
2598 rmdir $LOCALSTATE/undigest 2> /dev/null
2599 fi
2600 else
2601 echo "Undigest $2 not found"
2602 fi ;;
2603 add-undigest|setup-undigest)
2604 # Add undigest URL.
2605 #
2606 check_root
2607 undigest=$2
2608 [ -d $LOCALSTATE/undigest ] || mkdir $LOCALSTATE/undigest
2609 if [ -z "$undigest" ]; then
2610 i=1
2611 while [ -d $LOCALSTATE/undigest/$i ]; do
2612 i=$(($i+1))
2613 done
2614 undigest=$i
2615 fi
2616 if [ ! -d $LOCALSTATE/undigest/$undigest ]; then
2617 eval_gettext "Creating new undigest \$undigest."; echo
2618 mkdir $LOCALSTATE/undigest/$undigest
2619 fi
2620 setup_mirror $LOCALSTATE/undigest/$undigest $3 ;;
2621 setup-mirror)
2622 # Change mirror URL.
2623 #
2624 check_root
2625 setup_mirror $LOCALSTATE $2 ;;
2626 reconfigure)
2627 # Replay post_install from receipt
2628 #
2629 check_for_package_on_cmdline
2630 check_root
2631 ROOT=""
2632 while [ -n "$3" ]; do
2633 case "$3" in
2634 --root=*)
2635 ROOT="${3#--root=}/" ;;
2636 *) shift 2
2637 echo -e "\nUnknown option $*.\n"
2638 exit 1 ;;
2639 esac
2640 shift
2641 done
2642 if [ -d "$ROOT$INSTALLED/$PACKAGE" ]; then
2643 check_for_receipt $ROOT
2644 # Check for post_install
2645 if grep -q ^post_install $ROOT$INSTALLED/$PACKAGE/receipt; then
2646 . $ROOT$INSTALLED/$PACKAGE/receipt
2647 post_install $ROOT
2648 # Log this activity
2649 [ -n "$ROOT" ] || log Reconfigured
2650 else
2651 echo ""
2652 eval_gettext "Nothing to do for \$PACKAGE."; echo
2653 fi
2654 else
2655 echo ""
2656 eval_gettext "Package \$PACKAGE is not installed."; echo
2657 gettext "Install package with 'tazpkg install' or 'tazpkg get-install'"; echo
2658 echo ""
2659 fi ;;
2660 shell)
2661 # Tazpkg SHell
2662 #
2663 if test $(id -u) = 0 ; then
2664 PROMPT="\\033[1;33mtazpkg\\033[0;39m# "
2665 else
2666 PROMPT="\\033[1;33mtazpkg\\033[0;39m> "
2667 fi
2668 if [ ! "$2" = "--noheader" ]; then
2669 clear
2670 echo ""
2671 echo -e "\033[1mTazpkg SHell.\033[0m"
2672 echo "================================================================================"
2673 gettext "Type 'usage' to list all available commands or 'quit' or 'q' to exit."; echo
2674 echo ""
2675 fi
2676 while true
2677 do
2678 echo -en "$PROMPT"; read cmd
2679 case $cmd in
2680 q|quit)
2681 break ;;
2682 shell)
2683 gettext "You are already running a Tazpkg SHell."; echo ;;
2684 su)
2685 su -c 'exec tazpkg shell --noheader' && break ;;
2686 "")
2687 continue ;;
2688 *)
2689 tazpkg $cmd ;;
2690 esac
2691 done ;;
2692 depends)
2693 # Display dependencies tree
2694 cd $INSTALLED
2695 ALL_DEPS=""
2696 if [ -f $2/receipt ]; then
2697 dep_scan $2 ""
2698 fi ;;
2699 rdepends)
2700 # Display reverse dependencies tree
2701 cd $INSTALLED
2702 ALL_DEPS=""
2703 if [ -f $2/receipt ]; then
2704 rdep_scan $2
2705 fi ;;
2706 convert)
2707 # convert misc package format to .tazpkg
2708 check_for_package_file
2709 case "$PACKAGE_FILE" in
2710 *.deb|*.udeb)
2711 convert_deb;;
2712 *.rpm)
2713 convert_rpm;;
2714 *.tgz)
2715 convert_tgz;;
2716 *.pkg.tar.gz)
2717 convert_arch;;
2718 *.ipk|*.opk)
2719 convert_ipk;;
2720 *)
2721 gettext "Unsupported format"; echo ;;
2722 esac ;;
2723 link)
2724 # link a package from another slitaz installation
2725 PACKAGE=$2
2726 if [ ! -d "$TARGET_DIR" -o \
2727 ! -d "$TARGET_DIR$INSTALLED/$PACKAGE" ]; then
2728 cat <<EOT
2729 usage: tazpkg link package_name slitaz_root
2730 example: 'tazpkg link openoffice /mnt' will use less than 100k in
2731 your ram running system.
2732 EOT
2733 exit 1
2734 fi
2735 if [ -e "$INSTALLED/$PACKAGE" ]; then
2736 eval_gettext "\$PACKAGE is already installed."; echo
2737 exit 1
2738 fi
2739 ln -s $TARGET_DIR$INSTALLED/$PACKAGE $INSTALLED
2740 DEPENDS="$(. $INSTALLED/$PACKAGE/receipt ; echo $DEPENDS)"
2741 MISSING=""
2742 for i in $DEPENDS; do
2743 [ -e $INSTALLED/$i ] && continue
2744 MISSING="$MISSING$i "
2745 eval_gettext "Missing : \$i"; echo
2746 done
2747 if [ -n "$MISSING" ]; then
2748 echo ""
2749 gettext "Link all missing dependencies (y/N) ? "; read answer
2750 echo ""
2751 if [ "$answer" = "y" ]; then
2752 for i in $MISSING; do
2753 tazpkg link $i $TARGET_DIR
2754 done
2755 else
2756 echo ""
2757 eval_gettext "Leaving dependencies for \$PACKAGE unsolved."; echo
2758 gettext "The package is installed but will probably not work."; echo
2759 echo ""
2760 fi
2761 fi
2762 . $INSTALLED/$PACKAGE/receipt
2763 if grep -q ^pre_install $INSTALLED/$PACKAGE/receipt; then
2764 pre_install
2765 fi
2766 while read path; do
2767 [ -e $path ] && continue
2768 while true; do
2769 dir=$(dirname $path)
2770 [ -e $dir ] && break
2771 path=$dir
2772 done
2773 ln -s $TARGET_DIR$path $dir
2774 done < $INSTALLED/$PACKAGE/files.list
2775 if grep -q ^post_install $INSTALLED/$PACKAGE/receipt; then
2776 post_install
2777 fi ;;
2778 usage|*)
2779 # Print a short help or give usage for an unknown or empty command.
2780 usage ;;
2781 esac
2783 exit 0