---

Write-Host "=== ДИАГНОСТИКА МАШИНЫ: $env:COMPUTERNAME ===" -ForegroundColor Cyan

# 1. На какой DC смотрит машина?
Write-Host "`n[1] Контроллер домена:" -ForegroundColor Yellow
nltest /dsgetdc:t.tul.ru | Select-String "Domain Controller|Domain Name"

# 2. Безопасный канал в порядке?
Write-Host "`n[2] Безопасный канал:" -ForegroundColor Yellow
$channel = Test-ComputerSecureChannel -Verbose
Write-Host "Результат: $channel"

# 3. Время синхронизировано?
Write-Host "`n[3] Синхронизация времени:" -ForegroundColor Yellow
w32tm /query /status | Select-String "Source|Offset|Last Successful"

# 4. Доступность портов DC
Write-Host "`n[4] Доступность портов DC:" -ForegroundColor Yellow
$ports = @(88, 389, 445)
foreach ($port in $ports) {
    $test = Test-NetConnection -ComputerName 1.1.1.1 -Port $port -WarningAction SilentlyContinue
    $status = if ($test.TcpTestSucceeded) { "✅ Открыт" } else { "❌ Закрыт" }
    Write-Host "Порт $port (Kerberos/LDAP/SMB): $status"
}

# 5. Последние ошибки Netlogon
Write-Host "`n[5] Последние ошибки Netlogon (если есть):" -ForegroundColor Yellow
Get-EventLog -LogName System -Source "Netlogon" -Newest 3 -ErrorAction SilentlyContinue | 
    Select-Object TimeGenerated, EventID, EntryType, Message | 
    Format-Table -AutoSize -Wrap