Public/Node.ps1
|
function Node { <# .Description Used to specify a nodes attributes or placement within the flow. .Example graph g { node one,two,three } .Example graph g { node top @{shape='house'} node middle node bottom @{shape='invhouse'} edge top,middle,bottom } .Example graph g { node (1..10) } .Notes I had conflits trying to alias Get-Node to node, so I droped the verb from the name. If you have subgraphs, it works best to define the node inside the subgraph before giving it an edge #> [cmdletbinding(DefaultParameterSetName='Node')] param( # The name of the node [Parameter( Mandatory = $true, ValueFromPipeline = $true, Position = 0, ParameterSetName='Node' )] [object[]] $Name = 'node', # Script to run on each node [Parameter(ParameterSetName='Node')] [alias('Script')] [scriptblock] $NodeScript = {$_}, # Set default values for all nodes [Parameter(ParameterSetName='Default')] [switch] $Default, # Node attributes to apply to this node [Parameter( Position = 1, ParameterSetName='Node' )] [Parameter( Position = 0, ParameterSetName='Default' )] [hashtable] $Attributes ) process { foreach($node in $Name) { if($NodeScript) { $nodeName = [string](@($node).ForEach($NodeScript)) } else { $nodeName = $node } if($Default) { $GraphVizAttribute = ConvertTo-GraphVizAttribute -Attributes $Attributes Write-Output ('{0}node {1}' -f (Get-Indent), $GraphVizAttribute) } else { $GraphVizAttribute = ConvertTo-GraphVizAttribute -Attributes $Attributes -InputObject $node Write-Output ('{0}"{1}" {2}' -f (Get-Indent), $nodeName, $GraphVizAttribute) } } } } |