#

# set +o errexit -o noglob -o nounset is assumed.

#

rtl_install() {

	local	_verbose="" _prefix="" _chmod_mode="" _dname="" _file_fname_dst=""	\

		_file_fname_src="" _fname="" _ln_fname="" _ln_target="" _owner_spec=""	\

		_pname="";

	[ "${1}" = "-v" ] && { _verbose=1; shift; }; _prefix="${1}"; shift;

	while [ ${#} -gt 0 ]; do

	case "${1}" in

	-*)

		_pname="${1#-}";

		if [ "${_pname#/}" = "${_pname}" ]; then

			_pname="${_prefix:+${_prefix}/}${_pname}";

		fi;

		if ! rtl_fileop rm "${_pname}"; then

			return 1;

		fi; ;;

	!*=*)

		_file_fname_src="${1#!}"; _file_fname_src="${_file_fname_src%=*}";

	       	_file_fname_dst="${1#!}"; _file_fname_dst="${_file_fname_dst#*=}";

		if [ "${_file_fname_src#/}" = "${_file_fname_src}" ]; then

			_file_fname_src="${_prefix:+${_prefix}/}${_file_fname_src}";

		fi;

		if [ "${_file_fname_dst#/}" = "${_file_fname_dst}" ]; then

			_file_fname_dst="${_prefix:+${_prefix}/}${_file_fname_dst}";

		fi;

		if ! rtl_fileop mv "${_file_fname_src}" "${_file_fname_dst}"; then

			return 1;

		fi; ;;

	/=*)

		_dname="${1#/=}";

		if [ "${_dname#/}" = "${_dname}" ]; then

			_dname="${_prefix:+${_prefix}/}${_dname}";

		fi;

		if ! rtl_fileop mkdir "${_dname}"; then

			return 1;

		fi; ;;

	@*=*)

		_ln_target="${1%=*}"; _ln_target="${_ln_target#@}"; _ln_fname="${1#*=}";

		if [ "${_ln_fname#/}" = "${_ln_fname}" ]; then

			_ln_fname="${_prefix:+${_prefix}/}${_ln_fname}";

		fi;

		if [ -e "${_ln_fname}" ]; then

			rtl_fileop rm "${_ln_fname}";

		fi;

		if ! rtl_fileop ln_symbolic "${_ln_target}" "${_ln_fname}"; then

			return 1;

		fi; ;;

	m[0-7][0-7][0-7][0-7]=*)

		_fname="${1#m[0-7][0-7][0-7][0-7]=}"; _chmod_mode="${1%%=*}"; _chmod_mode="${_chmod_mode#m}";

		if ! rtl_fileop chmod "${_chmod_mode}" "${_fname}"; then

			return 1;

		fi; ;;

	o*=*)

		_fname="${1#o*=}"; _owner_spec="${1%%=*}"; _owner_spec="${_owner_spec#o}";

		if ! rtl_fileop chown "${_owner_spec}" "${_fname}"; then

			return 1;

		fi; ;;

	*=*)

		_file_fname_src="${1%=*}"; _file_fname_dst="${1#*=}";

		if [ "${_file_fname_src#/}" = "${_file_fname_src}" ]; then

			_file_fname_src="${_prefix:+${_prefix}/}${_file_fname_src}";

		fi;

		if [ "${_file_fname_dst#/}" = "${_file_fname_dst}" ]; then

			_file_fname_dst="${_prefix:+${_prefix}/}${_file_fname_dst}";

		fi;

		if ! rtl_fileop cp "${_file_fname_src}" "${_file_fname_dst}"; then

			return 1;

		fi; ;;

	esac; shift;

	done;

};

# vim:filetype=sh