AsBuiltReport.Diagram

1.0.3

Src/Private/ConvertTo-Svg.ps1

function ConvertTo-Svg {
    <#
    .SYNOPSIS
        Function to export diagram to svg format.
    .DESCRIPTION
        Export a diagram in PDF/PNG/SVG formats using PSgraph.
    .NOTES
        Version: 0.2.34
        Author: Jonathan Colon
        Bluesky: @jcolonfpr.bsky.social
        Github: rebelinux
    .LINK
        https://github.com/AsBuiltReport/AsBuiltReport.Diagram
    #>
    [CmdletBinding()]
    [OutputType([String])]
    param
    (
        [Parameter(
            Position = 0,
            Mandatory = $true,
            HelpMessage = 'Please provide the graphviz dot object'
        )]
        $GraphObj,
        [Parameter(
            Position = 1,
            Mandatory = $true,
            HelpMessage = 'Please provide the file path to export the diagram'
        )]
        [System.IO.FileInfo] $DestinationPath,

        [Parameter(
            Position = 2,
            Mandatory = $false,
            HelpMessage = 'Please provide the angle degree to rotate svg image'
        )]
        [string] $Angle,

        [Parameter(
            Position = 3,
            Mandatory = $false,
            HelpMessage = 'Allow to add a watermark to the SVG output image'
        )]
        [string] $WaterMarkText,

        [Parameter(
            Position = 4,
            Mandatory = $false,
            HelpMessage = 'Allow to specify the color used for the watermark text'
        )]
        [string] $WaterMarkColor = 'Red',

        [Parameter(
            Position = 5,
            Mandatory = $false,
            HelpMessage = 'Allow to specify the font opacity used for the watermark text'
        )]
        [int] $WaterMarkFontOpacity = 30
    )
    process {

        try {
            Write-Verbose -Message "Trying to convert Graphviz object to SVG format. Destination Path: $DestinationPath."
            $Document = Export-PSGraph -Source $GraphObj -DestinationPath $DestinationPath -OutputFormat 'svg' -GraphVizPath $GraphvizPath
        } catch {
            Write-Verbose -Message 'Unable to convert Graphviz object to SVG format'
            Write-Debug -Message $($_.Exception.Message)
        }

        if ($Document) {
            #Fix icon path issue with svg output
            $images = Select-String -Path $($Document.fullname) -Pattern '<image xlink:href=".*png".*>' -AllMatches
            foreach ($match in $images) {
                $matchFound = $match -match '"(.*png)"'
                if ($matchFound -eq $false) {
                    continue
                }
                $iconName = $Matches.Item(1)
                $iconNamePath = Join-Path -Path $IconPath -ChildPath $Matches.Item(1)
                if ($Angle -ne 0) {
                    $iconNamePath = (ConvertTo-RotateImage -ImageInput $iconNamePath -Angle $Angle).FullName
                }
                $iconContents = [System.IO.File]::ReadAllBytes($iconNamePath)
                $iconEncoded = [convert]::ToBase64String($iconContents)
                ((Get-Content -Path $($Document.fullname) -Raw) -replace $iconName, "data:image/png;base64,$($iconEncoded)") | Set-Content -Path $($Document.fullname)
            }

            if ($WaterMarkText) {
                if (Get-Command -Name 'Add-WatermarkToSvg' -ErrorAction SilentlyContinue) {
                    $opacity = [Math]::Clamp(($WaterMarkFontOpacity / 100), 0, 1)
                    $null = Add-WatermarkToSvg -SourceSvgFilePath $Document.FullName -WatermarkText $WaterMarkText -OutputSvgFilePath $Document.FullName -WatermarkTextFontColor $WaterMarkColor -WatermarkTextOpacity $opacity
                } else {
                    Write-Verbose -Message 'WaterMark option requires Add-WatermarkToSvg cmdlet from Diagrammer assembly.'
                }
            }

            Write-Verbose -Message "Successfully converted Graphviz object to SVG format. Saved Path: $DestinationPath."
            Get-ChildItem -Path $Document
        }
    }
    end {}
}