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