|
| 1 | +$version = '9.4.7' |
| 2 | +$packageName = 'ghc' |
| 3 | +$url = 'https://downloads.haskell.org/~ghc/8.6.5/ghc-8.6.5-i386-unknown-mingw32.tar.xz' |
| 4 | +$binSha256 = '415e6adebd764d278ecfe4ebf656ff96902953b8b669fba7dae2525af6665172' |
| 5 | +$variant = '' |
| 6 | +$pp = Get-PackageParameters |
| 7 | +if ($pp['integer-simple']) { |
| 8 | + $variant = '-int_native' |
| 9 | + $binSha256 = 'f46a9c1ce07d99abc9285dd00b7f2630e71e906cf4234c8150aeb9441cdee9b7' |
| 10 | +} |
| 11 | +$baseTarget = 'ghc-' + $version + '-x86_64-unknown-mingw32' |
| 12 | +$target = $baseTarget + $variant |
| 13 | +$url64 = 'https://downloads.haskell.org/~ghc/9.4.7/' + $target + '.tar.xz' |
| 14 | +$is32 = (Get-OSArchitectureWidth 32) -or $env:chocolateyForceX86 -eq 'true' |
| 15 | + |
| 16 | +if($is32) |
| 17 | + { |
| 18 | + Write-Host "# # ####### ####### ### ##### #######" |
| 19 | + Write-Host "## # # # # # # # # " |
| 20 | + Write-Host "# # # # # # # # # " |
| 21 | + Write-Host "# # # # # # # # ##### " |
| 22 | + Write-Host "# # # # # # # # # " |
| 23 | + Write-Host "# ## # # # # # # # " |
| 24 | + Write-Host "# # ####### # ### ##### #######" |
| 25 | + Write-Host "" |
| 26 | + Write-Host " 32 bit binary for Windows is no longer supported." |
| 27 | + Write-Host "GHC 8.6.5 will be installed instead." |
| 28 | + Write-Host "" |
| 29 | + # rewrite the version to 8.6.5 so installer works |
| 30 | + $version = '8.6.5' |
| 31 | + } |
| 32 | + |
| 33 | +# Fixes issue #4 |
| 34 | +if ($pp['installdir']) { |
| 35 | + $binRoot = $pp['installdir'] |
| 36 | +} else { |
| 37 | + $binRoot = Get-ToolsLocation |
| 38 | +} |
| 39 | +$packageFullName = Join-Path $binRoot ($packageName + '-' + $version) |
| 40 | +$binPackageDir = Join-Path $packageFullName "bin" |
| 41 | + |
| 42 | +$tmpPath = Join-Path $packageFullName "tmp" |
| 43 | +$tarFile = $packageName + "Install" |
| 44 | +$tarPath = Join-Path $tmpPath $tarFile |
| 45 | +$tmpFile = Join-Path $binRoot ($tarFile + "~") |
| 46 | + |
| 47 | +Get-ChocolateyWebFile -PackageName $packageName -FileFullPath $tarPath ` |
| 48 | + -Url $url -ChecksumType sha256 -Checksum 2a8fb73080ed4335f7a172fe6cf9da1a2faa51fdb72817c50088292f497fc57a ` |
| 49 | + -Url64bit $url64 -ChecksumType64 sha256 -Checksum64 $binSha256 |
| 50 | +Get-ChocolateyUnzip -fileFullPath $tarPath -destination $binRoot |
| 51 | +Get-ChocolateyUnzip -fileFullPath $tmpFile -destination $binRoot |
| 52 | +rm $tmpFile # Clean up temporary file |
| 53 | + |
| 54 | +# new folders are stupidly long and verbose and break convention. |
| 55 | +# let's normalize them |
| 56 | +$longBinPackageDir = Join-Path $binRoot $baseTarget |
| 57 | +if (Test-Path $longBinPackageDir) { |
| 58 | + # Now delete the extract dir |
| 59 | + Remove-Item -Force -Recurse $packageFullName |
| 60 | + Rename-Item -fo $longBinPackageDir $packageFullName |
| 61 | + Write-Host "Renamed $longBinPackageDir to $packageFullName" |
| 62 | +} |
| 63 | + |
| 64 | +if (Test-Path $tmpPath) { |
| 65 | + # Now delete the tmp path |
| 66 | + Remove-Item -Force -Recurse $tmpPath |
| 67 | +} |
| 68 | + |
| 69 | +# FIxes issue #8 |
| 70 | +$installScope = 'User' |
| 71 | +if ($pp['globalinstall'] -eq 'true') { |
| 72 | + $installScope = 'Machine' |
| 73 | + Write-Host "Install scope set to global." |
| 74 | +} |
| 75 | +Install-ChocolateyPath "$binPackageDir" -Machine "$installScope" |
| 76 | + |
| 77 | +# Patch the content of files at a certain line |
| 78 | +function Write-Patch { |
| 79 | + param( [string] $key |
| 80 | + , [string] $fileName |
| 81 | + , [string] $template |
| 82 | + ) |
| 83 | + |
| 84 | + (Get-Content $fileName) | |
| 85 | + Foreach-Object { |
| 86 | + if ($_ -match "$key") |
| 87 | + { |
| 88 | + #Add Lines after the selected pattern |
| 89 | + "$template" |
| 90 | + } |
| 91 | + $_ # send the current line to output |
| 92 | + } | Set-Content $fileName |
| 93 | + |
| 94 | +} |
| 95 | + |
| 96 | +if (-Not $is32 -and -not $pp['no-workarounds']) { |
| 97 | +# HACK: Work around that GHC 9.2.x is missing some components |
| 98 | +# See each individual ticket. |
| 99 | +# Write-Host "`nApplying workarounds for GHC 9.2.3: ` |
| 100 | +# * Broken depencencies: https://gitlab.haskell.org/ghc/ghc/-/issues/21196 ` |
| 101 | +# ` |
| 102 | +# These workarounds do not change the compiler only the packaging, to disable re-run with --params=`"'/no-workarounds'`"`n" |
| 103 | +} |
| 104 | + |
| 105 | +Write-Host "Hiding shims for `'$binRoot`'." |
| 106 | +$files = get-childitem $binRoot -include *.exe -recurse |
| 107 | + |
| 108 | +foreach ($file in $files) { |
| 109 | + #generate an ignore file |
| 110 | + New-Item "$file.ignore" -type file -force | Out-Null |
| 111 | +} |
| 112 | + |
| 113 | +# Detect Github Actions |
| 114 | +if (($null -ne $Env:GITHUB_ACTIONS) -and ("" -ne $Env:GITHUB_ACTIONS)) { |
| 115 | + echo "$binPackageDir" | Out-File -FilePath $env:GITHUB_PATH -Encoding utf8 -Append |
| 116 | +} |
| 117 | + |
| 118 | +# Detect Azure Pipelines (Fixes issue #9) |
| 119 | +if (($null -ne $Env:TF_BUILD) -and ("" -ne $Env:TF_BUILD)) { |
| 120 | + Write-Host "##vso[task.prependpath]$binPackageDir" |
| 121 | +} |
| 122 | + |
| 123 | +if (($null -ne $Env:TRAVIS) -and ("" -ne $Env:TRAVIS)) { |
| 124 | + Write-Host "Configuring Travis aliases." |
| 125 | + # We need to fix up refreshenv for Travis |
| 126 | + $rc = $Env:HOME + "/.bashrc" |
| 127 | + |
| 128 | + Add-Content $rc "function refreshenv |
| 129 | +{ |
| 130 | + powershell -NonInteractive - <<\EOF |
| 131 | +Import-Module -Force `"`$env:ChocolateyInstall\helpers\chocolateyProfile.psm1`" |
| 132 | +`$pref = `$ErrorActionPreference |
| 133 | +`$ErrorActionPreference = 'SilentlyContinue' |
| 134 | +Update-SessionEnvironment |
| 135 | +`$ErrorActionPreference = `$pref |
| 136 | +# Round brackets in variable names cause problems with bash |
| 137 | +Get-ChildItem env:* | %{ |
| 138 | + if (!(`$_.Name.Contains('('))) { |
| 139 | + `$value = `$_.Value |
| 140 | + if (`$_.Name -eq 'PATH') { |
| 141 | + `$value = `$value -replace ';',':' |
| 142 | + } |
| 143 | + Write-Output (`"export `" + `$_.Name + `"='`" + `$value + `"'`") |
| 144 | + } |
| 145 | +} | Out-File -Encoding ascii $env:TEMP\refreshenv.sh |
| 146 | +EOF |
| 147 | +
|
| 148 | + source `"$env:TEMP/refreshenv.sh`" |
| 149 | +} |
| 150 | +
|
| 151 | +alias RefreshEnv=refreshenv" |
| 152 | + |
| 153 | + Write-Host "Ok, updated ~/.bashrc, source to use refreshenv." |
| 154 | +} |
0 commit comments