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