# ccenv.sh: sofort's tool-finding bits,

# invoked from within the project-agnostic configure script.

# invocation and names of binary tools:

# agnostic names (ar, nm, objdump, ...);

# target-prefixed agnostic names (x86_64-nt64-midipix-ar, ...);

# branded names (llvm-ar, llvm-nm, llvm-objdump, ...);

# target-prefixed branded names (x86_64-linux-gnu-gcc-ar, ...);

# target-specifying branded tools (llvm-ar --target=x86_64-linux, ...).

# cross-compilation: default search order:

# target-prefixed agnostic tools;

# target-prefixed branded tools, starting with the prefix

# most commonly associated with the selected compiler (that is,

# ``gcc'' when using gcc, and ``llvm'' when using clang);

# target-speficying branded tools, starting once again with the

# prefix most commonly associated with the selected compiler.

# internal variables of interest:

# ccenv_cfgtype: the type of host being tested (host/native)

# ccenv_cfgfile: the configuration file for the host being tested

# ccenv_cflags:  the comprehensive cflags for the host being tested

# ccenv_cchost:  the host being tested, as reported by -dumpmachine

ccenv_usage()

{

	cat "$mb_project_dir"/sofort/ccenv/ccenv.usage

	exit 0

}

ccenv_newline()

{

	printf '\n' >> "$ccenv_cfgfile"

}

ccenv_comment()

{

	ccenv_internal_str='#'

	for ccenv_internal_arg ; do

		ccenv_internal_str="$ccenv_internal_str $ccenv_internal_arg"

	done

	printf '%s\n' "$ccenv_internal_str" >> "$ccenv_cfgfile"

}

ccenv_tool_prolog()

{

	ccenv_line_dots='......................................'

	ccenv_tool_desc="=== checking for ${1}"

	ccenv_tool_dlen="${#ccenv_line_dots}"

	printf "%${ccenv_tool_dlen}.${ccenv_tool_dlen}s" \

		"${ccenv_tool_desc} ${mb_line_dots}"

}

ccenv_tool_epilog()

{

	ccenv_line_dots='................................'

	ccenv_tool_dlen="$((${#ccenv_line_dots} - ${#1}))"

	printf "%${ccenv_tool_dlen}.${ccenv_tool_dlen}s %s.\n" \

		"${ccenv_line_dots}" "${1}"

}

ccenv_tool_variant_epilog()

{

	ccenv_expr=${1}='${'${1}':-false}'

	eval "$ccenv_expr"

	ccenv_expr='${'${1}'}'

	eval ccenv_tool_epilog "$ccenv_expr"

}

ccenv_attr_prolog()

{

	ccenv_line_dots='......................................'

	ccenv_attr_desc="=== detect ${ccenv_cfgtype} ${1}"

	ccenv_attr_dlen="${#ccenv_line_dots}"

	printf "%${ccenv_attr_dlen}.${ccenv_attr_dlen}s" \

		"${ccenv_attr_desc} ${ccenv_line_dots}"

}

ccenv_attr_epilog()

{

	ccenv_tool_epilog "${1}"

}

ccenv_find_tool()

{

	if [ -z "$ccenv_prefixes" ]; then

		for ccenv_candidate in $(printf '%s' "$ccenv_candidates"); do

			if [ -z ${@:-} ]; then

				if command -v "$ccenv_candidate" > /dev/null; then

					ccenv_tool="$ccenv_candidate"

					return 0

				fi

			else

				if command -v "$ccenv_candidate" > /dev/null; then

					if "$ccenv_candidate" $@ > /dev/null 2>&1; then

						ccenv_tool="$ccenv_candidate"

						return 0

					fi

				fi

			fi

		done

		ccenv_tool=false

		return 0

	fi

	for ccenv_prefix in $(printf '%s' "$ccenv_prefixes"); do

		for ccenv_candidate in $(printf '%s' "$ccenv_candidates"); do

			ccenv_tool="$ccenv_prefix$ccenv_candidate"

			if command -v "$ccenv_tool" > /dev/null; then

				return 0

			fi

		done

	done

	for ccenv_candidate in $(printf '%s' "$ccenv_candidates"); do

		if command -v "$ccenv_candidate" > /dev/null; then

			ccenv_tool="$ccenv_candidate"

			return 0

		fi

	done

	ccenv_tool=false

	return 0

}

ccenv_set_primary_tools()

{

	ccenv_core_tools="ar nm objdump ranlib size strip strings objcopy"

	ccenv_hack_tools="addr2line cov elfedit readelf readobj otool"

	ccenv_peep_tools="perk mdso dlltool windmc windres"

	for __tool in $(printf '%s' "$ccenv_core_tools $ccenv_hack_tools $ccenv_peep_tools"); do

		ccenv_tool_prolog "$__tool"

		if [ -n "$mb_agnostic" ]; then

			ccenv_candidates=" $__tool"

		elif [ -n "$mb_zealous" ]; then

			ccenv_candidates="$mb_zealous-$__tool"

		elif [ "$mb_toolchain" = 'gcc' ]; then

			ccenv_candidates="gcc-$__tool"

			ccenv_candidates="$ccenv_candidates $__tool"

			ccenv_candidates="$ccenv_candidates llvm-$__tool"

		elif [ "$mb_toolchain" = 'llvm' ]; then

			ccenv_candidates="llvm-$__tool"

			ccenv_candidates="$ccenv_candidates $__tool"

			ccenv_candidates="$ccenv_candidates gcc-$__tool"

		elif [ -n "$mb_toolchain" ]; then

			ccenv_candidates="$mb_toolchain-$__tool"

			ccenv_candidates="$ccenv_candidates $__tool"

			ccenv_candidates="$ccenv_candidates gcc-$__tool"

			ccenv_candidates="$ccenv_candidates llvm-$__tool"

		else

			ccenv_candidates="$__tool"

			ccenv_candidates="$ccenv_candidates gcc-$__tool"

			ccenv_candidates="$ccenv_candidates llvm-$__tool"

		fi

		if [ "$ccenv_cfgtype" = 'host' ]; then

			ccenv_var_prefix='mb_'

		else

			ccenv_var_prefix='mb_native_'

		fi

		ccenv_var_name=$ccenv_var_prefix$__tool

		ccenv_var_expr='${'$ccenv_var_name':-}'

		eval ccenv_var_val=$ccenv_var_expr

		if [ -n "$ccenv_var_val" ]; then

			eval ccenv_$__tool="$ccenv_var_val"

		else

			ccenv_find_tool

			eval ccenv_$__tool="$ccenv_tool"

		fi

		ccenv_tool_epilog "$ccenv_tool"

	done

	# windrc

	ccenv_windrc="$ccenv_windres"

}

ccenv_set_tool_variants()

{

	# as (asm)

	ccenv_tool_prolog 'as (asm)'

	ccenv_candidates=as

	ccenv_find_tool

	if [ "$ccenv_tool" = false ]; then

		ccenv_as_asm=

	else

		$ccenv_tool --help | grep -i '.bc assembler' \

		|| ccenv_as_asm="$ccenv_tool"

	fi

	ccenv_tool_variant_epilog 'ccenv_as_asm'

	# as (ll)

	ccenv_tool_prolog 'as (ll)'

	ccenv_candidates=llvm-as

	ccenv_find_tool

	if [ "$ccenv_tool" != false ]; then

		ccenv_as_ll="$ccenv_tool"

	fi

	ccenv_tool_variant_epilog 'ccenv_as_ll'

	# as (mc)

	ccenv_tool_prolog 'as (mc)'

	ccenv_candidates=llvm-mc

	ccenv_find_tool

	if [ "$ccenv_tool" != false ]; then

		ccenv_as_mc="$ccenv_tool"

	fi

	ccenv_tool_variant_epilog 'ccenv_as_mc'

	# ld (bfd)

	ccenv_tool_prolog 'ld (bfd)'

	ccenv_candidates=ld.bfd

	ccenv_find_tool

	if [ "$ccenv_tool" != false ]; then

		ccenv_ld_bfd="$ccenv_tool"

	fi

	ccenv_tool_variant_epilog 'ccenv_ld_bfd'

	# ld (gold)

	ccenv_tool_prolog 'ld (gold)'

	ccenv_candidates=ld.gold

	ccenv_find_tool

	if [ "$ccenv_tool" != false ]; then

		ccenv_ld_gold="$ccenv_tool"

	fi

	ccenv_tool_variant_epilog 'ccenv_ld_gold'

	# ld (lld)

	ccenv_tool_prolog 'ld (lld)'

	ccenv_candidates=lld

	ccenv_find_tool

	if [ "$ccenv_tool" != false ]; then

		ccenv_ld_lld="$ccenv_tool"

	fi

	ccenv_tool_variant_epilog 'ccenv_ld_lld'

	# objdump (bfd)

	ccenv_tool_prolog 'objdump (bfd)'

	ccenv_candidates=objdump

	ccenv_find_tool

	if $ccenv_tool --version | grep -i Binutils > /dev/null; then

		ccenv_objdump_bfd="$ccenv_tool"

	fi

	ccenv_tool_variant_epilog 'ccenv_objdump_bfd'

	# objdump (llvm)

	ccenv_tool_prolog 'objdump (llvm)'

	ccenv_candidates=llvm-objdump

	ccenv_find_tool

	if $ccenv_tool --version | grep -i LLVM > /dev/null; then

		ccenv_objdump_llvm="$ccenv_tool"

	fi

	ccenv_tool_variant_epilog 'ccenv_objdump_llvm'

	# readelf (bfd)

	ccenv_tool_prolog 'readelf (bfd)'

	ccenv_candidates=readelf

	ccenv_find_tool

	if $ccenv_tool --version | grep -i Binutils > /dev/null; then

		ccenv_readelf_bfd="$ccenv_tool"

	fi

	ccenv_tool_variant_epilog 'ccenv_readelf_bfd'

	# readelf (llvm)

	ccenv_tool_prolog 'readelf (llvm)'

	ccenv_candidates=llvm-readelf

	ccenv_find_tool

	if $ccenv_tool --version | grep -i LLVM > /dev/null; then

		ccenv_readelf_llvm="$ccenv_tool"

	fi

	ccenv_tool_variant_epilog 'ccenv_readelf_llvm'

	# as

	if [ -n "$ccenv_cc" ]; then

		ccenv_as='$('"$ccenv_makevar_prefix"'CC) -c -x assembler'

	elif [ -n "$mb_agnostic" ]; then

		ccenv_as='$('"$ccenv_makevar_prefix"'AS_ASM)'

	elif [ "$mb_zealous" = 'gcc' ]; then

		ccenv_as='$('"$ccenv_makevar_prefix"'AS_ASM)'

	elif [ -n "$mb_zealous" = 'llvm' ]; then

		ccenv_as='$('"$ccenv_makevar_prefix"'AS_MC)'

	elif [ "$mb_toolchain" = 'gcc' ]; then

		ccenv_as='$('"$ccenv_makevar_prefix"'AS_ASM)'

	elif [ "$mb_toolchain" = 'llvm' ]; then

		ccenv_as='$('"$ccenv_makevar_prefix"'AS_MC)'

	fi

	# ld

	if [ -n "$ccenv_cc" ]; then

		ccenv_ld='$('"$ccenv_makevar_prefix"'CC) -nostdlib -nostartfiles'

	fi

}

ccenv_set_c_compiler_candidates()

{

	if   [ -n "$mb_compiler" ]; then

		ccenv_candidates="$mb_compiler"

	elif [ -n "$mb_agnostic" ]; then

		ccenv_candidates="c99 c11 cc"

	elif [ "$mb_zealous" = 'gcc' ]; then

		ccenv_candidates="gcc"

	elif [ "$mb_zealous" = 'llvm' ]; then

		ccenv_candidates="clang"

	elif [ "$mb_toolchain" = 'gcc' ]; then

		ccenv_candidates="gcc c99 c11 cc clang"

	elif [ "$mb_toolchain" = 'llvm' ]; then

		ccenv_candidates="clang c99 c11 cc gcc"

	elif [ -n "$mb_toolchain" ]; then

		ccenv_candidates="$mb_toolchain c99 c11 cc gcc clang"

	else

		ccenv_candidates="c99 c11 cc gcc clang"

	fi

}

ccenv_set_cc()

{

	ccenv_tool_prolog 'C compiler'

	if [ -z "$ccenv_cc" ]; then

		ccenv_set_c_compiler_candidates

		ccenv_find_tool -dumpmachine

		ccenv_cc="$ccenv_tool"

	fi

	if [ "$ccenv_cc" = false ] && [ -n "$mb_compiler" ]; then

		ccenv_cc="$mb_compiler"

	fi

	ccenv_cc_cmd="$ccenv_cc"

	if [ "$ccenv_cfgtype" = 'native' ]; then

		ccenv_host=$($ccenv_cc $(printf '%s' "$ccenv_cflags") -dumpmachine 2>/dev/null)

		ccenv_cchost=$ccenv_host

		ccenv_tool_epilog "$ccenv_cc"

		return 0

	fi

	if [ -n "$mb_cchost" ]; then

		ccenv_host="$mb_cchost"

	elif [ -n "$mb_host" ]; then

		ccenv_host="$mb_host"

	else

		ccenv_host=

	fi

	if [ -z "$ccenv_host" ]; then

		ccenv_host=$($ccenv_cc $(printf '%s' "$ccenv_cflags") -dumpmachine 2>/dev/null)

		ccenv_cchost=$ccenv_host

	else

		ccenv_tmp=$(mktemp ./tmp_XXXXXXXXXXXXXXXX)

		ccenv_cmd="$ccenv_cc --target=$ccenv_host -E -xc -"

		if [ -z "$mb_user_cc" ]; then

			$ccenv_cmd < /dev/null > /dev/null \

				2>"$ccenv_tmp" || true

			ccenv_errors=$(cat "$ccenv_tmp")

			if [ -z "$ccenv_errors" ]; then

				ccenv_tflags="--target=$ccenv_host"

				ccenv_cc="$ccenv_cc $ccenv_tflags"

			fi

		fi

		rm -f "$ccenv_tmp"

		unset ccenv_tmp

		ccenv_cchost=$($ccenv_cc $(printf '%s' "$ccenv_cflags") -dumpmachine 2>/dev/null)

	fi

	if [ "$ccenv_cchost" != "$ccenv_host" ]; then

		printf 'ccenv:\n' >&2

		printf 'ccenv: ccenv_host:   %s \n' $ccenv_host >&2

		printf 'ccenv: ccenv_cchost: %s \n' $ccenv_cchost >&2

		if [ -z "$ccenv_tflags" ]; then

			printf 'ccenv:\n' >&2

			printf 'ccenv: ccenv_host and ccenv_cchost do not match, most likely because:\n' >&2

			printf 'ccenv: (1) you explicitly set CC (or passed --compiler=...)\n' >&2

			printf 'ccenv: (2) the selected compiler does not accept --target=...\n' >&2

			printf 'ccenv: (3) the host reported by -dumpmachine differs from the one you requested.\n' >&2

		fi

		if [ -n "$ccenv_errors" ]; then

			printf 'ccenv:\n' >&2

			printf 'ccenv: something went wrong, see the command and compiler message below.\n\n' >&2

			printf 'cmd: %s < /dev/null > /dev/null\n' "$ccenv_cmd" >&2

			printf '%s\n\n' "$ccenv_errors" >&2

		else

			printf 'ccenv:\n' >&2

			printf 'ccenv: something went wrong, bailing out.\n\n' >&2

		fi

		return 2

	fi

	ccenv_tool_epilog "$ccenv_cc"

}

ccenv_set_cpp()

{

	ccenv_tool_prolog 'C pre-processor'

	case "$ccenv_cc_cmd" in

		cc | c99 | c11 | gcc)

			ccenv_cpp_prefix=

			ccenv_candidates="cpp" ;;

		clang )

			ccenv_cpp_prefix=

			ccenv_candidates="clang-cpp" ;;

		*-cc )

			ccenv_cpp_prefix=${ccenv_cc_cmd%-cc*}-

			ccenv_candidates="${ccenv_cpp_prefix}cpp" ;;

		*-c99 )

			ccenv_cpp_prefix=${ccenv_cc_cmd%-c99*}-

			ccenv_candidates="${ccenv_cpp_prefix}cpp" ;;

		*-c11 )

			ccenv_cpp_prefix=${ccenv_cc_cmd%-c11*}-

			ccenv_candidates="${ccenv_cpp_prefix}cpp" ;;

		*-gcc )

			ccenv_cpp_prefix=${ccenv_cc_cmd%-gcc*}-

			ccenv_candidates="${ccenv_cpp_prefix}cpp" ;;

		*-clang )

			ccenv_cpp_prefix=${ccenv_cc_cmd%-clang*}-

			ccenv_candidates="${ccenv_cpp_prefix}clang-cpp" ;;

		* )

			ccenv_cpp="$ccenv_cc -E"

			ccenv_tool_epilog "$ccenv_cpp"

			return 0

	esac

	ccenv_find_tool

	if [ "$ccenv_tool" = false ]; then

		ccenv_cpp="$ccenv_cc -E"

	elif [ -n "$ccenv_tflags" ]; then

		ccenv_cpp="$ccenv_tool $ccenv_tflags"

	else

		ccenv_cpp="$ccenv_tool"

	fi

	ccenv_tool_epilog "$ccenv_cpp"

}

ccenv_set_cxx()

{

	ccenv_tool_prolog 'C++ compiler'

	case "$ccenv_cc_cmd" in

		cc | c99 | c11 )

			ccenv_cxx_prefix=

			ccenv_candidates="cxx c++" ;;

		gcc )

			ccenv_cxx_prefix=

			ccenv_candidates="g++" ;;

		clang )

			ccenv_cxx_prefix=

			ccenv_candidates="clang++" ;;

		*-gcc )

			ccenv_cpp_prefix=${ccenv_cc_cmd%-gcc*}-

			ccenv_candidates="${ccenv_cpp_prefix}g++" ;;

		*-clang )

			ccenv_cpp_prefix=${ccenv_cc_cmd%-clang*}-

			ccenv_candidates="${ccenv_cpp_prefix}clang++" ;;

		*cc )

			ccenv_cxx_prefix=${ccenv_cc_cmd%cc*}

			ccenv_candidates="${ccenv_cpp_prefix}++" ;;

		* )

			ccenv_cxx="$ccenv_cc -xc++"

			ccenv_tool_epilog "$ccenv_cxx"

			return 0

	esac

	ccenv_find_tool

	if [ "$ccenv_tool" = false ]; then

		ccenv_cxx="$ccenv_cc -xc++"

	elif [ -n "$ccenv_tflags" ]; then

		ccenv_cxx="$ccenv_tool $ccenv_tflags"

	else

		ccenv_cxx="$ccenv_tool"

	fi

	ccenv_tool_epilog "$ccenv_cxx"

}

ccenv_set_cc_host()

{

	ccenv_attr_prolog 'system'

	ccenv_cc_host="$ccenv_cchost"

	ccenv_attr_epilog "$ccenv_cc_host"

}

ccenv_set_cc_bits()

{

	ccenv_attr_prolog 'bits'

	ccenv_internal_size=

	ccenv_internal_type='void *'

	ccenv_internal_test='char x[(sizeof(%s) == %s/8) ? 1 : -1];'

	for ccenv_internal_guess in 64 32 128; do

		if [ -z $ccenv_internal_size ]; then

			ccenv_internal_str=$(printf "$ccenv_internal_test"  \

				"$ccenv_internal_type"                      \

				"$ccenv_internal_guess")

			printf '%s' "$ccenv_internal_str"                   \

					| $ccenv_cc -S -xc - -o -           \

					  $(printf '%s' "$ccenv_cflags")    \

				> /dev/null 2>/dev/null                     \

			&& ccenv_internal_size=$ccenv_internal_guess

		fi

	done

	ccenv_cc_bits=$ccenv_internal_size

	ccenv_attr_epilog "$ccenv_cc_bits"

}

ccenv_set_cc_underscore()

{

	ccenv_attr_prolog 'prepended underscores'

	ccenv_fn_name='ZmYaXyWbVe_UuTnSdReQrPsOcNoNrLe'

	ccenv_fn_code='int %s(void){return 0;}'

	if printf "$ccenv_fn_code" $ccenv_fn_name  \

			| $ccenv_cc -xc - -S -o -  \

			| grep "^_$ccenv_fn_name:" \

				> /dev/null; then

		ccenv_cc_underscore='_'

		ccenv_attr_epilog 'yes'

	fi

	ccenv_attr_epilog 'no'

	return 0

}

ccenv_create_framework_executable()

{

	if [ -f $ccenv_image ]; then

		mv $ccenv_image $ccenv_image.tmp

		rm -f $ccenv_image.tmp

	fi

	printf 'int main(void){return 0;}'  \

		| $ccenv_cc -xc -           \

			-o $ccenv_image     \

	|| return 1

	return 0

}

ccenv_create_freestanding_executable()

{

	if [ -f $ccenv_image ]; then

		mv $ccenv_image $ccenv_image.tmp

		rm -f $ccenv_image.tmp

	fi

	if [ -z "ccenv_cc_underscore" ]; then

		ccenv_start_fn='_start'

	else

		ccenv_start_fn='start'

	fi

	printf 'int %s(void){return 0;}' "$ccenv_start_fn"  \

		| $ccenv_cc -xc -                           \

			-ffreestanding                      \

			-nostdlib -nostartfiles             \

			-o $ccenv_image                     \

	|| return 1

	ccenv_freestd=yes

	return 0

}

ccenv_set_cc_binfmt_error()

{

	ccenv_attr_epilog '(unable to create executable)'

}

ccenv_set_cc_binfmt()

{

	ccenv_use_perk=

	ccenv_use_otool=

	ccenv_use_readelf=

	ccenv_use_readobj=

	ccenv_use_bfd_objdump=

	ccenv_use_llvm_objdump=

	ccenv_attr_prolog 'binary format'

	ccenv_create_framework_executable               \

		|| ccenv_create_freestanding_executable \

		|| ccenv_set_cc_binfmt_error            \

		|| return 0

	# PE / perk

	if [ -n "$ccenv_perk" ]; then

		if $ccenv_perk $ccenv_image 2>/dev/null; then

			ccenv_cc_binfmt='PE'

			ccenv_use_perk=yes

		fi

	fi

	# ELF / readelf

	if [ -n "$ccenv_readelf" ] && [ -z "$ccenv_cc_binfmt" ]; then

		if $ccenv_readelf -h $ccenv_image 2>/dev/null        \

				| grep 'Magic:' | sed -e 's/[ ]*//g' \

				| grep 'Magic:7f454c46'              \

					> /dev/null; then

			ccenv_cc_binfmt='ELF'

			ccenv_use_readelf=yes

		fi

	fi

	# a marble of astonishing design:

	# llvm-readelf also parses PE and Mach-O

	if [ -n "$ccenv_readelf_llvm" ]; then

		ccenv_readany="$ccenv_readelf_llvm"

	else

		ccenv_readany="$ccenv_readelf"

	fi

	# PE / readelf

	if [ -n "$ccenv_readany" ] && [ -z "$ccenv_cc_binfmt" ]; then

		if $ccenv_readany -h $ccenv_image 2>/dev/null        \

				| grep 'Magic:' | sed -e 's/[ ]*//g' \

				| grep 'Magic:MZ'                    \

					> /dev/null; then

			ccenv_cc_binfmt='PE'

			ccenv_use_readelf=yes

		fi

	fi

	# MACHO-64 / otool

	if [ -n "$ccenv_otool" ] && [ -z "$ccenv_cc_binfmt" ]; then

		if $ccenv_otool -hv $ccenv_image 2>/dev/null \

				| grep -i 'MH_MAGIC_64'      \

					> /dev/null; then

			ccenv_cc_binfmt='MACHO'

			ccenv_use_otool=yes

		fi

	fi