# The rule-base is published at Cephas static path and fetchable in development
$rulesPath = "C:\Users\Administrator\Documents\LianaBanyanPlatform\Cephas\cephas-hugo\static\harper_guild_rules.yaml"
if (Test-Path $rulesPath) {
    $content = Get-Content $rulesPath -Raw
    # Count rules
    $ruleCount = ($content | Select-String -Pattern "^  - id: HG-" -AllMatches).Matches.Count
    Write-Output "Harper Guild Rules found: $ruleCount"
    Write-Output "Rules: $(($content | Select-String -Pattern 'id: HG-\d+' -AllMatches).Matches.Value -join ', ')"
    Write-Output "License: $(($content | Select-String 'license:').Line)"
    Write-Output "Privacy default: $(($content | Select-String 'privacy_default:').Line)"
} else {
    Write-Output "Rule-base not found at expected path. Run 'hugo --minify' to regenerate Cephas static."
}

# List all IP Ledger entries related to Portal searches
$ledgerPath = "$env:USERPROFILE\.lb_substrate\ip_ledger\ledger.jsonl"
if (Test-Path $ledgerPath) {
    $portalEntries = Get-Content $ledgerPath |
      ForEach-Object { $_ | ConvertFrom-Json } |
      Where-Object { $_.category -eq 'portal_search' }

    if ($portalEntries.Count -eq 0) {
        Write-Output "No Portal searches have accessed your substrate. Status: CLEAR."
    } else {
        Write-Output "Portal accesses found: $($portalEntries.Count)"
        $portalEntries | ForEach-Object {
            Write-Output "  Entry: $($_.ledger_id)"
            Write-Output "  Stamped individual: $($_.registered_by)"
            Write-Output "  At: $($_.registered_at)"
            Write-Output "  ---"
        }
    }
} else {
    Write-Output "No IP Ledger initialized. No Portal searches have occurred."
}

# The rule-base is AGPL-licensed: cooperative jurisprudence is forkable
$rulesPath = "C:\Users\Administrator\Documents\LianaBanyanPlatform\Cephas\cephas-hugo\static\harper_guild_rules.yaml"
$content = Get-Content $rulesPath -Raw
$version = ($content | Select-String -Pattern 'version: "[\d\.]+"').Matches[0].Value
Write-Output "Rule-base version: $version"
Write-Output "AGPL Free Forever: Harper Guild rules are forkable by any cooperative"
Write-Output "Supersedes chain: IP Ledger correction-branch applies to rule revisions"

Write-Output "=== HG-101 Sealed Order Scenario ==="
Write-Output ""
Write-Output "A sealed-entry Portal access appears in your substrate as:"
Write-Output "  disclosure_status: sealed"
Write-Output "  seal_expires_at: <date>"
Write-Output "  member_notified: false"
Write-Output ""
Write-Output "What you would see in Settings > Privacy & Legal > Portal Activity:"
Write-Output "  'A Portal search occurred on <date>. Details are sealed by court order.'"
Write-Output "  'You will be notified automatically when the seal lifts.'"
Write-Output ""
Write-Output "What the Harper Guild logs internally (always; Federal Body Cam doctrine):"
Write-Output "  stamped_individual_id: <agent>"
Write-Output "  disclosure_rule: HG-101"
Write-Output "  seal_expires_at: <date>"
Write-Output "  All three stamps recorded"
Write-Output ""
Write-Output "Your rights during the seal period:"
Write-Output "  - You know a sealed access occurred (aggregate notification)"
Write-Output "  - Defense Klaus activates if Harper determines exploitation risk"
Write-Output "  - Auto-notification when seal lifts"
Write-Output "  - You may submit a Harper Guild inquiry"

# Get current IP Ledger stats (basis for annual report)
$stats = Invoke-WebRequest -Uri 'http://127.0.0.1:11480/yoke/ip_ledger/stats' -UseBasicParsing |
  Select-Object -ExpandProperty Content | ConvertFrom-Json

Write-Output "=== Annual Transparency Report Preview ==="
Write-Output "Total IP Ledger entries: $($stats.total_entries)"
Write-Output "Portal searches: $($stats.portal_searches)"
Write-Output "Corrections submitted: $($stats.corrections)"
Write-Output ""
Write-Output "Annual report would publish:"
Write-Output "  - N portal searches this year"
Write-Output "  - N members notified"
Write-Output "  - N sealed entries (count only; no details)"
Write-Output "  - N Defense Klaus activations"
Write-Output "  - N formal challenges raised"
Write-Output "  - N abuse patterns flagged (HG-301)"

Write-Output "=== Harper Guild Inquiry Submission (Simulation) ==="
Write-Output ""
Write-Output "To submit a Harper Guild inquiry about a Portal access:"
Write-Output "  1. Navigate to Settings > Privacy & Legal > Portal Activity"
Write-Output "  2. Select the Portal entry in question"
Write-Output "  3. Click 'Submit Harper Guild Inquiry'"
Write-Output "  4. Describe your concern"
Write-Output ""
Write-Output "Harper Guild response includes:"
Write-Output "  - Rule citation (e.g., HG-101 applies)"
Write-Output "  - Expected disclosure date"
Write-Output "  - Your rights in this scenario"
Write-Output "  - Defense Klaus activation (if applicable)"
Write-Output ""
Write-Output "K533 Test #12 verification: member can initiate Harper inquiry and"
Write-Output "receive a rule-cited response. The inquiry itself is also IP-Ledger logged."