functions/invoke-adoaicodereview.ps1
|
<# .SYNOPSIS Performs a code review of a Microsoft Dynamics 365 Business Central AL codebase using Azure OpenAI. .DESCRIPTION This function indexes a codebase, searches for relevant files, and queries Azure OpenAI to perform a detailed code review. It generates a report based on the provided user query and context extracted from the codebase. .PARAMETER OpenAIEndpoint The Azure OpenAI endpoint URL. .PARAMETER OpenAIApiKey The API key for authenticating with Azure OpenAI. .PARAMETER CodebasePath The path to the codebase to be indexed and reviewed. .PARAMETER Prompt The prompt to be sent to Azure OpenAI for code review. .PARAMETER Files (Optional) A list of specific file to search for in the codebase. Provide a paths to the files. .PARAMETER ExcludedFolders (Optional) A list of folder names to exclude from indexing. .PARAMETER FileExtensions (Optional) A list of file extensions to include in the indexing process. .EXAMPLE # Define the required parameters $openaiEndpoint = "https://YourAzureOpenApiEndpoint" $openaiApiKey = "your-api-key" $codebasePath = "C:\Projects\MyCodebase" $prompt = "Analyze the code for bugs and improvements." $filenames = @("example1.al", "example2.al") # Call the function Invoke-ADOAzureOpenAI -OpenAIEndpoint $openaiEndpoint ` -OpenAIApiKey $openaiApiKey ` -CodebasePath $codebasePath ` -Prompt $prompt ` -Files $filenames .NOTES This function uses PSFramework for logging and exception handling. Author: Oleksandr Nikolaiev (@onikolaiev) #> function Invoke-ADOAICodeReview { param ( [Parameter(Mandatory = $true)] [string]$OpenAIEndpoint, [Parameter(Mandatory = $true)] [string]$OpenAIApiKey, [Parameter(Mandatory = $true)] [string]$CodebasePath, [Alias("UserQuery")] [string]$Prompt, [Parameter(Mandatory = $true)] [Alias("Filenames")] [array]$Files = @(), [array]$ExcludedFolders = @(".git", "node_modules", ".vscode"), [array]$FileExtensions = @(".al", ".json", ".xml", ".txt") ) begin{ $IndexPath = "c:\temp\codebase_index.json" $ErrorActionPreference = "Stop" # Validate parameters if (-not (Test-Path $CodebasePath)) { throw "The specified codebase path does not exist: $CodebasePath" } #Invoke-TimeSignal -Start } process{ if (Test-PSFFunctionInterrupt) { return } try { # Step 1: Index the codebase Write-PSFMessage -Level Host -Message "Indexing the codebase at path: $CodebasePath" $index = @() If(-not (Test-Path $IndexPath)) { $null = New-Item -Path $IndexPath -ItemType File -Force } function CheckPath { param ( $filePath ) (($ExcludedFolders | ForEach-Object { IF($filePath -match $_) { return $true } } )) return $false } Get-ChildItem -Path $codebasePath -Recurse -File | Where-Object { ($FileExtensions -contains $_.Extension) -and (-not (CheckPath $_.FullName)) } | ForEach-Object { $filePath = $_.FullName try { $content = Get-Content -Path $filePath -Raw # Extract only the content inside CDATA tags $cleanedContent = [regex]::Matches($content, "<!\[CDATA\[(.*?)\]\]>", [System.Text.RegularExpressions.RegexOptions]::Singleline) | ForEach-Object { $_.Groups[1].Value } # Combine all extracted CDATA content into a single string (if there are multiple CDATA sections) $cleanedContent = $cleanedContent -join "`n" # Add the cleaned content to the index if it's not empty if (-not [string]::IsNullOrWhiteSpace($cleanedContent)) { $index += @{ FilePath = "$filePath" Content = $cleanedContent } } } catch { Write-PSFMessage -Level Error -Message "Failed to process file: $filePath. Error: $_" } } $index | ConvertTo-Json -Depth 10 | Set-Content -Path $IndexPath Write-PSFMessage -Level Host -Message "Indexing completed. Output saved to: $IndexPath" # Step 2: Search the codebase Write-PSFMessage -Level Host -Message "Searching the codebase for relevant files." $index = Get-Content -Path $IndexPath | ConvertFrom-Json $context = @() foreach ($file in $index) { if ($file.Content -match [regex]::Escape("")) { $context += @{ FilePath = $file.FilePath Snippet = $file.Content -replace "(?s).{0,50}" + [regex]::Escape("") + ".{0,50}", "...$&..." } } } Write-PSFMessage -Level Host -Message "Filtering results based on provided filenames." $context = $context | Where-Object { $filePath = $_.FilePath $Files | ForEach-Object { $filePath -like "*$_" } | Where-Object { $_ } | Measure-Object | Select-Object -ExpandProperty Count } Write-PSFMessage -Level Host -Message "Search completed. Found $($context.Count) matching files." # Step 3: Query Azure OpenAI Write-PSFMessage -Level Host -Message "Sending request to Azure OpenAI for code review." $fullPrompt = "You are an assistant that helps with code suggestions. Here is the context:\n" foreach ($snippet in $context) { $fullPrompt += "File: $($snippet.FilePath)\nCode:\n$($snippet.Snippet)\n\n" } $fullPrompt += "User Prompt: $Prompt" $messages = @( @{ role = "system"; content = "You are a helpful assistant for code suggestions." }, @{ role = "user"; content = $fullPrompt } ) $response = Invoke-ADOAzureOpenAI -OpenAIEndpoint $openaiEndpoint -OpenAIApiKey $openaiApiKey -Messages $messages Write-PSFMessage -Level Verbose -Message "Azure OpenAI response received." # Output the response return $response.choices[0].message.content } catch { Write-PSFMessage -Level Error -Message "An error occurred: $($_.Exception.Message)" throw } } end{ # Log the end of the operation Write-PSFMessage -Level Host -Message "Request completed." Invoke-TimeSignal -End } } |