[applocal.ps1] Keep global set of searched binaries and avoid excessive recursion.

This commit is contained in:
Robert Schumacher 2017-03-31 03:05:15 -07:00
parent 044c20dee0
commit 1c9fd4aefc

View File

@ -1,7 +1,10 @@
[cmdletbinding()]
param([string]$targetBinary, [string]$installedDir, [string]$tlogFile)
$g_searched = @{}
function resolve($targetBinary) {
Write-Verbose "Resolving $targetBinary..."
try
{
$targetBinaryPath = Resolve-Path $targetBinary -erroraction stop
@ -15,23 +18,30 @@ function resolve($targetBinary) {
$a = $(dumpbin /DEPENDENTS $targetBinary | ? { $_ -match "^ [^ ].*\.dll" } | % { $_ -replace "^ ","" })
$a | % {
if ([string]::IsNullOrEmpty($_)) {
continue
return
}
if ($g_searched.ContainsKey($_)) {
Write-Verbose " ${_}: previously searched - Skip"
return
}
$g_searched.Set_Item($_, $true)
if (Test-Path "$installedDir\$_") {
if (Test-Path "$targetBinaryDir\$_") {
Write-Verbose "$_ is already present"
Write-Verbose " ${_}: already present - Only recurse"
}
else {
Copy-Item $installedDir\$_ $targetBinaryDir
Write-Verbose "Copying $installedDir\$_ -> $_"
Write-Verbose " ${_}: Copying $installedDir\$_"
}
"$targetBinaryDir\$_"
if ($tlogFile) { Add-Content $tlogFile "$targetBinaryDir\$_" }
resolve("$targetBinaryDir\$_")
} else {
Write-Verbose "$installedDir\$_ not found"
Write-Verbose " ${_}: $installedDir\$_ not found"
}
}
Write-Verbose "Done Resolving $targetBinary."
}
resolve($targetBinary)
resolve($targetBinary)
Write-Verbose $($g_searched | out-string)