hasufell/ghcup
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Improve error handling

Browse Source
This commit is contained in:
Julian Ospald 2018-09-29 22:31:08 +08:00
parent 900312922f
commit ad5965d5f6
No known key found for this signature in database
GPG Key ID: 511B62C09D50CD28
1 changed files with 33 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

53
ghcup.sh
View File

@ -1,7 +1,5 @@
#!/bin/sh #!/bin/sh
set -e
## global variables ## ## global variables ##
@ -92,6 +90,14 @@ die() {
exit 2 exit 2
} }
edo()
{
if ${VERBOSE} ; then
echo "$@" 1>&2
fi
"$@" || exit 2
}
echov() { echov() {
if ${VERBOSE} ; then if ${VERBOSE} ; then
echo "$1" echo "$1"
@ -233,34 +239,41 @@ install_ghc() {
fi fi
printf_green "Installing GHC for $(get_distro_name) on architecture $(get_arch)" printf_green "Installing GHC for $(get_distro_name) on architecture $(get_arch)"
tmp_dir=$(mktemp -d)
[ -z "${tmp_dir}" ] && die "Failed to create temporary directory"
( (
cd "$(mktemp -d)" edo cd "${tmp_dir}"
echov "Downloading $(get_download_url "${myghcver}")" echov "Downloading $(get_download_url "${myghcver}")"
# shellcheck disable=SC2086 # shellcheck disable=SC2086
${downloader} ${downloader_opts} "$(get_download_url "${myghcver}")" edo ${downloader} ${downloader_opts} "$(get_download_url "${myghcver}")"
tar -xf ghc-*-linux.tar.xz edo tar -xf ghc-*-linux.tar.xz
cd "ghc-${myghcver}" edo cd "ghc-${myghcver}"
echov "Installing GHC into ${inst_location}" echov "Installing GHC into ${inst_location}"
./configure --prefix="${inst_location}" edo ./configure --prefix="${inst_location}"
make install edo make install
# clean up # clean up
cd .. edo cd ..
rm -r ghc-*-linux.tar.xz "ghc-${myghcver}" rm "${tmp_dir}"/ghc-*-linux.tar.xz
) rm -r "${tmp_dir}/ghc-${myghcver}"
) || {
rm "${tmp_dir}"/ghc-*-linux.tar.xz
rm -r "${tmp_dir}/ghc-${myghcver}"
die "Failed to install, cleaning up ${tmp_dir}"
}
for f in "${inst_location}"/bin/*-"${myghcver}" ; do for f in "${inst_location}"/bin/*-"${myghcver}" ; do
fn=$(basename "${f}") fn=$(basename "${f}")
# shellcheck disable=SC2046 # shellcheck disable=SC2046
ln $(echov "-v") -sf ../"${myghcver}/bin/${fn}" "${target_location}/${fn}" edo ln $(echov "-v") -sf ../"${myghcver}/bin/${fn}" "${target_location}/${fn}"
unset fn unset fn
done done
# shellcheck disable=SC2046 # shellcheck disable=SC2046
ln $(echov "-v") -sf ../"${myghcver}"/bin/runhaskell "${target_location}/runhaskell-${myghcver}" edo ln $(echov "-v") -sf ../"${myghcver}"/bin/runhaskell "${target_location}/runhaskell-${myghcver}"
printf_green "Done installing, run \"ghci-${myghcver}\" or set up your current GHC via: ${SCRIPT} set-ghc ${myghcver}" printf_green "Done installing, run \"ghci-${myghcver}\" or set up your current GHC via: ${SCRIPT} set-ghc ${myghcver}"
@ -276,7 +289,7 @@ set_ghc() {
inst_location=${INSTALL_BASE}/${myghcver} inst_location=${INSTALL_BASE}/${myghcver}
[ -e "${inst_location}" ] || die "GHC ${myghcver} not installed yet, use: ${SCRIPT} install ${myghcver}" [ -e "${inst_location}" ] || die "GHC ${myghcver} not installed yet, use: ${SCRIPT} install ${myghcver}"
[ -e "${target_location}" ] || mkdir "${target_location}" [ -e "${target_location}" ] || edo mkdir "${target_location}"
printf_green "Setting GHC to ${myghcver}" printf_green "Setting GHC to ${myghcver}"
@ -284,11 +297,11 @@ set_ghc() {
source_fn=$(basename "${f}") source_fn=$(basename "${f}")
target_fn=$(echo "${source_fn}" | sed "s#-${myghcver}##") target_fn=$(echo "${source_fn}" | sed "s#-${myghcver}##")
# shellcheck disable=SC2046 # shellcheck disable=SC2046
ln $(echov "-v") -sf ../"${myghcver}/bin/${source_fn}" "${target_location}/${target_fn}" edo ln $(echov "-v") -sf ../"${myghcver}/bin/${source_fn}" "${target_location}/${target_fn}"
unset source_fn target_fn unset source_fn target_fn
done done
# shellcheck disable=SC2046 # shellcheck disable=SC2046
ln $(echov "-v") -sf runghc "${target_location}"/runhaskell edo ln $(echov "-v") -sf runghc "${target_location}"/runhaskell
printf_green "Done, make sure \"${target_location}\" is in your PATH!" printf_green "Done, make sure \"${target_location}\" is in your PATH!"
@ -309,13 +322,13 @@ self_update() {
printf_green "Updating ${SCRIPT}" printf_green "Updating ${SCRIPT}"
( (
cd "$(mktemp -d)" edo cd "$(mktemp -d)"
echov "Downloading ${source_url}" echov "Downloading ${source_url}"
# shellcheck disable=SC2086 # shellcheck disable=SC2086
${downloader} ${downloader_opts} "${source_url}" edo ${downloader} ${downloader_opts} "${source_url}"
mv ghcup.sh "${target_location}"/ghcup.sh edo mv ghcup.sh "${target_location}"/ghcup.sh
chmod +x "${target_location}"/ghcup.sh edo chmod +x "${target_location}"/ghcup.sh
) )
printf_green "Done, make sure \"${target_location}\" is in your PATH!" printf_green "Done, make sure \"${target_location}\" is in your PATH!"