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

Make ghc download baseurl a global var

Browse Source
This commit is contained in:
Julian Ospald 2018-09-30 13:34:54 +08:00
parent 857ccefff4
commit cb601e6df5
No known key found for this signature in database
GPG Key ID: 511B62C09D50CD28
1 changed files with 11 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
ghcup
View File

@ -41,7 +41,7 @@ BIN_LOCATION="$INSTALL_BASE/bin"
DOWNLOADER="curl" DOWNLOADER="curl"
DOWNLOADER_OPTS="--fail -O" DOWNLOADER_OPTS="--fail -O"
SCRIPT_UPDATE_URL="https://raw.githubusercontent.com/hasufell/ghcup/master/ghcup" SCRIPT_UPDATE_URL="https://raw.githubusercontent.com/hasufell/ghcup/master/ghcup"
GHC_DOWNLOAD_BASEURL="https://downloads.haskell.org/~ghc"
## print help ## ## print help ##
@ -282,40 +282,39 @@ get_download_url() {
myarch=$(get_arch) myarch=$(get_arch)
mydistro=$(get_distro_name) mydistro=$(get_distro_name)
mydistrover=$(get_distro_ver) mydistrover=$(get_distro_ver)
baseurl="https://downloads.haskell.org/~ghc"
# TODO: awkward, restructure # TODO: awkward, restructure
case "${mydistro},${mydistrover},${myarch},${myghcver}" in case "${mydistro},${mydistrover},${myarch},${myghcver}" in
Debian,7,i386,8.2.2) Debian,7,i386,8.2.2)
printf "%s" "${baseurl}/${myghcver}/ghc-${myghcver}-${myarch}-deb${mydistrover}-linux.tar.xz" printf "%s" "${GHC_DOWNLOAD_BASEURL}/${myghcver}/ghc-${myghcver}-${myarch}-deb${mydistrover}-linux.tar.xz"
;; ;;
*,*,i386,*) *,*,i386,*)
printf "%s" "${baseurl}/${myghcver}/ghc-${myghcver}-${myarch}-deb8-linux.tar.xz" printf "%s" "${GHC_DOWNLOAD_BASEURL}/${myghcver}/ghc-${myghcver}-${myarch}-deb8-linux.tar.xz"
;; ;;
Debian,*,*,8.2.2) Debian,*,*,8.2.2)
printf "%s" "${baseurl}/${myghcver}/ghc-${myghcver}-${myarch}-deb8-linux.tar.xz" printf "%s" "${GHC_DOWNLOAD_BASEURL}/${myghcver}/ghc-${myghcver}-${myarch}-deb8-linux.tar.xz"
;; ;;
Debian,8,*,*) Debian,8,*,*)
printf "%s" "${baseurl}/${myghcver}/ghc-${myghcver}-${myarch}-deb8-linux.tar.xz" printf "%s" "${GHC_DOWNLOAD_BASEURL}/${myghcver}/ghc-${myghcver}-${myarch}-deb8-linux.tar.xz"
;; ;;
Debian,*,*,*) Debian,*,*,*)
printf "%s" "${baseurl}/${myghcver}/ghc-${myghcver}-${myarch}-deb9-linux.tar.xz" printf "%s" "${GHC_DOWNLOAD_BASEURL}/${myghcver}/ghc-${myghcver}-${myarch}-deb9-linux.tar.xz"
;; ;;
Ubuntu,*,*,8.2.2) Ubuntu,*,*,8.2.2)
printf "%s" "${baseurl}/${myghcver}/ghc-${myghcver}-${myarch}-deb8-linux.tar.xz" printf "%s" "${GHC_DOWNLOAD_BASEURL}/${myghcver}/ghc-${myghcver}-${myarch}-deb8-linux.tar.xz"
;; ;;
Ubuntu,*,*,*) Ubuntu,*,*,*)
printf "%s" "${baseurl}/${myghcver}/ghc-${myghcver}-${myarch}-deb9-linux.tar.xz" printf "%s" "${GHC_DOWNLOAD_BASEURL}/${myghcver}/ghc-${myghcver}-${myarch}-deb9-linux.tar.xz"
;; ;;
*,*,*,8.2.2) *,*,*,8.2.2)
printf "%s" "${baseurl}/${myghcver}/ghc-${myghcver}-${myarch}-deb8-linux.tar.xz" printf "%s" "${GHC_DOWNLOAD_BASEURL}/${myghcver}/ghc-${myghcver}-${myarch}-deb8-linux.tar.xz"
;; ;;
*,*,*,*) # this is our best guess *,*,*,*) # this is our best guess
printf "%s" "${baseurl}/${myghcver}/ghc-${myghcver}-${myarch}-fedora27-linux.tar.xz" printf "%s" "${GHC_DOWNLOAD_BASEURL}/${myghcver}/ghc-${myghcver}-${myarch}-fedora27-linux.tar.xz"
;; ;;
esac esac
unset myghcver myarch mydistro mydistrover baseurl unset myghcver myarch mydistro mydistrover
} }
# @FUNCTION: ghc_already_installed # @FUNCTION: ghc_already_installed