tazpkg: tazpkg annotate

tazpkg annotate tazpkg @ rev 515

tazpkg convert: may specify LOCALSTATE dir

author	Pascal Bellard <pascal.bellard@slitaz.org>
date	Mon Jun 20 17:42:29 2011 +0200 (2011-06-20)
parents	3e2fe6e201d2
children	35fbd099024d

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

SliTaz Repositories

tazpkg annotate tazpkg @ rev 515