SVG.view.ps1
|
function SVG.view { <# .Synopsis Creates SVG view elements .Description A view is a defined way to view the image, like a zoom level or a detail view. #> [Reflection.AssemblyMetadata('SVG.ElementName', 'view')] [CmdletBinding(PositionalBinding=$false)] param( # The Contents of the view element [Parameter(Position=0,ValueFromPipelineByPropertyName)] [Alias('InputObject','Text', 'InnerText', 'Contents')] $Content, # [Parameter(ValueFromPipelineByPropertyName)] [Reflection.AssemblyMetaData('SVG.AttributeName','viewBox')] [Reflection.AssemblyMetaData('SVG.Value', '<number>?, <number>?, <number>?, <number>')] [Reflection.AssemblyMetaData('SVG.Animatable', 'True')] $ViewBox, # [Parameter(ValueFromPipelineByPropertyName)] [Reflection.AssemblyMetaData('SVG.AttributeName','preserveAspectRatio')] [Reflection.AssemblyMetaData('SVG.Value', '<align> <meetOrSlice>?')] [Reflection.AssemblyMetaData('SVG.Default value', 'xMidYMidmeet')] [Reflection.AssemblyMetaData('SVG.Animatable', 'True')] $PreserveAspectRatio, # [Parameter(ValueFromPipelineByPropertyName)] [Reflection.AssemblyMetaData('SVG.AttributeName','zoomAndPan')] [Reflection.AssemblyMetaData('SVG.Value', 'disable | magnify')] [ValidateSet('disable','magnify')] [Reflection.AssemblyMetaData('SVG.Default value', 'magnify')] [Reflection.AssemblyMetaData('SVG.Animatable', 'False')] $ZoomAndPan, # [Parameter(ValueFromPipelineByPropertyName)] [Reflection.AssemblyMetaData('SVG.AttributeName','viewTarget')] [Reflection.AssemblyMetaData('SVG.Value', '<xml-name>')] [Reflection.AssemblyMetaData('SVG.Animatable', 'False')] $ViewTarget, # The **`id`** attribute assigns a unique name to an element. # # You can use this attribute with any SVG element. [Parameter(ValueFromPipelineByPropertyName)] [Reflection.AssemblyMetaData('SVG.AttributeName','id')] [Reflection.AssemblyMetaData('SVG.Value', '<id>')] [Reflection.AssemblyMetaData('SVG.Animatable', 'False')] $Id, # The **`lang`** attribute specifies the primary language used in contents and attributes containing text content of particular elements. # # There is also an xml:lang attribute (with namespace). If both of them are defined, the one with namespace is used and the one without is ignored. # # In SVG 1.1 there was a `lang` attribute defined with a different meaning and only applying to glyph elements. That attribute specified a list of languages according to {{RFC(5646, "Tags for Identifying Languages (also known as BCP 47)")}}. The glyph was meant to be used if the `xml:lang` attribute exactly matched one of the languages given in the value of this parameter, or if the `xml:lang` attribute exactly equaled a prefix of one of the languages given in the value of this parameter such that the first tag character following the prefix was "-". # # You can use this attribute with any SVG element. [Parameter(ValueFromPipelineByPropertyName)] [Reflection.AssemblyMetaData('SVG.AttributeName','lang')] [Reflection.AssemblyMetaData('SVG.Value', '<language-tag>')] [Reflection.AssemblyMetaData('SVG.Animatable', 'False')] $Lang, # The **`tabindex`** attribute allows you to control whether an element is focusable and to define the relative order of the element for the purposes of sequential focus navigation. # # You can use this attribute with any SVG element. [Parameter(ValueFromPipelineByPropertyName)] [Reflection.AssemblyMetaData('SVG.AttributeName','tabindex')] [Reflection.AssemblyMetaData('SVG.Value', 'valid integer')] [Reflection.AssemblyMetaData('SVG.Animatable', 'False')] $Tabindex, # The **`xml:base`** attribute specifies a base IRI other than the base IRI of the document or external entity. # # You can use this attribute with any SVG element. [Parameter(ValueFromPipelineByPropertyName)] [Reflection.AssemblyMetaData('SVG.AttributeName','xml:base')] [Reflection.AssemblyMetaData('SVG.Deprecated',$true)] [Reflection.AssemblyMetaData('SVG.Value', '<iri>')] [Reflection.AssemblyMetaData('SVG.Animatable', 'False')] $XmlBase, # The **`xml:lang`** attribute specifies the primary language used in contents and attributes containing text content of particular elements. # # It is a universal attribute allowed in all XML dialects to mark up the natural human language that an element contains. # # There is also a lang attribute (without namespace). If both of them are defined, the one with namespace is used and the one without is ignored. # # You can use this attribute with any SVG element. [Parameter(ValueFromPipelineByPropertyName)] [Reflection.AssemblyMetaData('SVG.AttributeName','xml:lang')] [Reflection.AssemblyMetaData('SVG.Deprecated',$true)] [Reflection.AssemblyMetaData('SVG.Value', '<language-tag>')] [Reflection.AssemblyMetaData('SVG.Animatable', 'False')] $XmlLang, # SVG supports the built-in XML **`xml:space`** attribute to handle whitespace characters inside elements. Child elements inside an element may also have an `xml:space` attribute that overrides the parent's one. # # > **Note:** Instead of using the `xml:space` attribute, use the {{cssxref("white-space")}} CSS property. # # This attribute influences how browsers parse text content and therefore changes the way the DOM is built. Therefore, changing this attribute's value through the DOM API may have no effect. # # You can use this attribute with any SVG element. [Parameter(ValueFromPipelineByPropertyName)] [Reflection.AssemblyMetaData('SVG.AttributeName','xml:space')] [Reflection.AssemblyMetaData('SVG.Deprecated',$true)] [Reflection.AssemblyMetaData('SVG.Value', 'default | preserve')] [ValidateSet('default','preserve')] [Reflection.AssemblyMetaData('SVG.Default value', 'default')] [Reflection.AssemblyMetaData('SVG.Animatable', 'False')] $XmlSpace ) process { $paramCopy = [Ordered]@{} + $PSBoundParameters $myCmd = $MyInvocation.MyCommand $inputObject = $_ $elementName = foreach ($myAttr in $myCmd.ScriptBlock.Attributes) { if ($myAttr.Key -eq 'SVG.ElementName') { $myAttr.Value break } } if (-not $elementName) { return } # If we had an input object, create a copy if ($inputObject) { $inputObject = [PSObject]::new($inputObject) } # (this way, we can take off any properties that were provided by name) if ($paramCopy['Style'] -and $paramCopy['Style'] -isnot [string]) { if ($paramCopy['Style'] -is [Collections.IDictionary]) { $paramCopy['Style'] = @(foreach ($kv in $paramCopy['Style'].GetEnumerator()) { "$($kv.Key):$($kv.Value)" }) -join ';' } else { $paramCopy['Style'] = @(foreach ($prop in $paramCopy['Style'].psobject.properties) { "$($prop.Name):$($kv.Value)" }) -join ';' } } $elementText = "<$elementName " :nextParameter foreach ($kv in $paramCopy.GetEnumerator()) { foreach ($attr in $myCmd.Parameters[$kv.Key].Attributes) { if ($attr.Key -eq 'SVG.AttributeName') { if ($inputObject -and $inputObject.psobject.properties[$attr.Key]) { $inputObject.psobject.properties.Remove($attr.Key) } $elementText += "$($attr.Value)='$([Web.HttpUtility]::HtmlAttributeEncode($kv.Value))' " } } } if ($elementName -eq 'svg') { $elementText += 'xmlns:xlink="http://www.w3.org/1999/xlink" xmlns="http://www.w3.org/2000/svg"' } $elementText = $elementText -replace '\s{0,1}$' if (-not $content) { $elementText += " />" } else { $isCData = $false foreach ($attr in $myCmd.Parameters.Content.Attributes) { if ($attr.Key -eq 'SVG.IsCData' -and $attr.Value -eq 'true') { $isCData = $true } } if ($isCData) { $escapedContent = [Security.SecurityElement]::Escape("$content") $elementText += ">" + "$escapedContent" + "</$elementName>" } else { $elementText += ">" + "$Content" + "</$elementName>" } } if ($elementName -eq 'svg' -and $OutputPath) { $elementText | Set-Content -Path $OutputPath Get-Item $OutputPath } else { $elementText } } } |