tazpkg: tazpkg annotate

tazpkg annotate tazpkg @ rev 278

Fix tazpkg convert tgz (again)

author	Pascal Bellard <pascal.bellard@slitaz.org>
date	Sat Jul 18 10:47:39 2009 +0200 (2009-07-18)
parents	4ad99a25a6cc
children	7182c6b184c5

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

SliTaz Repositories

tazpkg annotate tazpkg @ rev 278