2017-09-30 01:28:15 +02:00
|
|
|
|
|
|
|
Describe "Using assembly" -Tags "CI" {
|
|
|
|
|
|
|
|
try
|
|
|
|
{
|
|
|
|
pushd $PSScriptRoot
|
|
|
|
$guid = [Guid]::NewGuid()
|
|
|
|
|
|
|
|
Add-Type -OutputAssembly $PSScriptRoot\UsingAssemblyTest$guid.dll -TypeDefinition @"
|
|
|
|
public class ABC {}
|
|
|
|
"@
|
|
|
|
|
|
|
|
It 'parse reports error on non-existing assembly by relative path' {
|
|
|
|
$err = $null
|
|
|
|
$ast = [System.Management.Automation.Language.Parser]::ParseInput("using assembly foo.dll", [ref]$null, [ref]$err)
|
|
|
|
|
|
|
|
$err.Count | Should Be 1
|
|
|
|
$err[0].ErrorId | Should Be ErrorLoadingAssembly
|
|
|
|
}
|
|
|
|
|
|
|
|
It 'parse reports error on assembly with non-existing fully qualified name' {
|
|
|
|
$err = $null
|
|
|
|
$ast = [System.Management.Automation.Language.Parser]::ParseInput("using assembly 'System.Management.Automation, Version=99.0.0.0'", [ref]$null, [ref]$err)
|
|
|
|
|
|
|
|
$err.Count | Should Be 1
|
|
|
|
$err[0].ErrorId | Should Be ErrorLoadingAssembly
|
|
|
|
}
|
|
|
|
|
|
|
|
It 'not allow UNC path' {
|
|
|
|
$err = $null
|
|
|
|
$ast = [System.Management.Automation.Language.Parser]::ParseInput("using assembly \\networkshare\foo.dll", [ref]$null, [ref]$err)
|
|
|
|
|
|
|
|
$err.Count | Should Be 1
|
|
|
|
$err[0].ErrorId | Should Be CannotLoadAssemblyFromUncPath
|
|
|
|
}
|
|
|
|
|
|
|
|
It 'not allow http path' {
|
|
|
|
$err = $null
|
|
|
|
$ast = [System.Management.Automation.Language.Parser]::ParseInput("using assembly http://microsoft.com/foo.dll", [ref]$null, [ref]$err)
|
|
|
|
|
|
|
|
$err.Count | Should Be 1
|
|
|
|
$err[0].ErrorId | Should Be CannotLoadAssemblyWithUriSchema
|
|
|
|
}
|
|
|
|
|
|
|
|
It "parse does not load the assembly" -pending {
|
|
|
|
$assemblies = [Appdomain]::CurrentDomain.GetAssemblies().GetName().Name
|
|
|
|
$assemblies -contains "UsingAssemblyTest$guid" | Should Be $false
|
|
|
|
|
|
|
|
$err = $null
|
|
|
|
$ast = [System.Management.Automation.Language.Parser]::ParseInput("using assembly .\UsingAssemblyTest$guid.dll", [ref]$null, [ref]$err)
|
|
|
|
|
|
|
|
$assemblies = [Appdomain]::CurrentDomain.GetAssemblies().GetName().Name
|
|
|
|
$assemblies -contains "UsingAssemblyTest$guid" | Should Be $false
|
|
|
|
$err.Count | Should Be 0
|
|
|
|
|
|
|
|
$ast = [System.Management.Automation.Language.Parser]::ParseInput("using assembly '$PSScriptRoot\UsingAssemblyTest$guid.dll'", [ref]$null, [ref]$err)
|
|
|
|
|
|
|
|
$assemblies = [Appdomain]::CurrentDomain.GetAssemblies().GetName().Name
|
|
|
|
$assemblies -contains "UsingAssemblyTest$guid" | Should Be $false
|
|
|
|
$err.Count | Should Be 0
|
|
|
|
|
|
|
|
$ast = [System.Management.Automation.Language.Parser]::ParseInput("using assembly `"$PSScriptRoot\UsingAssemblyTest$guid.dll`"", [ref]$null, [ref]$err)
|
|
|
|
|
|
|
|
$assemblies = [Appdomain]::CurrentDomain.GetAssemblies().GetName().Name
|
|
|
|
$assemblies -contains "UsingAssemblyTest$guid" | Should Be $false
|
|
|
|
$err.Count | Should Be 0
|
|
|
|
}
|
|
|
|
|
|
|
|
It "reports runtime error about non-existing assembly with relative path" {
|
|
|
|
$failed = $true
|
|
|
|
try {
|
|
|
|
[scriptblock]::Create("using assembly .\NonExistingAssembly.dll")
|
|
|
|
$failed = $false
|
|
|
|
} catch {
|
|
|
|
$_.FullyQualifiedErrorId | Should be 'ParseException'
|
|
|
|
$_.Exception.InnerException.ErrorRecord.FullyQualifiedErrorId | Should be 'ErrorLoadingAssembly'
|
|
|
|
}
|
|
|
|
$failed | Should be $true
|
|
|
|
}
|
|
|
|
#>
|
|
|
|
It "Assembly loaded at runtime" -pending {
|
2017-10-18 02:25:11 +02:00
|
|
|
$assemblies = pwsh -noprofile -command @"
|
2017-09-30 01:28:15 +02:00
|
|
|
using assembly .\UsingAssemblyTest$guid.dll
|
|
|
|
[Appdomain]::CurrentDomain.GetAssemblies().GetName().Name
|
|
|
|
"@
|
|
|
|
$assemblies -contains "UsingAssemblyTest$guid" | Should Be $true
|
|
|
|
|
2017-10-18 02:25:11 +02:00
|
|
|
$assemblies = pwsh -noprofile -command @"
|
2017-09-30 01:28:15 +02:00
|
|
|
using assembly $PSScriptRoot\UsingAssemblyTest$guid.dll
|
|
|
|
[Appdomain]::CurrentDomain.GetAssemblies().GetName().Name
|
|
|
|
"@
|
|
|
|
$assemblies -contains "UsingAssemblyTest$guid" | Should Be $true
|
|
|
|
|
|
|
|
|
2017-10-18 02:25:11 +02:00
|
|
|
$assemblies = pwsh -noprofile -command @"
|
2017-09-30 01:28:15 +02:00
|
|
|
using assembly System.Drawing
|
|
|
|
[Appdomain]::CurrentDomain.GetAssemblies().GetName().Name
|
|
|
|
"@
|
|
|
|
$assemblies -contains "System.Drawing" | Should Be $true
|
|
|
|
|
2017-10-18 02:25:11 +02:00
|
|
|
$assemblies = pwsh -noprofile -command @"
|
2017-09-30 01:28:15 +02:00
|
|
|
using assembly 'System.Drawing, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a'
|
|
|
|
[Appdomain]::CurrentDomain.GetAssemblies().GetName().Name
|
|
|
|
"@
|
|
|
|
$assemblies -contains "System.Drawing" | Should Be $true
|
|
|
|
}
|
|
|
|
}
|
|
|
|
finally
|
|
|
|
{
|
|
|
|
Remove-Item .\UsingAssemblyTest$guid.dll
|
|
|
|
popd
|
|
|
|
}
|
|
|
|
}
|