95 lines
3.1 KiB
PowerShell
95 lines
3.1 KiB
PowerShell
<#
|
|
.SYNOPSIS
|
|
Zjistí uživatele AD na základě názvů UVHD souborů (User Profile Disks).
|
|
|
|
.DESCRIPTION
|
|
Prochází složku s UVHD disky, extrahuje SID z názvu souboru
|
|
ve formátu UVHD-S-1-5-21-*.vhdx a dohledá odpovídajícího uživatele v AD.
|
|
|
|
.PARAMETER UVHDPath
|
|
Cesta ke složce s UVHD soubory.
|
|
|
|
.PARAMETER ExportCsv
|
|
Volitelná cesta pro export výsledků do CSV.
|
|
|
|
.EXAMPLE
|
|
.\Get-UVHDUsers.ps1 -UVHDPath "\\fileserver\UPD$"
|
|
.\Get-UVHDUsers.ps1 -UVHDPath "D:\UPD" -ExportCsv "C:\Temp\uvhd_users.csv"
|
|
#>
|
|
|
|
[CmdletBinding()]
|
|
param (
|
|
[Parameter(Mandatory = $true)]
|
|
[string]$UVHDPath,
|
|
|
|
[Parameter(Mandatory = $false)]
|
|
[string]$ExportCsv
|
|
)
|
|
|
|
# Ověření dostupnosti AD modulu
|
|
if (-not (Get-Module -ListAvailable -Name ActiveDirectory)) {
|
|
Write-Error "Modul ActiveDirectory není dostupný. Nainstaluj RSAT nebo spusť na DC/serveru s RSAT."
|
|
exit 1
|
|
}
|
|
|
|
Import-Module ActiveDirectory
|
|
|
|
# Načtení UVHD souborů
|
|
$vhdxFiles = Get-ChildItem -Path $UVHDPath -Filter "UVHD-S-1-5-21-*.vhdx" -File -ErrorAction Stop
|
|
|
|
if ($vhdxFiles.Count -eq 0) {
|
|
Write-Warning "Ve složce '$UVHDPath' nebyly nalezeny žádné UVHD soubory."
|
|
exit 0
|
|
}
|
|
|
|
Write-Host "Nalezeno $($vhdxFiles.Count) UVHD souborů. Dohledávám uživatele v AD...`n" -ForegroundColor Cyan
|
|
|
|
$results = foreach ($file in $vhdxFiles) {
|
|
# Extrakce SID z názvu souboru: UVHD-S-1-5-21-xxx-xxx-xxx-xxxx.vhdx
|
|
$sidString = $file.BaseName -replace '^UVHD-', ''
|
|
|
|
$adUser = $null
|
|
$status = $null
|
|
|
|
try {
|
|
$sid = [System.Security.Principal.SecurityIdentifier]::new($sidString)
|
|
$adUser = Get-ADUser -Identity $sid -Properties DisplayName, EmailAddress, Enabled, DistinguishedName -ErrorAction Stop
|
|
$status = "OK"
|
|
}
|
|
catch [Microsoft.ActiveDirectory.Management.ADIdentityNotFoundException] {
|
|
$status = "Uživatel nenalezen v AD"
|
|
}
|
|
catch {
|
|
$status = "Chyba: $($_.Exception.Message)"
|
|
}
|
|
|
|
[PSCustomObject]@{
|
|
Soubor = $file.Name
|
|
SID = $sidString
|
|
SamAccountName = $adUser.SamAccountName
|
|
DisplayName = $adUser.DisplayName
|
|
Email = $adUser.EmailAddress
|
|
Enabled = $adUser.Enabled
|
|
DistinguishedName = $adUser.DistinguishedName
|
|
VelikostMB = [math]::Round($file.Length / 1MB, 0)
|
|
PosledniZmena = $file.LastWriteTime
|
|
Status = $status
|
|
}
|
|
}
|
|
|
|
# Výpis do konzole
|
|
$results | Format-Table -AutoSize Soubor, SamAccountName, DisplayName, Enabled, VelikostMB, PosledniZmena, Status
|
|
|
|
# Souhrn
|
|
$ok = ($results | Where-Object { $_.Status -eq "OK" }).Count
|
|
$missing = ($results | Where-Object { $_.Status -ne "OK" }).Count
|
|
|
|
Write-Host "`nSouhrn:" -ForegroundColor Cyan
|
|
Write-Host " Nalezeni v AD : $ok" -ForegroundColor Green
|
|
Write-Host " Nenalezeni : $missing" -ForegroundColor $(if ($missing -gt 0) { "Yellow" } else { "Green" })
|
|
|
|
# Volitelný export do CSV
|
|
if ($ExportCsv) {
|
|
$results | Export-Csv -Path $ExportCsv -NoTypeInformation -Encoding UTF8
|
|
Write-Host "`nVýsledky exportovány do: $ExportCsv" -ForegroundColor Cyan
|
|
} |