Revert "tools/shld.sh, tools/shpp.sh: Add"

This reverts commit 032e6186fe8dd3c54b9e027cb63fff3127e2d559.

Build system improvements will come some other time.

2 files changed, 0 insertions, 339 deletions

diff --git a/tools/shld.sh b/tools/shld.sh
deleted file mode 100755
index 41751d3..0000000
--- a/tools/shld.sh
+++ /dev/null
@@ -1,166 +0,0 @@
-#!/bin/sh
-#
-# Shell command language linker
-#
-# Copyright (C) 2015  Patrick "P. J." McDermott
-#
-# This program is free software: you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation, either version 3 of the License, or
-# (at your option) any later version.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program.  If not, see <http://www.gnu.org/licenses/>.
-
-set -u
-
-VERSION='0.2.0'
-
-die()
-{
-	local fmt="${1}"
-	shift 1
-
-	printf "shld: ${fmt}\n" "${@}" >&2
-	exit 2
-}
-
-link()
-{
-	local make_executable="${1}"
-	local interpreter="${2}"
-	local entry_point="${3}"
-	local output="${4}"
-	shift 4
-	local input=
-
-	# Open output file.
-	if ! exec 3>"${output}~"; then
-		die 'Cannot open file "%s"' "${output}~"
-	fi
-
-	# Write magic number and interpreter path.
-	if ${make_executable}; then
-		printf '#!%s\n' "${interpreter}" >&3
-	fi
-
-	# Write __init() function.
-	cat >&3 <<-'EOF'
-		__init_funcs=''
-		__init()
-		{
-			__init_funcs="${__init_funcs} ${1}"
-		}
-		EOF
-
-	# Read input files.
-	for input in "${@}"; do
-		if ! cat "${input}" >&3; then
-			die 'Cannot read file "%s"' "${input}"
-		fi
-	done
-
-	# Add call to init functions.
-	cat >&3 <<-'EOF'
-		for __func in ${__init_funcs}; do
-			${__func}
-		done
-		EOF
-
-	# Add call to entry point.
-	if ${make_executable}; then
-		printf '%s "${@}"\n' "${entry_point}" >&3
-	fi
-
-	# Close output file, make it executable, and set its name.
-	exec 3>&-
-	if ${make_executable}; then
-		if ! chmod a+x "${output}~"; then
-			die 'Cannot set mode of file "%s"' "${output}~"
-		fi
-	fi
-	if ! mv "${output}~" "${output}"; then
-		die 'Cannot rename file to "%s"' "${output}"
-	fi
-}
-
-usage()
-{
-	printf 'Usage: %s [option ...] <file>...\n' "${0}"
-}
-
-help()
-{
-	usage
-	cat <<EOF
-Options:
-  -h           Display this information
-  -V           Display linker version information
-  -I <interp>  Make an executable and use <interp> as the interpreter for your
-               program, instead of the default of "/bin/sh"
-  -e <entry>   Make an executable and use <entry> as the function for beginning
-               execution of your program, instead of the default of "main"
-  -o <output>  Use <output> as the name of the program produced by shld, instead
-               of the default of "out.sh"
-EOF
-}
-
-version()
-{
-	cat <<EOF
-shld ${VERSION}
-Copyright (C) 2015  Patrick "P. J." McDermott
-License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>.
-This is free software: you are free to change and redistribute it.
-There is NO WARRANTY, to the extent permitted by law.
-EOF
-}
-
-main()
-{
-	local opt=
-	local make_executable=false
-	local interpreter='/bin/sh'
-	local entry_point='main'
-	local output='out.sh'
-
-	while getopts 'hVI:e:o:' opt; do
-		case "${opt}" in
-			'h')
-				help
-				exit
-				;;
-			'V')
-				version
-				exit
-				;;
-			'I')
-				interpreter="${OPTARG}"
-				make_executable=true
-				;;
-			'e')
-				entry_point="${OPTARG}"
-				make_executable=true
-				;;
-			'o')
-				output="${OPTARG}"
-				;;
-		esac
-	done
-	shift $(($OPTIND - 1))
-
-	if [ ${#} -lt 1 ]; then
-		usage >&2
-		exit 1
-	fi
-
-	link "${make_executable}" "${interpreter}" "${entry_point}" \
-		"${output}" "${@}"
-}
-
-main "${@}"
diff --git a/tools/shpp.sh b/tools/shpp.sh
deleted file mode 100755
index fc23a52..0000000
--- a/tools/shpp.sh
+++ /dev/null
@@ -1,173 +0,0 @@
-#!/bin/sh
-#
-# Shell command language preprocessor
-#
-# Copyright (C) 2015  Patrick "P. J." McDermott
-#
-# This program is free software: you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation, either version 3 of the License, or
-# (at your option) any later version.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program.  If not, see <http://www.gnu.org/licenses/>.
-
-set -u
-
-VERSION='0.1.0'
-FS="$(printf '\034')"
-
-die()
-{
-	local fmt="${1}"
-	shift 1
-
-	printf "shpp: ${fmt}\n" "${@}" >&2
-	exit 2
-}
-
-error()
-{
-	local fmt="${1}"
-	shift 1
-
-	printf "shpp: ${fmt}\n" "${@}" >&2
-}
-
-preprocess()
-{
-	local vars="${1}"
-	local input="${2}"
-	local output="${3}"
-	local def=
-	local var=
-	local val=
-
-	# Open output file.
-	if [ "x${output}" = 'x-' ]; then
-		if ! exec 3>&1; then
-			die 'Cannot duplicate output file descriptor'
-		fi
-	else
-		if ! exec 3>"${outfile}~"; then
-			die 'Cannot open file "%s"' "${output}~"
-		fi
-	fi
-
-	IFS="${FS}"
-	for def in ${vars}; do
-		case "${def}" in
-			*=*)
-				var="${def%%=*}"
-				val="${def#*=}"
-				;;
-			*)
-				var="${def%%=*}"
-				val='true'
-				;;
-		esac
-		case "${var}" in
-			*[!A-Za-z0-9_]*)
-				error 'Invalid variable name "%s"' "${var}"
-				continue
-				;;
-			[0-9]*)
-				error 'Invalid variable name "%s"' "${var}"
-				continue
-				;;
-		esac
-		printf "%s='" "${var}" >&3
-		printf '%s' "${val}" | sed "s/'/'\\\\''/g" >&3
-		printf "'\n" >&3
-	done
-	unset IFS
-
-	# Read input file.
-	if ! cat "${input}" >&3; then
-		die 'Cannot read file "%s"' "${input}"
-	fi
-
-	# Close output file, make it executable, and set its name.
-	if ! [ "x${output}" = 'x-' ]; then
-		exec 3>&-
-		if ! mv "${output}~" "${output}"; then
-			die 'Cannot rename file to "%s"' "${output}"
-		fi
-	fi
-}
-
-usage()
-{
-	printf 'Usage: %s [option ...] <infile> [<outfile>]\n' "${0}"
-}
-
-help()
-{
-	usage
-	cat <<EOF
-Options:
-  -h                Display this information
-  -V                Display preprocessor version information
-  -D <var>[=<val>]  Predefine <var> as a variable with value <val> (default
-                    "true")
-EOF
-}
-
-version()
-{
-	cat <<EOF
-shpp ${VERSION}
-Copyright (C) 2015  Patrick "P. J." McDermott
-License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>.
-This is free software: you are free to change and redistribute it.
-There is NO WARRANTY, to the extent permitted by law.
-EOF
-}
-
-main()
-{
-	local opt=
-	local vars=
-	local infile=
-	local outfile=
-
-	while getopts 'hVD:' opt; do
-		case "${opt}" in
-			'h')
-				help
-				exit
-				;;
-			'V')
-				version
-				exit
-				;;
-			'D')
-				vars="${vars}${OPTARG}${FS}"
-				;;
-		esac
-	done
-	shift $(($OPTIND - 1))
-
-	case ${#} in
-		1)
-			infile="${1}"
-			outfile='-'
-			;;
-		2)
-			infile="${1}"
-			outfile="${2}"
-			;;
-		*)
-			usage >&2
-			exit 1
-	esac
-
-	preprocess "${vars}" "${infile}" "${outfile}"
-}
-
-main "${@}"