Unistall - Install damn near anything on anything: libs/setup

file
revisions
annotate
diff
raw

libs/setup_installskel.sh@fc888ff3ced7 (annotated)

libs/setup_installskel.sh

Thu, 24 Jan 2008 15:05:45 +0800

author: Tim Post <tinkertim@gmail.com>
date: Thu, 24 Jan 2008 15:05:45 +0800
branch: tinkertim
changeset 17: fc888ff3ced7
parent 14: 1115a3d0d415
permissions: -rw-r--r--

Fixed output in die()

die() was using too many newlines after re-formatting
functions to fit inside 80 columns. The output was
confusing, now fixed.

Signed-off-by: Tim Post (tinkertim@gmail.com)

 # Functions used by install.sh, also shared by setup.
 # Ensure that we exit properly, paying attention to --force
 # Syntax: safe_exit EXIT_SUCCESS or EXIT_FAILURE, --force will over-ride
 # safe_exit $EXIT_SUCCESS or $EXIT_FAILURE, exits regardless of --force
 safe_exit()
 {
 	local mode="$1"
 	# If called with EXIT_FAILURE and $FORCE is true, we don't exit.
 	# If called with $EXIT_FAILURE, we exit no matter the value of $FORCE
 	# Simple work-around so that we can die if we really need to, even if
 	# --force was passed. Note, EXIT_FAILURE and $EXIT_FAILURE are different
 	# TODO: Make me sain with a simple EXIT_FORCE macro, duh!
 	[ -z "$EXIT_FAILURE" ] || [ "$EXIT_FAILURE" = "" ] && EXIT_FAILURE="1"
 	[ "$FORCE" = "yes" ] && [ "$mode" != "$EXIT_FAILURE" ] && return 0
 	[ -z "$mode" ] && safe_exit EXIT_SUCCESS
 	case $mode in
 |EXIT_SUCCESS)
 			# if EXIT_SUCCESS undefined, just exit and rely on the shell
 			# to invoke the proper EXIT_ macro
 			[ -z "$EXIT_SUCCESS" ] || [ "$EXIT_SUCCESS" = "" ] && {
 				exit
 			}
 			exit $EXIT_SUCCESS
 			;;
 		*)
 			# Exit with whatever EXIT_FAILURE is defined as, or with
 			# whatever argument was passed to safe_exit()
 			[ $mode = "EXIT_FAILURE" ] && exit $EXIT_FAILURE
 			exit $mode
 			;;
 	esac
 }
 # 99 ways to die.
 # Syntax: die [reason] [why]
 # Reason can be one of the pre-defined causes, specifying "why", or just
 # die "reason"
 # Syntax: die prog "gcc" -> Complains that the program gcc can not be found
 die()
 {
 	local mode=$1
 	local why=$2
 	case $mode in
 		prog)
 			printf "\nThe program %s could not be found in your path\n" \
 				"$why"
 			printf "Please install '%s' (or ensure its in your path) " \
 				"$why"
 			printf "and try again.\n"
 			printf "If you are running this as an ordinary user, make sure "
 			printf "that /sbin and /usr/sbin\nare in your path.\n"
 			logg "FATAL: Could not find the program $why"
 			safe_exit EXIT_FAILURE
 		;;
 		lib)
 			printf "\nThe library %s could not be located.\n" "$why"
 			printf "Please install the library '%s' and try again.\n" "$why"
 			logg "FATAL: Could not find the library $why"
 			safe_exit EXIT_FAILURE
 		;;
 		evar)
 			printf "\nThe environmental variable %s is not set.\n" "$why"
 			printf "Please set %s properly and try again.\n" "$why"
 			logg "FATAL: env setting $why is null or undefined."
 			safe_exit EXIT_FAILURE
 		;;
 		err)
 			printf "\n%s\n" "$why"
 			logg "FATAL: $why"
 			safe_exit EXIT_FAILURE
 		;;
 		arch)
 			printf "\nYour architecture, %s, is not supported by %s.\n" \
 				"$try" "$PROGNAME"
 			printf "You can contact %s to see if this will change soon.\n" \
 				"$BUGMAIL"
 			logg "FATAL: Arch $why is not supported."
 			safe_exit EXIT_FAILURE
 		;;
 		kernel)
 			printf "\nYour kernel, version %s, is not supported by %s.\n" \
 				"$why" "$PROGNAME"
 			printf "You can contact %s to see if this will change soon.\n" \
 				"$BUGMAIL"
 			logg "FATAL: Kernel $why is not supported."
 			safe_exit EXIT_FAILURE
 		;;
 		internal)
 			printf "\nThe POSIX invocation of your shell lacks the %s "
 			printf "built-in.\n" "$why"
 			printf "Please link /bin/sh to something supporting %s\n" "$why"
 			logg "FATAL: Internal shell error, $why doesn't seem to work."
 			safe_exit EXIT_FAILURE
 		;;
 		package)
 			printf "\nI could not install the package %s with %s.\n" \
 				"$why" "$DIST_PACKAGER"
 			printf "Perhaps missing sources in your packager config?\n"
 			logg "FATAL: Could not install the mandatory package '$why'"
 			safe_exit EXIT_FAILURE
 		;;
 		*)
 			printf "\n%s\n" "$*"
 			logg "FATAL: $*"
 			safe_exit EXIT_FAILURE
 		;;
 	esac
 }
 # returns non-zero if uid !=0
 # Syntax: check_root || die "You must be root to run this program"
 check_root()
 {
 	[ $(id -u) = 0 ] || return 1
 	return 0
 }
 # Loggs $* (all arguments) to the defined logfile, if defined.
 # Syntax: logg Do re me fa so la ti do
 logg()
 {
 	local str="$*"
 	[ -z $INSTALL_LOG ] || [ "$INSTALL_LOG" = "" ] && return 0
 	local stamp=$(date +%s)
 	printf "%d %s\n" "$stamp" "$str" >> $INSTALL_LOG
 }
 # Writes a newline to the logfile
 logg_nl()
 {
 	[ -z $INSTALL_LOG ] || [ "$INSTALL_LOG" = "" ] && return 0
 	printf "\n" >> $INSTALL_LOG
 }
 # Much like check_prog, however sets PROGNAME=/path/to/progname
 # as a global (r/w) variable. (does not write to paths.in)
 # Syntax: check_prog_export "progname" , or more typical
 # check_prog_export "progname" || handle_failure_somehow
 check_prog_export()
 {
 	local target="$1"
 	local dir=""
 	local prog=""
 	printf "Checking for the program %s ... " "$target"
 	for dir in $(echo $PATH | $TR -d '\n' | $TR ':' ' '); do
 		[ -x ${dir}/${target} ] && {
 			printf "${dir}/${target} [ok]\n"
 			prog="${dir}/${target}"
 			target="$(echo $target | $TR 'a-z' 'A-Z' | \
 				$TR '\-' '_' | $TR '\.' '_')"
 			export $target="$prog"
 			return 0
 		}
 	done
 	printf "[no]\n"
 	return 1
 }
 # "Smart" init updater, calls the appropriate tool
 # Syntax: update_init initscript on/off
 update_init()
 {
 	local prog="$1"
 	local mode="$2"
 	local retval=0
 	case $mode in
 		on|start)
 			printf "Setting %s to start on boot ... " "$prog"
 			case $DIST_INITCTL in
 				chkconfig)
 					$CHKCONFIG $prog on >/dev/null 2>&1
 					retval=$?
 				;;
 				update-rc.d)
 					$UPDATE_RC_D $prog defaults >/dev/null 2>&1
 					retval=$?
 				;;
 				*)
 					retval=1
 				;;
 			esac
 		;;
 		off|stop)
 			printf "Setting %s to NOT start on boot ... " "$prog"
 			case $DIST_INITCTL in
 				chkconfig)
 					$CHKCONFIG $prog off >/dev/null 2>&1
 					retval=$?
 				;;
 				update-rc.d)
 					$UPDATE_RC_D -f $prog remove >/dev/null 2>&1
 					retval=$?
 				;;
 				*)
 					retval=1
 				;;
 			esac
 		;;
 		*)
 			retval=1
 		;;
 	esac
 	[ $retval = 0 ] && {
 		printf "[ok]\n"
 		logg "Modified init, $prog set to $mode"
 		return 0
 	}
 	printf "[failed]\n"
 	logg "Could not modify init settings for $prog - attempted $mode"
 	return $retval
 }
 # Generates a PEM encoded self signed certificate
 # Syntax: generate_pem /path/to/cert.pem
 # returns non-zero on failure.
 generate_pem()
 {
 	# Country Name (2 letter code) [AU]:
 	local A="."
 	# State or Province Name (full name) [Some-State]:
 	local B="."
 	# Locality Name (eg, city) []:
 	local C="."
 	# Organization Name (eg, company) [Internet Widgits Pty Ltd]:
 	local D="$(hostname)"
 	# Organizational Unit Name (eg, section) []:
 	local E="User Services"
 	# Common Name (eg, YOUR name) []:
 	local F="GNUPanel"
 	# Email Address []:
 	local G="ssl@$(hostname)"
 	local target=$1
 	[ -z "$OPENSSL" ] && {
 		check_prog_export "openssl" || {
 			printf "\nOpenSSL could not be found, can't generate %s\n" \
 				"$target"
 			return 1
 		}
 	}
 	printf "Generating PEM encoded self signed certificate $target ... "
 	printf "%s\n%s\n%s\n%s\n%s\n%s\n%s\n" "$A" "$B" "$C" "$D" "$E" \
 		"$F" "$G" 2>&1 | \
 		$OPENSSL req -days 1000 -new -x509 \
 			-nodes -out "$target" -keyout $target >/dev/null 2>&1
 	[ $? != 0 ] && {
 		printf "[failed]\n"
 		return 1
 	}
 	$CHMOD 0600 $target
 	openssl verify "$target" >/dev/null 2>&1 || {
 		printf "\n %s failed verification and has been deleted.\n" \
 			"$target"
 		$RM -f $target
 		return 1
 	}
 	printf "[success]\n"
 	return 0
 }

Unistall - Install damn near anything on anything / annotate

libs/setup_installskel.sh@fc888ff3ced7 (annotated)

libs/setup_installskel.sh