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