ScriptBlock/ScriptBlock.ps1

#region Copyright & License

# Copyright © 2012 - 2020 François Chabot
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.

#endregion

using namespace System.Management.Automation.Internal
using namespace System.Runtime.Serialization

Set-StrictMode -Version Latest

function Convert-ScriptBlockParametersToDynamicParameters {
    [CmdletBinding()]
    [OutputType([System.Management.Automation.RuntimeDefinedParameterDictionary])]
    param(
        [Parameter(Mandatory = $true)]
        [ValidateNotNullOrEmpty()]
        [scriptblock]
        $ScriptBlock
    )
    begin {
        # https://stackoverflow.com/questions/26910789/is-it-possible-to-reuse-a-param-block-across-multiple-functions
        $commonParameterNames = [FormatterServices]::GetUninitializedObject([CommonParameters]) |
            Get-Member -MemberType Properties |
            Select-Object -ExpandProperty Name
        $dynamicParameters = New-Object System.Management.Automation.RuntimeDefinedParameterDictionary
    }
    process {
        $ScriptBlock.Ast.ParamBlock | Select-Object -ExpandProperty Parameters |
        Where-Object -FilterScript { $commonParameterNames -notcontains $_.Name.VariablePath.UserPath } |
        ForEach-Object -Process {
            $paramName = $_.Name.VariablePath.UserPath
            $paramAttributes = New-Object System.Collections.ObjectModel.Collection[System.Attribute]
            $_.Attributes | ForEach-Object -Process {
                $attributeType = Invoke-Expression -Command "[$($_.TypeName.FullName)]"
                if ([System.Management.Automation.Internal.CmdletMetadataAttribute].IsAssignableFrom($attributeType)) {
                    $attribute = New-Object -TypeName $attributeType.FullName -ArgumentList @($_.PositionalArguments | ForEach-Object Value)
                    $_.NamedArguments | ForEach-Object -Process {
                        $attribute.($_.ArgumentName) = Invoke-Expression -Command ($_.Argument.Extent.Text)
                    }
                    $paramAttributes.Add($attribute)
                }
            }
            $param = New-Object System.Management.Automation.RuntimeDefinedParameter $paramName, $_.StaticType, $paramAttributes
            $dynamicParameters.Add($paramName, $param)
        }
    }
    end {
        $dynamicParameters
    }
}

function Invoke-ScriptBlock {
    [CmdletBinding()]
    [OutputType([void])]
    param(
        [Parameter(Mandatory = $true)]
        [ValidateNotNull()]
        [scriptblock]
        $ScriptBlock,

        [Parameter(Mandatory = $true)]
        [ValidateNotNull()]
        [hashtable]
        $Parameters
    )
    begin {
        Resolve-ActionPreference -Cmdlet $PSCmdlet -SessionState $ExecutionContext.SessionState
    }
    process {
        $expectedParameters = @( $ScriptBlock.Ast.ParamBlock | Select-Object -ExpandProperty Parameters | ForEach-Object -Process { $_.Name.VariablePath.UserPath } )
        $unexpectedParameters = @( $Parameters.Keys | Where-Object -FilterScript { $_ -notin $expectedParameters } )
        $unexpectedParameters | ForEach-Object -Process { $Parameters.Remove($_) | Out-Null }
        & $ScriptBlock @Parameters
    }
}

# SIG # Begin signature block
# MIIJEgYJKoZIhvcNAQcCoIIJAzCCCP8CAQExCzAJBgUrDgMCGgUAMGkGCisGAQQB
# gjcCAQSgWzBZMDQGCisGAQQBgjcCAR4wJgIDAQAABBAfzDtgWUsITrck0sYpfvNR
# AgEAAgEAAgEAAgEAAgEAMCEwCQYFKw4DAhoFAAQU7yLyPCSxEqEiM0TeqOKi5gFG
# wLmgggWhMIIFnTCCA1GgAwIBAgIQKBOAjgMDO55A7UJ/k/g5nTBBBgkqhkiG9w0B
# AQowNKAPMA0GCWCGSAFlAwQCAQUAoRwwGgYJKoZIhvcNAQEIMA0GCWCGSAFlAwQC
# AQUAogMCASAwJjEkMCIGA1UEAwwbaWNyYWZ0c29mdHdhcmVAc3RhdGVsZXNzLmJl
# MB4XDTIwMDYyMzExNDM1NloXDTIxMDYyMzEyMDM1NlowJjEkMCIGA1UEAwwbaWNy
# YWZ0c29mdHdhcmVAc3RhdGVsZXNzLmJlMIICIjANBgkqhkiG9w0BAQEFAAOCAg8A
# MIICCgKCAgEAmQcb0GwlBHBHBJZ9vNM8EewN7T+nhsWVU0WBoWnIw6UAT99Rw9x5
# RcfOQU2hxqKmR1k+iI6B+qddpTC3VLSChA/mh1P4pCDDsZeyR/0nn/r/DezhDe8x
# 5jckjR88KSRcgDoh0kLjgfrToDpx9EvBcwXmNJKDwBIWu5SBvk04beU4XO7OHjBo
# g0kMaHxCZc9HcWfdzBefP+fbVzu6f1j1WgEqZn9sr1ML2ulHRdu26+56xGq9RZGJ
# vXyY1mY+K5mqBcET+1bV2pZnBrM3Gc/hlmvTkwrC0ZGBALLZWZqqpLVrDCY5eoHP
# w2C0kA4JzK4Q1o218s+wXbuDcjYRIZqBSwI8fizR/4DS+6dEjfa3kzs2z/MrkJOk
# hJ06tiMSRr55tX1DR8NwVLdiNqZYvs4zP2ZNRMMI8uFCjkP/Wn1hfBr+GSPlgdLq
# 2TFishY2pj5O1WlE/tCz+B0YLhPWdfbVEp8kB3fGBsVf7uw4STK/wDA1MYRIHikt
# w+K9gtdf0eIR9dYX9CMwoDN2TNLK6vnCWMrzWFe5EOU3/oljUBkyQT838a5A6wMu
# cGeu7Cwjdigylt7ULaTglL7ORIyaRbzkltxd+1oaQ21kjl4ef0ZD2gWLj7bwrZR+
# KWCfmaHFoZlVRKNPtScuyOnilPGGZ6T7SNuwVxSXFRtbp+cQea4UxxUCAwEAAaNf
# MF0wDgYDVR0PAQH/BAQDAgeAMBMGA1UdJQQMMAoGCCsGAQUFBwMDMBcGA1UdEQQQ
# MA6CDHN0YXRlbGVzcy5iZTAdBgNVHQ4EFgQUq4sCoE2IqN4K4uwNuibjqd5yNNQw
# QQYJKoZIhvcNAQEKMDSgDzANBglghkgBZQMEAgEFAKEcMBoGCSqGSIb3DQEBCDAN
# BglghkgBZQMEAgEFAKIDAgEgA4ICAQBR98amLpANKFlc7mPlkaV4ZtS2uTmbJ6dO
# qzyWKJ2yTmv7U9yq8PdEH9mPJlxYvGyNgxqHoocKv1SdjgYh27SM8pDnsfU2NpER
# 6K/3sICy6Orh9vhC+U18Bp93WoLEezolaBcF0co3/o+HazOvs/2zBFONFHMkef9/
# 3Bipm0sd95teHo53vLKViHbjSmoGxYsvJJiYITB4Zeo6xgUAmwcUpL1To62Lb3RP
# CDLKZQ5h8Ir07nncV4HLq+0qF3+G9Y0IXHJv6Qcr/XTTLo0J877HRqS37WJcgF8+
# 2nbZbqO9NVvp14A4nTqpeDFmzewDU33hiZvzuLHBj//OgLgGZ9lJPxCu0tVxfFWZ
# INHg1YHp3lMaAw00Q3tb/vhc5kE6Kl7FnXnUTsu4j+vUoaFMWhYezoyn9m4rD+xN
# RITrbLPZdWAZvVOJ8ehmswRhfiMZ1npwbrk7KU1UTsmMS7PHREWSyUM28WlMFf2i
# ut8TlY/MV/adUGr2GpqBWhxp5DRgfl1uamKm2wFlCra3/kReVlQgC/Bbod2JOgJW
# t8zCbO4nJx+fJYwM9RG70h/TmuqzP8uChsHtKcgs2YtXmSm12JZakXY4IflInI7p
# ddDEs9UOfsWXDsqpvmFQZbwgGeNeEsPk3Fdm1MzDtS9PBXMk4jGGXNzEsVUgwf42
# 2HuDWeX/4jGCAtswggLXAgEBMDowJjEkMCIGA1UEAwwbaWNyYWZ0c29mdHdhcmVA
# c3RhdGVsZXNzLmJlAhAoE4COAwM7nkDtQn+T+DmdMAkGBSsOAwIaBQCgeDAYBgor
# BgEEAYI3AgEMMQowCKACgAChAoAAMBkGCSqGSIb3DQEJAzEMBgorBgEEAYI3AgEE
# MBwGCisGAQQBgjcCAQsxDjAMBgorBgEEAYI3AgEVMCMGCSqGSIb3DQEJBDEWBBR0
# pVsxIf2GSoDsKeiJN+2GLCoSjzANBgkqhkiG9w0BAQEFAASCAgAoHUCOFL40szA2
# fTquNKjOPDOhbAJUlI4C57X3sJfaGTrV3CyJLQpIXrZWhjznOP4H9F0Ki4zzbkJ1
# zZuf4wGwdYwYRXrGaTo/FkD8WrHSWzGnSPwV92rQDR6Lj3miPn4vE9TISNhLoKae
# IE/ua+YVUQvT+YEHzUQ+XGroeh36m7j5N2J3dz1/WOCPklkBv2ZGc5dVoP7UfGqB
# YzOVNrYlKXHr5qCEZJcivml1E6sWNUG5bFbYiJLNsJnKlLybq5Amx9t4s9BTV5TU
# zsAiVQ5SC+ryLbvzDZrCsKcFYY+2Cs4BqJ2/q6WMwA+D6rkiR+QyBded0QXAhaCZ
# wqi1pmZoeY747zrmuaUkyqj0TjEk6K4R8ZxHQH8S6WqrXztFTQpLAng42d/vXDdh
# ZArsuOTP6QJVA8bCF6BpX+ymhfwoevew7ZwpbYCtV+kdNgrFmx7lVCEB01jhqlPl
# S8HAyrWzytUt1pFLDBjM4OoLh5trSZP35KXH23mpqve19kE4+rJlxP0h5onJw3em
# 3IgkSuZ5tVYJzv3HykyM7WflRzb6OE8X5pyGhfeVFyBMGy8K8BNWKwtpY/LQ4zRV
# SfnjrwdG1dW22NHa9UqN12fKQqszdrWfe9KctU0TAKzofKppL/1tcTvhFAcUv/eO
# eOoj5E5z75yKDfEt6mGAyL2U6YrANw==
# SIG # End signature block