function Set-FileFolderAclWithRetry {
    [CmdletBinding(SupportsShouldProcess = $true)]
    param(
        [Parameter(Mandatory = $true, ValueFromPipeline = $true)]
        [string]$Path,

        [Parameter(Mandatory = $true)]
        [string]$Identity, # 例: "BUILTIN\Users" または "DOMAIN\GroupName"

        [Parameter(Mandatory = $true)]
        [System.Security.AccessControl.FileSystemRights]$FileSystemRights, # 例: "Read", "Modify", "FullControl"

        [Parameter(Mandatory = $true)]
        [System.Security.AccessControl.AccessControlType]$AccessControlType, # 例: "Allow", "Deny"

        [int]$MaxRetries = 3,
        [int]$RetryDelaySeconds = 5
    )

    $attempt = 0
    $successful = $false
    $result = [PSCustomObject]@{
        Path = $Path
        Identity = $Identity
        FileSystemRights = $FileSystemRights.ToString()
        AccessControlType = $AccessControlType.ToString()
        Status = "Failed"
        ErrorMessage = ""
        Attempts = 0
    }

    do {
        $attempt++
        $result.Attempts = $attempt
        try {
            if ($PSCmdlet.ShouldProcess($Path, "Apply ACL for $($Identity)")) {
                $acl = Get-Acl -LiteralPath $Path -ErrorAction Stop
                $rule = New-Object System.Security.AccessControl.FileSystemAccessRule(
                    $Identity,
                    $FileSystemRights,
                    "ContainerInherit,ObjectInherit", # フォルダの場合、継承設定を考慮
                    "None",                           # 伝播方法 (None, InheritOnly, NoPropagateInherit)
                    $AccessControlType
                )
                $acl.AddAccessRule($rule)
                Set-Acl -LiteralPath $Path -AclObject $acl -ErrorAction Stop
                $result.Status = "Succeeded"
                $successful = $true
            } else {
                $result.Status = "Skipped (WhatIf)"
                $successful = $true # ShouldProcessでスキップされた場合は成功とみなす
            }
        } catch {
            $errorMessage = $_.Exception.Message
            $result.ErrorMessage = $errorMessage
            Write-Warning "Failed to set ACL on '$Path' for '$Identity' (Attempt $attempt/$MaxRetries): $errorMessage"
            if ($attempt -lt $MaxRetries) {
                Write-Host "Retrying in $RetryDelaySeconds seconds..." -ForegroundColor Yellow
                Start-Sleep -Seconds $RetryDelaySeconds
            }
        }
    } while (-not $successful -and $attempt -lt $MaxRetries)

    if (-not $successful) {
        Write-Error "Failed to set ACL on '$Path' for '$Identity' after $MaxRetries attempts."
    }

    return $result
}

# 実行例1: 単一ファイルに読み取り権限を付与

Set-FileFolderAclWithRetry -Path "C:\temp\test_file.txt" `
    -Identity "BUILTIN\Users" `
    -FileSystemRights "Read" `
    -AccessControlType "Allow" `
    -MaxRetries 2 `
    -RetryDelaySeconds 3

# 実行例2: 存在しないパスへの適用を試み、エラーハンドリングと再試行を確認


# Set-FileFolderAclWithRetry -Path "C:\temp\non_existent_file.txt" `


#     -Identity "BUILTIN\Users" `


#     -FileSystemRights "Read" `


#     -AccessControlType "Allow" `


#     -MaxRetries 2 `


#     -RetryDelaySeconds 3

# 対象とするルートパス

$targetRootPath = "C:\temp\data"

# 新たに追加する権限

$newIdentity = "BUILTIN\Administrators" # 適切なユーザー/グループに置き換える
$newRights = "FullControl"
$accessType = "Allow"
$maxParallel = 5 # 並列処理するRunspaceの数

# テスト用ファイル/フォルダの準備（必要に応じて実行）

if (-not (Test-Path $targetRootPath)) {
    New-Item -Path $targetRootPath -ItemType Directory -Force | Out-Null
}
for ($i = 1; $i -le 20; $i++) {
    $filePath = Join-Path $targetRootPath "file_$i.txt"
    New-Item -Path $filePath -ItemType File -Force | Out-Null
    Set-Content -Path $filePath -Value "Test content for file $i"
    if ($i % 5 -eq 0) {
        $subDirPath = Join-Path $targetRootPath "subfolder_$i"
        New-Item -Path $subDirPath -ItemType Directory -Force | Out-Null
        New-Item -Path (Join-Path $subDirPath "nested_file_$i.txt") -ItemType File -Force | Out-Null
    }
}
Write-Host "テスト用ファイル/フォルダを $targetRootPath に作成しました。" -ForegroundColor Green


# ログファイルパス（JST: 2024-05-18）

$logFilePath = "C:\temp\acl_update_log_$(Get-Date -Format 'yyyyMMdd_HHmmss').json"
$transcriptPath = "C:\temp\acl_update_transcript_$(Get-Date -Format 'yyyyMMdd_HHmmss').txt"

# セッション全体のログを開始

Start-Transcript -Path $transcriptPath -Append -NoClobber -Force

Write-Host "--- ACL変更処理を開始します (並列: $($maxParallel)) ---" -ForegroundColor Cyan

# 対象となるファイルとフォルダのパスを取得

$itemsToProcess = Get-ChildItem -Path $targetRootPath -Recurse | Select-Object -ExpandProperty FullName

$totalProcessedCount = 0
$succeededCount = 0
$failedCount = 0
$skippedCount = 0
$processingResults = [System.Collections.Generic.List[object]]::new()

# 並列処理の実行

$overallExecutionTime = Measure-Command {
    $itemsToProcess | ForEach-Object -Parallel {
        param($itemPath)

        # $using: スコープ修飾子を使って、親スコープの変数にアクセス

        $result = $using:Set-FileFolderAclWithRetry -Path $itemPath `
            -Identity $using:newIdentity `
            -FileSystemRights $using:newRights `
            -AccessControlType $using:accessType `
            -MaxRetries 3 `
            -RetryDelaySeconds 2 `
            -ErrorAction SilentlyContinue # 並列ブロック内でのエラーはキャッチ済のため、ここで停止させない

        # 結果を親スコープのリストに追加するための同期処理


        # 並列処理でリストを直接操作することはスレッドセーフではないため、キューやロックメカニズムが必要になるが、


        # ここでは簡単な例として、それぞれの結果をパイプで出力し、後で収集する

        $result
    } -ThrottleLimit $maxParallel | ForEach-Object {
        $processingResults.Add($_)
        $totalProcessedCount++
        switch ($_.Status) {
            "Succeeded" { $succeededCount++ }
            "Failed" { $failedCount++ }
            "Skipped (WhatIf)" { $skippedCount++ }
        }
        Write-Host "Processed $($_.Path) - Status: $($_.Status)"
    }
}

# 構造化ログの出力

$processingResults | ConvertTo-Json -Depth 5 | Set-Content -Path $logFilePath -Encoding UTF8

Write-Host "--- ACL変更処理が完了しました ---" -ForegroundColor Cyan
Write-Host "総処理時間: $($overallExecutionTime.TotalSeconds) 秒" -ForegroundColor Cyan
Write-Host "総項目数: $totalProcessedCount" -ForegroundColor Cyan
Write-Host "成功: $succeededCount" -ForegroundColor Green
Write-Host "失敗: $failedCount" -ForegroundColor Red
Write-Host "スキップ: $skippedCount" -ForegroundColor Yellow
Write-Host "詳細ログ: $logFilePath" -ForegroundColor Cyan
Write-Host "トランスクリプト: $transcriptPath" -ForegroundColor Cyan

# セッション全体のログを停止

Stop-Transcript

# (上記の並列処理スクリプトの一部)


# 並列処理の実行

$overallExecutionTime = Measure-Command {

    # ... ForEach-Object -Parallel 処理 ...

}
Write-Host "総処理時間: $($overallExecutionTime.TotalSeconds) 秒" -ForegroundColor Cyan

# ログファイルから失敗したパスを抽出する例


# 実行前提: 上記の並列処理スクリプトで生成されたJSONログファイルが存在すること

$failedLogPath = "C:\temp\acl_update_log_*.json" # 実際のログファイル名に合わせて変更
$logContent = Get-Content -Path $failedLogPath | ConvertFrom-Json

$failedItems = $logContent | Where-Object { $_.Status -eq "Failed" } | Select-Object -ExpandProperty Path

if ($failedItems.Count -gt 0) {
    Write-Host "--- 失敗した項目を再処理します ---" -ForegroundColor Yellow
    $failedItems | ForEach-Object {

        # 再試行ロジック (ここでは単純に再度関数を呼び出す)


        # 実際の運用では、エラーの原因を分析し、Identity, Rightsなどを調整してから再実行することもあります。

        Write-Host "Retrying: $_"
        Set-FileFolderAclWithRetry -Path $_ `
            -Identity "BUILTIN\Administrators" ` # 適切な権限を再指定
            -FileSystemRights "FullControl" `
            -AccessControlType "Allow" `
            -MaxRetries 5 ` # 再試行回数を増やす
            -RetryDelaySeconds 5
    }
} else {
    Write-Host "失敗した項目はありませんでした。" -ForegroundColor Green
}