Arcade services project references

arcade-services.mmd

map-deps.ps1

param(
    [string]$Path = $(Get-Location)
)

Set-StrictMode -Version 3.0

# Crude script for mapping project references in VS solution

Function Mermaidify([string] $str) {
    return "$($str.Replace(".","_"))"
}

Function Get-ProjectReferences($rootFolder)
{
    Write-Output "flowchart LR"
    $projectFiles = Get-ChildItem $rootFolder -Filter *.csproj -Recurse
    # clusters representing paths
    
    $subgraphs = @{}
    foreach($projectFile in $projectFiles) {
        $parentDirName = $projectFile.Directory.Parent.Name
        if ($subgraphs[$parentDirName]) {
            $subgraphs[$parentDirName] += $projectFile.BaseName
        } else {
            $subgraphs[$parentDirName] = @($projectFile.BaseName)
        }
    }

    foreach($subgraph in $subgraphs.GetEnumerator()) {
        Write-Output "subgraph $(Mermaidify($subgraph.Name))_cluster[$($subgraph.Name)]"
        foreach ($node in $subgraph.Value) {
            Write-Output "  $(Mermaidify($node))[$node]"
        }
        Write-Output "end"
    }

    # dependencies
    foreach($projectFile in $projectFiles) {
        $projectName = $projectFile.BaseName
        $projectReferenceNodes = Select-Xml -Path $projectFile.FullName -XPath "/Project/ItemGroup/ProjectReference/@Include"
        foreach($projectReferenceNode in $projectReferenceNodes) {
            $projectReference = [System.IO.Path]::GetFileNameWithoutExtension($projectReferenceNode.Node.Value)
            Write-Output "$(Mermaidify($projectName))-->$(Mermaidify($projectReference))"
        }   
    }
 }

Get-ProjectReferences $Path