Pipe script enhancements

CHANGELOG.md

@@ -1,3 +1,19 @@
+## 0.0.14:
+* New Transpilers:
+  * [RemoveParameter] (#159)
+  * [RenameVariable] (#160)  
+* Keyword Updates:
+  * new now supports extended type creation (#164)
+  * until now supports a TimeSpan, DateTime, or EventName string (#153)
+* AST Extended Type Enhancements:
+  * [TypeConstraintAst] and [AttributeAst] now have .ResolvedCommand (#162)
+* Action Updates
+  * Pulling just before push (#163)
+  * Not running when there is not a current branch (#158)
+  * Improving email determination (#156)
+* Invoke-PipeScript terminates transpiler errors when run interactively (#161)
+---
+
 ## 0.0.13:
 * New / Improved Keywords 
   * assert keyword (Support for pipelines) (#143)

Github/Actions/PipeScriptAction.ps1

@@ -100,13 +100,30 @@ $processScriptOutput = { process {
 
 
 if (-not $UserName) { $UserName = $env:GITHUB_ACTOR }
-if (-not $UserEmail) { $UserEmail = "$UserName@github.com" }
+if (-not $UserEmail) { 
+    $GitHubUserEmail = 
+        if ($env:GITHUB_TOKEN) {
+            Invoke-RestMethod -uri "https://api.github.com/user/emails" -Headers @{
+                Authorization = "token $env:GITHUB_TOKEN"
+            } |
+                Select-Object -First 1 -ExpandProperty email
+        } else {''}
+    $UserEmail = 
+    if ($GitHubUserEmail) {
+        $GitHubUserEmail
+    } else {
+        "$UserName@github.com"
+    }    
+}
 git config --global user.email $UserEmail
 git config --global user.name  $UserName
 
 if (-not $env:GITHUB_WORKSPACE) { throw "No GitHub workspace" }
 
-git pull | Out-Host
+$branchName = git rev-parse --abrev-ref HEAD
+if (-not $branchName) { 
+    return
+}
 
 $PipeScriptStart = [DateTime]::Now
 if ($PipeScript) {
@@ -143,11 +160,15 @@ if ($CommitMessage -or $anyFilesChanged) {
 
         git commit -m $ExecutionContext.SessionState.InvokeCommand.ExpandString($CommitMessage)
     }    
+
+
 
     $checkDetached = git symbolic-ref -q HEAD
     if (-not $LASTEXITCODE) {
+        "::notice::Pulling Changes" | Out-Host
+        git pull | Out-Host
         "::notice::Pushing Changes" | Out-Host
-        git push        
+        git push | Out-Host
         "Git Push Output: $($gitPushed  | Out-String)"
     } else {
         "::notice::Not pushing changes (on detached head)" | Out-Host

Invoke-PipeScript.ps1

@@ -87,7 +87,7 @@
                 if ($TypeName.IsGeneric) {
                     $TypeNameParams[$typeName.Name] = 
                         $typeName.GenericArguments |
-                            UnpackTypeConstraintArgs
+                            TypeConstraintToArguments
                 } elseif (-not $TypeName.IsArray) {
                     $TypeNameArgs += $TypeName.Name
                 }
@@ -127,7 +127,7 @@
 
 
         # If the command is a ```[ScriptBlock]```
-        if ($Command -is [scriptblock]) 
+        if ($Command -is [scriptblock])
         {
             # Attempt to transpile it.
             $TranspiledScriptBlock = $Command | .>Pipescript @ErrorsAndWarnings
@@ -142,8 +142,28 @@
                     })
                 return
             }
+
+            if ($TranspilerErrors) {                    
+                $failedMessage = @(                        
+                    "$($command.Source): " + "$($TranspilerErrors.Count) error(s)"
+                    if ($transpilerWarnings) {
+                        "$($TranspilerWarnings.Count) warning(s)"
+                    }
+                ) -join ','
+                Write-Error $failedMessage -ErrorId Build.Failed -TargetObject (
+                    [PSCustomObject][ordered]@{
+                        Output     = $pipescriptOutput
+                        Errors     = $TranspilerErrors
+                        Warnings   = $TranspilerWarnings
+                        Command    = $Command
+                        Parameters = $InvokePipeScriptParameters 
+                    }
+                )                
+            }
+
             # If it could not be transpiled into a [ScriptBlock] or [ScriptBlock[]]            
-            if ($transpiledScriptBlock -isnot [ScriptBlock] -and -not ($TranspiledScriptBlock -as [scriptblock[]])) {
+            if ($TranspilerErrors -or 
+                ($transpiledScriptBlock -isnot [ScriptBlock] -and -not ($TranspiledScriptBlock -as [scriptblock[]]))) {
                 # error out.
                 Write-Error "Command {$command} could not be transpiled into [ScriptBlock]s"
                 return

New-PipeScript.ps1

@@ -123,7 +123,16 @@ function New-PipeScript {
     # The script header.
     [Parameter(ValueFromPipelineByPropertyName)]
     [string]
-    $Header
+    $Header,
+    # If provided, will automatically create parameters.
+    # Parameters will be automatically created for any unassigned variables.
+    [Alias('AutoParameterize','AutoParameters')]
+    [switch]
+    $AutoParameter,
+    # The type used for automatically generated parameters.
+    # By default, ```[PSObject]```.
+    [type]
+    $AutoParameterType = [PSObject]
     )
     begin {
         $ParametersToCreate    = [Ordered]@{}
@@ -228,6 +237,24 @@ function New-PipeScript {
             # accumulate them.
             $allEndBlocks += $end
         }
+        if ($AutoParameter) {
+            $variableDefinitions = $Begin, $Process, $End |
+                Where-Object { $_ } |
+                Search-PipeScript -AstType VariableExpressionAST |
+                Select-Object -ExpandProperty Result
+            foreach ($var in $variableDefinitions) {
+                $assigned = $var.GetAssignments()
+                if ($assigned) { continue }
+                $varName = $var.VariablePath.userPath.ToString()
+                $ParametersToCreate[$varName] = @(
+                    @(
+                    "[Parameter(ValueFromPipelineByPropertyName)]"
+                    "[$($AutoParameterType.FullName -replace '^System\.')]"
+                    "$var"
+                    ) -join [Environment]::NewLine
+                )
+            }
+        }
     }
     end {
         # Take all of the accumulated parameters and create a parameter block

New-PipeScript.ps1.ps1

@@ -51,7 +51,18 @@
     # The script header.
     [Parameter(ValueFromPipelineByPropertyName)]
     [string]
-    $Header
+    $Header,
+
+    # If provided, will automatically create parameters.
+    # Parameters will be automatically created for any unassigned variables.
+    [Alias('AutoParameterize','AutoParameters')]
+    [switch]
+    $AutoParameter,
+
+    # The type used for automatically generated parameters.
+    # By default, ```[PSObject]```.
+    [type]
+    $AutoParameterType = [PSObject]
     )
 
     begin {
@@ -164,6 +175,24 @@
             $allEndBlocks += $end
         }
 
+        if ($AutoParameter) {
+            $variableDefinitions = $Begin, $Process, $End |
+                Where-Object { $_ } |
+                Search-PipeScript -AstType VariableExpressionAST |
+                Select-Object -ExpandProperty Result
+            foreach ($var in $variableDefinitions) {
+                $assigned = $var.GetAssignments()
+                if ($assigned) { continue }
+                $varName = $var.VariablePath.userPath.ToString()
+                $ParametersToCreate[$varName] = @(
+                    @(
+                    "[Parameter(ValueFromPipelineByPropertyName)]"
+                    "[$($AutoParameterType.FullName -replace '^System\.')]"
+                    "$var"
+                    ) -join [Environment]::NewLine
+                )
+            }
+        }
     }
 
     end {

PipeScript.format.ps1xml

@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-16"?>
-<!-- Generated with EZOut 1.8.7: Install-Module EZOut or https://github.com/StartAutomating/EZOut -->
+<!-- Generated with EZOut 1.8.8: Install-Module EZOut or https://github.com/StartAutomating/EZOut -->
 <Configuration>
   <ViewDefinitions>
     <View>

PipeScript.psd1

@@ -1,5 +1,5 @@
 @{
-    ModuleVersion     = '0.0.13'
+    ModuleVersion     = '0.0.14'
     Description       = 'An Extensible Transpiler for PowerShell (and anything else)'
     RootModule        = 'PipeScript.psm1'
     PowerShellVersion = '4.0'
@@ -19,6 +19,22 @@
             BuildModule     = @('EZOut','Piecemeal','PipeScript','HelpOut', 'PSDevOps')
             Tags            = 'PipeScript','PowerShell', 'Transpilation', 'Compiler'
             ReleaseNotes = @'
+## 0.0.14:
+* New Transpilers:
+  * [RemoveParameter] (#159)
+  * [RenameVariable] (#160)  
+* Keyword Updates:
+  * new now supports extended type creation (#164)
+  * until now supports a TimeSpan, DateTime, or EventName string (#153)
+* AST Extended Type Enhancements:
+  * [TypeConstraintAst] and [AttributeAst] now have .ResolvedCommand (#162)
+* Action Updates
+  * Pulling just before push (#163)
+  * Not running when there is not a current branch (#158)
+  * Improving email determination (#156)
+* Invoke-PipeScript terminates transpiler errors when run interactively (#161)
+---
+
 ## 0.0.13:
 * New / Improved Keywords 
   * assert keyword (Support for pipelines) (#143)