66 lines
2.2 KiB
PowerShell
66 lines
2.2 KiB
PowerShell
# Fix NUL device references in DOS BAT files
|
|
# Replace with DOS 6.22 compatible tests
|
|
|
|
$BATFiles = @(
|
|
"DEPLOY.BAT",
|
|
"UPDATE.BAT",
|
|
"NWTOC.BAT",
|
|
"CTONW.BAT",
|
|
"CHECKUPD.BAT",
|
|
"AUTOEXEC.BAT",
|
|
"DOSTEST.BAT"
|
|
)
|
|
|
|
Write-Host "[INFO] Fixing NUL device references in BAT files..." -ForegroundColor Cyan
|
|
Write-Host ""
|
|
|
|
foreach ($File in $BATFiles) {
|
|
if (Test-Path $File) {
|
|
Write-Host "Processing: $File"
|
|
|
|
$Content = Get-Content $File -Raw
|
|
$OriginalSize = $Content.Length
|
|
|
|
# Fix 1: Replace "T: 2>NUL" with proper drive test
|
|
$Content = $Content -replace '([A-Z]:)\s+2>NUL', 'DIR $1\ >nul'
|
|
|
|
# Fix 2: Replace "IF NOT EXIST X:\NUL" with "IF NOT EXIST X:\*.*"
|
|
$Content = $Content -replace 'IF NOT EXIST ([A-Z]:\\)NUL', 'IF NOT EXIST $1*.*'
|
|
|
|
# Fix 3: Replace "IF NOT EXIST path\NUL" directory tests with proper test
|
|
# This matches patterns like "C:\BAT\NUL" or "T:\COMMON\NUL"
|
|
$Content = $Content -replace 'IF NOT EXIST ([A-Z]:\\[^\\]+(?:\\[^\\]+)*)\\NUL', 'IF NOT EXIST $1\*.*'
|
|
|
|
# Fix 4: Replace "IF EXIST path\NUL" with proper test
|
|
$Content = $Content -replace 'IF EXIST ([A-Z]:\\[^\\]+(?:\\[^\\]+)*)\\NUL', 'IF EXIST $1\*.*'
|
|
|
|
$NewSize = $Content.Length
|
|
|
|
if ($NewSize -ne $OriginalSize) {
|
|
# Verify still has CRLF
|
|
if ($Content -match "`r`n") {
|
|
Set-Content $File -Value $Content -NoNewline
|
|
Write-Host " [OK] Fixed NUL references (CRLF preserved)" -ForegroundColor Green
|
|
} else {
|
|
Write-Host " [ERROR] CRLF lost during fix!" -ForegroundColor Red
|
|
}
|
|
} else {
|
|
Write-Host " [OK] No NUL references found" -ForegroundColor Gray
|
|
}
|
|
|
|
Write-Host ""
|
|
} else {
|
|
Write-Host "[WARNING] $File not found" -ForegroundColor Yellow
|
|
Write-Host ""
|
|
}
|
|
}
|
|
|
|
Write-Host "[SUCCESS] NUL reference fixes complete" -ForegroundColor Green
|
|
Write-Host ""
|
|
Write-Host "Changes made:"
|
|
Write-Host " - 'T: 2>NUL' → 'DIR T:\ >nul'"
|
|
Write-Host " - 'IF NOT EXIST T:\NUL' → 'IF NOT EXIST T:\*.*'"
|
|
Write-Host " - 'IF NOT EXIST path\NUL' → 'IF NOT EXIST path\*.*'"
|
|
Write-Host ""
|
|
Write-Host "Note: These tests are DOS 6.22 compatible"
|