--- trunk/mage/usr/lib/mage/mage4.sh	2008/06/16 09:29:57	739
+++ trunk/mage/usr/lib/mage/mage4.sh	2013/10/25 06:48:57	2268
@@ -1,11 +1,12 @@
-#!/bin/sh
+#!/bin/bash
 # Magellan Linux Installer (mage.sh)
-# $Header: /home/cvsd/magellan-cvs/magellan-src/mage/usr/lib/mage/mage4.sh,v 1.17 2008-06-16 09:29:57 niro Exp $
+# $Id$
 
 # default die function
 die()
 {
-	echo -e ${COLRED}"Exited ${BASH_SOURCE} at line no ${BASH_LINENO}."${COLDEFAULT}
+	xtitleclean
+	mqueryfeature "debug" && echo -e ${COLRED}"Exited ${BASH_SOURCE} at line no ${BASH_LINENO}."${COLDEFAULT}
 	echo -e ${COLRED}"$@"${COLDEFAULT}
 	exit 1
 }
@@ -22,30 +23,6 @@
 	source ${MLIBDIR}/mage4.functions.sh || \
 	die "mage functions missing"
 
-## only for tests -> normally in /etc/rc.d/init.d/functions
-COLRED="\033[1;6m\033[31m"
-COLGREEN="\033[1;6m\033[32m"
-COLYELLOW="\033[1;6m\033[33m"
-COLBLUE="\033[1;6m\033[34m"
-COLMAGENTA="\033[1;6m\033[35m"
-COLWHITE="\033[1;6m\033[37m"
-COLGRAY="\033[0;6m\033[37m"
-COLBOLD="\033[1m"
-COLDEFAULT="\033[0m"
-
-if [[ ${NOCOLORS} = true ]]
-then
-	COLRED=""
-	COLGREEN=""
-	COLYELLOW=""
-	COLBLUE=""
-	COLMAGENTA=""
-	COLWHITE=""
-	COLGRAY=""
-	COLBOLD=""
-	COLDEFAULT=""
-fi
-
 # export default path
 export PATH="${PATH}:${MLIBDIR}"
 
@@ -55,7 +32,7 @@
 # sanity checks
 [ ! -e ${VIRTUALDB_FILE} ] && touch ${VIRTUALDB_FILE}
 
-if [ ! -e ${VIRTUALDB_DEFAULTS} ] && [[ $1 != update ]]
+if [ ! -e ${VIRTUALDB_DEFAULTS} ] && [[ $1 != update ]] && [[ $1 != update-tarball ]]
 then
 	echo
 	echo "Please choose an profile from the mage tree."
@@ -89,10 +66,13 @@
 	echo "    upgrade         - runs a complete system upgrade"
 	echo "    srcuppretend    - pretend dependencies for a system upgrade from source"
 	echo "    srcupgrade      - runs a complete system upgrade from source"
+	echo "    pretend-build-prerequisites"
+	echo "    install-build-prerequisites"
 	echo "    search          - searches mage-tree for a package"
 	echo "    clean           - removes *all* downloaded packages"
 	echo "    unpack          - unpacks *all* needed package for 'foo'"
 	echo "    download        - downloads *all* needed packages for 'foo'"
+	echo "    print-features  - prints all enabled mage-features"
 	echo "    version         - prints version info"
 	echo "    regen-mage-tree - regenerates the whole mage database (for devs only)"
 	echo
@@ -118,19 +98,20 @@
 # install method
 METHOD="$1"
 
-# initial unversionized packagename, gets overridden later
+# initial unversionized packagename, gets overridden later on
 MAGENAME="$2"
 
-if [[ ${METHOD} != upgrade ]] && \
-	[[ ${METHOD} != srcupgrade ]] && \
-	[[ ${METHOD} != uppretend ]] && \
-	[[ ${METHOD} != srcuppretend ]] && \
-	[[ ${METHOD} != update ]] && \
-	[[ ${METHOD} != update-tarball ]] && \
-	[[ ${METHOD} != clean ]] && \
-	[[ ${METHOD} != version ]] && \
-	[[ ${METHOD} != search ]] && \
-	[[ ${METHOD} != regen-mage-tree ]]
+if [[ ${METHOD} != upgrade ]] &&
+	[[ ${METHOD} != srcupgrade ]] &&
+	[[ ${METHOD} != uppretend ]] &&
+	[[ ${METHOD} != srcuppretend ]] &&
+	[[ ${METHOD} != update ]] &&
+	[[ ${METHOD} != update-tarball ]] &&
+	[[ ${METHOD} != clean ]] &&
+	[[ ${METHOD} != version ]] &&
+	[[ ${METHOD} != search ]] &&
+	[[ ${METHOD} != regen-mage-tree ]] &&
+	[[ ${METHOD} != print-features ]]
 then
 	[[ -z ${METHOD} ]] || [[ -z ${MAGENAME} ]] && print_usage && exit 1
 fi
@@ -145,8 +126,21 @@
 # before anything run mage_setup
 mage_setup || die "error in mage_setup()"
 
+# load supported mage features
+load_mage_features
+
+# query debug mode
+if mqueryfeature "debug"
+then
+	depwalker_debug="--debug"
+else
+	depwalker_debug=""
+fi
+
 case ${METHOD} in
 	download)
+		have_root_privileges || die "You must be root to run this operation."
+
 		# first of all get the right pkg which going to be installed
 		PCAT="$(pname2pcat ${MAGENAME})"
 
@@ -171,12 +165,15 @@
 			--pcat ${PCAT} \
 			--pname ${PNAME} \
 			--pver ${PVER} \
-			--pbuild ${PBUILD})"
+			--pbuild ${PBUILD} \
+			${depwalker_debug})"
 		fetch_packages ${ALLDEPS} || die "fetching packages"
 		md5sum_packages ${ALLDEPS} || die "md5 sum packages"
 		;;
 
 	srcdownload)
+		have_root_privileges || die "You must be root to run this operation."
+
 		# first of all get the right pkg which going to be installed
 		PCAT="$(pname2pcat ${MAGENAME})"
 
@@ -201,11 +198,12 @@
 			--pcat ${PCAT} \
 			--pname ${PNAME} \
 			--pver ${PVER} \
-			--pbuild ${PBUILD})"
+			--pbuild ${PBUILD} \
+			${depwalker_debug})"
 		fetch_packages ${ALLDEPS} || die "fetching packages"
 		;;
 
-	pretend|srcpretend)
+	pretend|srcpretend|pretend-build-prerequisites)
 		# first of all get the right pkg which going to be installed
 		PCAT="$(pname2pcat ${MAGENAME})"
 
@@ -238,10 +236,13 @@
 			--pcat ${PCAT} \
 			--pname ${PNAME} \
 			--pver ${PVER} \
-			--pbuild ${PBUILD}
+			--pbuild ${PBUILD} \
+			${depwalker_debug}
 		;;
 
-	install)
+	install|install-build-prerequisites)
+		have_root_privileges || die "You must be root to run this operation."
+ 
 		# first of all get the right pkg which going to be installed
 		PCAT="$(pname2pcat ${MAGENAME})"
 
@@ -274,16 +275,18 @@
 			--pcat ${PCAT} \
 			--pname ${PNAME} \
 			--pver ${PVER} \
-			--pbuild ${PBUILD})"
+			--pbuild ${PBUILD} \
+			${depwalker_debug})"
 
 		# first fetch all packages
 		fetch_packages ${ALLDEPS} || die "fetching packages"
 		md5sum_packages ${ALLDEPS} || die "md5 sum packages"
-		unpack_packages ${ALLDEPS} || die "unpacking packages"
 		install_packages ${ALLDEPS} || die "installing packages"
 		;;
 
 	srcinstall)
+		have_root_privileges || die "You must be root to run this operation."
+
 		# first of all get the right pkg which going to be installed
 		PCAT="$(pname2pcat ${MAGENAME})"
 
@@ -316,18 +319,21 @@
 			--pcat ${PCAT} \
 			--pname ${PNAME} \
 			--pver ${PVER} \
-			--pbuild ${PBUILD})"
+			--pbuild ${PBUILD} \
+			${depwalker_debug})"
 
 		install_packages --src-install ${ALLDEPS} || die "src-installing packages"
 		;;
 
 	uninstall)
-			ALLDEPS="$(get_uninstall_candidates --pname ${MAGENAME})"
-			if [ -z "${ALLDEPS}" ]
-			then
-				die "No package installed named '${MAGENAME}'."
-			fi
-			uninstall_packages ${ALLDEPS}
+		have_root_privileges || die "You must be root to run this operation."
+
+		ALLDEPS="$(get_uninstall_candidates --pname ${MAGENAME})"
+		if [ -z "${ALLDEPS}" ]
+		then
+			die "No package installed named '${MAGENAME}'."
+		fi
+		uninstall_packages ${ALLDEPS}
 		;;
 
 	uppretend|srcuppretend)
@@ -336,10 +342,13 @@
 			--pcat ${METHOD} \
 			--pname ${METHOD} \
 			--pver ${METHOD} \
-			--pbuild ${METHOD}
+			--pbuild ${METHOD} \
+			${depwalker_debug}
 		;;
 
 	upgrade)
+		have_root_privileges || die "You must be root to run this operation."
+
 		# get all dependencies of *all* installed packages
 		# fake pcat,pname,pver,pbuild ...
 		ALLDEPS="$(${MLIBDIR}/depwalker.sh \
@@ -347,16 +356,18 @@
 			--pcat ${METHOD} \
 			--pname ${METHOD} \
 			--pver ${METHOD} \
-			--pbuild ${METHOD})"
+			--pbuild ${METHOD} \
+			${depwalker_debug})"
 
 		# first fetch all packages
 		fetch_packages ${ALLDEPS} || die "fetching packages"
 		md5sum_packages ${ALLDEPS} || die "md5 sum packages"
-		unpack_packages ${ALLDEPS} || die "unpacking packages"
 		install_packages ${ALLDEPS} || die "installing packages"
 		;;
 
 	srcupgrade)
+		have_root_privileges || die "You must be root to run this operation."
+
 		# get all dependencies of *all* installed packages
 		# fake pcat,pname,pver,pbuild ...
 		ALLDEPS="$(${MLIBDIR}/depwalker.sh \
@@ -364,7 +375,8 @@
 			--pcat ${METHOD} \
 			--pname ${METHOD} \
 			--pver ${METHOD} \
-			--pbuild ${METHOD})"
+			--pbuild ${METHOD} \
+			${depwalker_debug})"
 
 		install_packages --src-install ${ALLDEPS} || die "src-installing packages"
 		;;
@@ -374,6 +386,8 @@
 		;;
 
 	unpack)
+		have_root_privileges || die "You must be root to run this operation."
+
 		# first of all get the right pkg which going to be installed
 		PCAT="$(pname2pcat ${MAGENAME})"
 
@@ -398,21 +412,26 @@
 			--pcat ${PCAT} \
 			--pname ${PNAME} \
 			--pver ${PVER} \
-			--pbuild ${PBUILD})"
+			--pbuild ${PBUILD} \
+			${depwalker_debug})"
+
 		fetch_packages ${ALLDEPS} || die "fetching packages"
 		md5sum_packages ${ALLDEPS} || die "md5 sum packages"
 		unpack_packages ${ALLDEPS} || die "unpacking packages"
 		;;
 
 	update)
+		have_root_privileges || die "You must be root to run this operation."
 		syncmage
 		;;
 
 	update-tarball)
+		have_root_privileges || die "You must be root to run this operation."
 		syncmage_tarball
 		;;
 
 	clean)
+		have_root_privileges || die "You must be root to run this operation."
 		cleanpkg
 		;;
 
@@ -422,6 +441,8 @@
 		;;
 
 	regen-mage-tree)
+		have_root_privileges || die "You must be root to run this operation."
+
 		if [ -z "${SMAGESCRIPTSDIR}" ] || [ ! -d "${SMAGESCRIPTSDIR}" ]
 		then
 			echo "SMAGESCRIPTSDIR not found. Check your mage.rc or check out smage repos."
@@ -433,6 +454,10 @@
 		done
 		;;
 
+	print-features)
+		mprintfeatures
+		;;
+
 	*)
 		print_usage
 		;;