如何与System.Manangement.Automation.Language合作..。天梯

Question

因此，我试图为office创建一个自定义的PsAnalyzer规则，这是我第一次使用基于$ast的命令/变量。结果我有点不知所措。

我一直在使用几个站点来了解[System.Management.Automation.Language]对象类，即这、这和这。

为了测试目的，我正在使用下面这个函数--看起来很诡异。

Function IE { 

[cmdletbinding()]

Param( 
    $Url,
    $IEWIDTH  = 550,
    $IeHeight = 450 
)


$IE = new-object -comobject InternetExplorer.Application

$IE.top  = 200 ; $IE.width      = $IEWIDTH ; $IE.height  = $IEHEIGHT
$IE.Left = 100 ; $IE.AddressBar = $FALSE   ; $IE.visible = $TRUE
$IE.navigate( "file:///$Url" )

}

然后，使用下面的代码，我希望$IEWIDTH是唯一失败的param。

Function Measure-PascalCase {
<#
.SYNOPSIS
The variables names should be in PascalCase.
.DESCRIPTION
Variable names should use a consistent capitalization style, i.e. : PascalCase.
.EXAMPLE
Measure-PascalCase -ScriptBlockAst $ScriptBlockAst
.INPUTS
[System.Management.Automation.Language.ScriptBlockAst]
.OUTPUTS
[Microsoft.Windows.PowerShell.ScriptAnalyzer.Generic.DiagnosticRecord[]]
.NOTES
https://msdn.microsoft.com/en-us/library/dd878270(v=vs.85).aspx
https://msdn.microsoft.com/en-us/library/ms229043(v=vs.110).aspx
https://mathieubuisson.github.io/create-custom-rule-psscriptanalyzer/
#>

[CmdletBinding()]
[OutputType([Microsoft.Windows.PowerShell.ScriptAnalyzer.Generic.DiagnosticRecord[]])]
Param
(
    [Parameter(Mandatory = $True)]
    [ValidateNotNullOrEmpty()]
    [System.Management.Automation.Language.ScriptBlockAst]
    $ScriptBlockAst
)

Process {

    $Results = @()

    try {
        #region Define predicates to find ASTs.

        [ScriptBlock]$Predicate = {
            Param ([System.Management.Automation.Language.Ast]$Ast)

            [bool]$ReturnValue = $false

            if ( $Ast -is [System.Management.Automation.Language.ParameterAst] ){

                [System.Management.Automation.Language.ParameterAst]$VariableAst = $Ast

                if ( $VariableAst.Left.VariablePath.UserPath -eq 'i' ){
                    $ReturnValue = $false
                } elseif ( $VariableAst.Left.VariablePath.UserPath.Length -eq 3 ){
                    $ReturnValue = $false
                } elseif ($VariableAst.Left.VariablePath.UserPath -cnotmatch '^([A-Z][a-z]+)+$') {
                    $ReturnValue = $True
                }

            }

            return $ReturnValue
        }
        #endregion

        #region Finds ASTs that match the predicates.
        [System.Management.Automation.Language.Ast[]]$Violations = $ScriptBlockAst.FindAll($Predicate, $True)

        If ($Violations.Count -ne 0) {

            Foreach ($Violation in $Violations) {

                $Result = New-Object `
                        -Typename "Microsoft.Windows.PowerShell.ScriptAnalyzer.Generic.DiagnosticRecord" `
                        -ArgumentList "$((Get-Help $MyInvocation.MyCommand.Name).Description.Text)",$Violation.Extent,$PSCmdlet.MyInvocation.InvocationName,Information,$Null

                $Results += $Result
            }
        }
        return $Results
        #endregion
    }
    catch {
        $PSCmdlet.ThrowTerminatingError($_)
    }
}
}
Export-ModuleMember -Function Measure-*

相反，我得到了：

Line Extent          Message                                                                        
---- ------          -------                                                                        
6 $Url            Variable names should use a consistent capitalization style, i.e. : PascalCase.
7 $IEWIDTH  = 550 Variable names should use a consistent capitalization style, i.e. : PascalCase.
8 $IeHeight = 450 Variable names should use a consistent capitalization style, i.e. : PascalCase.
6 $Url            Variable names should use a consistent capitalization style, i.e. : PascalCase.
7 $IEWIDTH  = 550 Variable names should use a consistent capitalization style, i.e. : PascalCase.
8 $IeHeight = 450 Variable names should use a consistent capitalization style, i.e. : PascalCase.

对我做错了什么有什么想法吗？我找到了另一个站点这里，如果我使用该方法一次测试单个变量，我就会得到我希望看到的结果。

要做到这一点，在函数IE的末尾添加以下一行，

[System.Management.Automation.Language.Parser]::ParseInput($MyInvocation.MyCommand.ScriptContents, [ref]$null, [ref]$null)

下面的代码将给出长度数字。

$stuffast = .\FunctionIe.ps1

$left = $Stuffast.FindAll({$args[0] -is [System.Management.Automation.Language.AssignmentStatementAst]},$true) 

$left[0].Left.Extent.Text.Length

$left[0].Left.VariablePath.UserPath.Length

Answer 1

与AssignmentStatementAst具有Left和Right(-hand)值属性不同，ParameterAst具有Name和DefaultValue属性，因此您需要在谓词块中使用Name：

$predicate = {
    # ...
    if ( $Ast -is [System.Management.Automation.Language.ParameterAst] ) {

        [System.Management.Automation.Language.ParameterAst]$VariableAst = $Ast

        if ( $VariableAst.Name.VariablePath.UserPath -eq 'i' ) {
            $ReturnValue = $false
        }
        elseif ( $VariableAst.Name.VariablePath.UserPath.Length -eq 3 ) {
            $ReturnValue = $false
        }
        elseif ($VariableAst.Name.VariablePath.UserPath -cnotmatch '^([A-Z][a-z]+)+$') {
            $ReturnValue = $True
        }
    }
    # ...
}

或者，翻转谓词逻辑，搜索父节点为VariableExpressionAst的AssignmentStatementAst或ParameterAst节点之一。

$predicate = {
  param($ast)

  $ValidParents = @(
    [System.Management.Automation.Language.ParameterAst]
    [System.Management.Automation.Language.AssignmentStatementAst]
  )

  if($ast -is [VariableExpressionAst] -and $ValidParents.Where({$ast -is $_}, 'First')){
    [System.Management.Automation.Language.VariableExpressionAst]$variableAst = $ast

    # inspect $variableAst.VariablePath here
  }

  return $false
}