Fallback to prior failed render run

Author: johnml1135

Build/Agent/Build-RenderArtifactComment.ps1

@@ -7,14 +7,16 @@ param(
 	[string]$GitHubApiUrl = $env:GITHUB_API_URL,
 	[string]$GitHubOutputPath = $env:GITHUB_OUTPUT,
 	[string]$GitHubToken = $env:GITHUB_TOKEN,
+	[string]$HeadRef = $env:GITHUB_HEAD_REF,
 	[string]$HasArtifacts = $env:HAS_ARTIFACTS,
 	[string]$PreviousCommentBody,
 	[string]$PullRequestNumber = $env:PULL_REQUEST_NUMBER,
 	[string]$Repository = $env:GITHUB_REPOSITORY,
 	[string]$RunAttempt = $env:GITHUB_RUN_ATTEMPT,
 	[string]$RunId = $env:GITHUB_RUN_ID,
 	[string]$ServerUrl = $env:GITHUB_SERVER_URL,
-	[string]$Sha = $env:GITHUB_SHA
+	[string]$Sha = $env:GITHUB_SHA,
+	[string]$WorkflowRef = $env:GITHUB_WORKFLOW_REF
 )
 
 Set-StrictMode -Version Latest
@@ -182,6 +184,82 @@ function Get-PreviousFailureRunInfo {
 	return $null
 }
 
+function Get-WorkflowIdentifier {
+	if ([string]::IsNullOrWhiteSpace($WorkflowRef)) {
+		return 'CI.yml'
+	}
+
+	$atIndex = $WorkflowRef.IndexOf('@')
+	$workflowRefPrefix = if ($atIndex -ge 0) {
+		$WorkflowRef.Substring(0, $atIndex)
+	}
+	else {
+		$WorkflowRef
+	}
+
+	$repositoryName = Get-RequiredValue -Name 'Repository' -Value $Repository
+	$expectedPrefix = "$repositoryName/"
+	if ($workflowRefPrefix.StartsWith($expectedPrefix, [System.StringComparison]::OrdinalIgnoreCase)) {
+		return $workflowRefPrefix.Substring($expectedPrefix.Length)
+	}
+
+	return 'CI.yml'
+}
+
+function Get-PreviousFailureRunInfoFromWorkflowRuns {
+	if ([string]::IsNullOrWhiteSpace($HeadRef)) {
+		return $null
+	}
+
+	$repositoryName = Get-RequiredValue -Name 'Repository' -Value $Repository
+	$repositoryParts = $repositoryName.Split('/')
+	if ($repositoryParts.Count -ne 2) {
+		throw "Invalid GitHub repository value: $repositoryName"
+	}
+
+	$owner = $repositoryParts[0]
+	$repo = $repositoryParts[1]
+	$workflowIdentifier = [System.Uri]::EscapeDataString((Get-WorkflowIdentifier))
+	$encodedHeadRef = [System.Uri]::EscapeDataString($HeadRef)
+	$runsUri = "$GitHubApiUrl/repos/$owner/$repo/actions/workflows/$workflowIdentifier/runs?branch=$encodedHeadRef&event=pull_request&per_page=20"
+	$response = Invoke-GitHubApi -Method Get -Uri $runsUri
+	$runs = @($response.workflow_runs)
+	$currentRunId = if ([string]::IsNullOrWhiteSpace($RunId)) { $null } else { [string]$RunId }
+
+	foreach ($run in $runs) {
+		if ($null -eq $run) {
+			continue
+		}
+
+		$runIdValue = [string]$run.id
+		if (-not [string]::IsNullOrWhiteSpace($currentRunId) -and $runIdValue -eq $currentRunId) {
+			continue
+		}
+
+		if (-not [System.String]::Equals([string]$run.status, 'completed', [System.StringComparison]::OrdinalIgnoreCase)) {
+			continue
+		}
+
+		if (-not [System.String]::Equals([string]$run.conclusion, 'failure', [System.StringComparison]::OrdinalIgnoreCase)) {
+			continue
+		}
+
+		$runSha = [string]$run.head_sha
+		$runAttemptValue = [string]$run.run_attempt
+		if ([string]::IsNullOrWhiteSpace($runSha) -or [string]::IsNullOrWhiteSpace($runIdValue) -or [string]::IsNullOrWhiteSpace($runAttemptValue)) {
+			continue
+		}
+
+		$runShortSha = $runSha.Substring(0, [System.Math]::Min(12, $runSha.Length))
+		return [pscustomobject]@{
+			Label = "$runShortSha run $runIdValue.$runAttemptValue"
+			Url = [string]$run.html_url
+		}
+	}
+
+	return $null
+}
+
 $commentDirectory = Split-Path -Path $CommentPath -Parent
 if (-not (Test-Path -LiteralPath $commentDirectory)) {
 	New-Item -ItemType Directory -Path $commentDirectory -Force | Out-Null
@@ -215,6 +293,9 @@ if ($renderArtifactsDetected) {
 }
 else {
 	$previousFailureRun = Get-PreviousFailureRunInfo -Body (Get-PreviousCommentBody)
+	if ($null -eq $previousFailureRun) {
+		$previousFailureRun = Get-PreviousFailureRunInfoFromWorkflowRuns
+	}
 	$commentLines = @()
 	if ($null -ne $previousFailureRun) {
 		$commentLines += "@$FailureRunLabelMarker$($previousFailureRun.Label) -->".Substring(1)