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