【PowerShell】Compare-Object｜２つのファイルの差分を出す

#region ファイル選択関数
function Select-MultipleFilePaths {
    param(
        [string]$Title = "複数のファイルを選択",
        [string]$Filter = "データファイル (*.txt;*.csv;*.xlsx)|*.txt;*.csv;*.xlsx|すべてのファイル (*.*)|*.*",
        # MyDocumentsからDesktopに変更
        [string]$InitialDirectory = [Environment]::GetFolderPath("Desktop") 
    )

    $dialog = New-Object System.Windows.Forms.OpenFileDialog
    $dialog.Title = $Title

    # InitialDirectoryを設定
    $dialog.InitialDirectory = $InitialDirectory
    $dialog.Filter = $Filter
    
    # 複数選択を有効化
    $dialog.Multiselect = $true
    
    if ($dialog.ShowDialog() -eq [System.Windows.Forms.DialogResult]::OK) {
        return $dialog.FileNames
    }
    else {
        return @()
    }
}

function Select-FilePath {
    param(
        [string]$Title = "ファイルを選択",
        [string]$Filter = "データファイル (*.txt;*.csv;*.xlsx)|*.txt;*.csv;*.xlsx|すべてのファイル (*.*)|*.*",
        # MyDocumentsからDesktopに変更
        [string]$InitialDirectory = [Environment]::GetFolderPath("Desktop")
    )
    
    $dialog = New-Object System.Windows.Forms.OpenFileDialog
    $dialog.Title = $Title
    # InitialDirectoryを設定
    $dialog.InitialDirectory = $InitialDirectory
    $dialog.Filter = $Filter
    $dialog.Multiselect = $false
    
    if ($dialog.ShowDialog() -eq [System.Windows.Forms.DialogResult]::OK) {
        return $dialog.FileName
    }
    else {
        return $null
    }
}
#endregion

#region メイン比較関数
function Show-FileDifferenceGui {
    param(
        [Parameter(Mandatory=$false)]
        [string]$Title = "ファイル差分比較ツール"
    )

    # 複数ファイルを選択
    $selectedFiles = Select-MultipleFilePaths -Title "比較候補ファイルを複数選択してください (Shift/Ctrlで複数選択)"

    if ($selectedFiles.Count -lt 2) {
        Write-Warning "比較には少なくとも2つのファイルが必要です。処理を中止します。"
        return
    }

    # Out-GridViewを利用して、選択されたファイルリストから比較対象の2ファイルを選ぶ
    Write-Host "選択されたファイル: $($selectedFiles.Count)件。この中から比較したい2つのファイルを選んでください。"
    
    $fileInfo = $selectedFiles | ForEach-Object {
        [PSCustomObject]@{
            FileName = (Split-Path $_ -Leaf)
            FullPath = $_
        }
    }
    
    # Out-GridViewで複数選択を許可
    $filesToCompare = $fileInfo | Out-GridView -Title "比較対象の2ファイルを選択 (Shift/Ctrlで選択)" -OutputMode Multiple

    if ($null -eq $filesToCompare -or $filesToCompare.Count -ne 2) {
        Write-Warning "正確に2つのファイルを選択してください。処理を中止します。"
        return
    }

    # 比較対象のファイルパスを抽出
    $file1Path = $filesToCompare[0].FullPath
    $file2Path = $filesToCompare[1].FullPath
    
    Write-Host "比較元ファイル: $($file1Path)"
    Write-Host "比較先ファイル: $($file2Path)"

    # ファイルの内容を比較
    Write-Host "ファイルを比較中... $($file1Path) と $($file2Path)"
    
    $file1Content = Get-Content $file1Path
    $file2Content = Get-Content $file2Path

    $diffResult = Compare-Object $file1Content $file2Content

    # 結果をGUIで表示（差分ありの場合）
    if ($diffResult) {
        $annotatedDiff = $diffResult | Select-Object InputObject, SideIndicator, @{
            Name = '差異方向'
            Expression = {
                switch ($_.SideIndicator) {
                    '<=' { "比較元ファイルにのみ存在 ({0})" -f (Split-Path $file1Path -Leaf) }
                    '=>' { "比較先ファイルにのみ存在 ({0})" -f (Split-Path $file2Path -Leaf) }
                    default { $_.SideIndicator }
                }
            }
        }
        
        $annotatedDiff | Out-GridView -Title "$Title - 差分結果（差異あり）"
        Write-Host "差分結果をグリッドビューに表示しました。差異方向をご確認ください。"
    }
    # 結果をメッセージボックスで表示（差分なしの場合）
    else {
        $message = "【差異なし】ファイル間に差異はありませんでした。内容が完全に一致しています。"
        [System.Windows.Forms.MessageBox]::Show($message, "$Title - 差異なし", [System.Windows.Forms.MessageBoxButtons]::OK, [System.Windows.Forms.MessageBoxIcon]::Information) | Out-Null
        Write-Host "(差異なし) - コンソールにメッセージを出力しました。"
    }
}
#endregion

#region 実行ロジック (GUI初期化の強化)
# アセンブリがまだロードされていない場合のみロードを実行する
if (-not ([System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms"))) {
    Add-Type -AssemblyName System.Windows.Forms
}
# Visual Stylesを有効化
[System.Windows.Forms.Application]::EnableVisualStyles()

# STAモード警告のチェック（GUI表示問題の主要因であるため維持）
$isSTA = ([System.Threading.Thread]::CurrentThread.GetApartmentState() -eq [System.Threading.ApartmentState]::STA)
if (-not $isSTA) {
    Write-Warning "GUI実行環境の推奨モードではありません。ダイアログが表示されない場合は、-STAオプション付きでPowerShellを再起動してください。"
}

# 実行
Show-FileDifferenceGui
#endregion