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