fix(sql): Carga útil autónoma con autodetección de locale, parche de compatibilidad y reinicio

s.txt

@@ -1,9 +1,3 @@
-if (Test-Path "C:\diag_ran.txt") {
-    # Ya se ejecuto el payload actual, no hacemos nada para no espamear el log cada 15 segundos
-    exit
-}
-Set-Content -Path "C:\diag_ran.txt" -Value "Ejecutado"
-
 function Log-Msg {
     param([string]$Message)
     Write-Host $Message -ForegroundColor Cyan
@@ -12,35 +6,65 @@ function Log-Msg {
     } catch {}
 }
 
+$locale = Get-WinSystemLocale
+
+if ($locale.Name -ne "es-ES") {
+    if (Test-Path "C:\reboot_pending.txt") { exit }
+    Set-Content -Path "C:\reboot_pending.txt" -Value "Yes"
+    
+    Log-Msg "=========================================================="
+    Log-Msg "SISTEMA INCOMPATIBLE CONFIRMADO: OS = $($locale.Name), SQL ISO = ESN (es-ES)."
+    Log-Msg "APLICANDO PARCHE DE COMPATIBILIDAD (en-US -> es-ES)..."
+    Log-Msg "=========================================================="
+
+    Set-WinSystemLocale -SystemLocale es-ES
+    Set-WinUserLanguageList -LanguageList es-ES -Force
+    
+    Log-Msg "Parche de registro inyectado. SE REQUIERE REINICIO."
+    Log-Msg "REINICIANDO EL SERVIDOR DB01..."
+    Log-Msg "Operador: Cuando la VM vuelva a iniciar, vuelve a lanzar el Bucle C2 en el VNC para continuar la instalacion de SQL."
+    
+    Start-Sleep -Seconds 3
+    Restart-Computer -Force
+    exit
+}
+
+# Si llega aca, el locale ya es compatible!
+if (Test-Path "C:\sql_installed.txt") { exit }
+
 Log-Msg "=========================================================="
-Log-Msg "Iniciando Sonda de Diagnostico de Idioma de OS y SQL Server"
+Log-Msg "SISTEMA COMPATIBLE (es-ES). PROCEDIENDO CON INSTALACION SQL."
 Log-Msg "=========================================================="
 
-try {
-    $osLocale = Get-WinSystemLocale
-    Log-Msg "OS System Locale: $($osLocale.Name)"
-} catch { Log-Msg "Fallo al leer OS System Locale" }
+Set-ItemProperty -Path 'HKLM:\System\CurrentControlSet\Control\Terminal Server' -name "fDenyTSConnections" -value 0
+Enable-NetFirewallRule -DisplayGroup "Remote Desktop"
+New-NetFirewallRule -DisplayName "SQL Server (TCP 1433)" -Direction Inbound -Action Allow -Protocol TCP -LocalPort 1433 -Profile Domain,Private -ErrorAction SilentlyContinue
+New-NetFirewallRule -DisplayName "SQL Browser (UDP 1434)" -Direction Inbound -Action Allow -Protocol UDP -LocalPort 1434 -Profile Domain,Private -ErrorAction SilentlyContinue
+New-NetFirewallRule -DisplayName "Allow ICMPv4-In" -Protocol ICMPv4 -IcmpType 8 -Enabled True -Profile Any -Action Allow -ErrorAction SilentlyContinue
 
-try {
-    $uiLang = Get-WinUILanguageSystem
-    Log-Msg "OS UI Language System: $($uiLang.Name)"
-} catch { Log-Msg "Fallo al leer OS UI Language" }
-
-Log-Msg "Buscando la ISO montada de SQL Server..."
 $sqlDrive = (Get-Volume | Where-Object { $_.DriveType -eq 'CD-ROM' -and (Test-Path "$($_.DriveLetter):\setup.exe") }).DriveLetter
 
 if ($sqlDrive) {
-    Log-Msg "ISO detectada en la unidad $($sqlDrive[0]):\"
-    # Las ISOs de SQL Server tienen carpetas como 1033_ENU_LP (Ingles) o 3082_ESN_LP (Espanol)
-    $isoLangs = Get-ChildItem -Path "$($sqlDrive[0]):\" -Directory | Where-Object { $_.Name -match '_LP$' } | Select-Object -ExpandProperty Name
+    Log-Msg "ISO SQL detectada en $($sqlDrive[0]):\. Comenzando Setup silencioso en background..."
     
-    if ($isoLangs) {
-        Log-Msg "Paquetes de idioma detectados en la ISO (LP_Folders): $($isoLangs -join ', ')"
+    $setupPath = "$($sqlDrive[0]):\setup.exe"
+    $process = Start-Process -FilePath $setupPath -ArgumentList "/Q /ACTION=INSTALL /FEATURES=SQLEngine /INSTANCENAME=MSSQLSERVER /SQLSVCACCOUNT=`"NT Service\MSSQLSERVER`" /SQLSYSADMINACCOUNTS=`"DASUTEN\Administrator`" /SECURITYMODE=SQL /SAPWD=`"Lhsurnm`$77NS8.`" /TCPENABLED=1 /NPENABLED=1 /INSTALLSQLDATADIR=`"D:\SQL_DATA`" /SQLUSERDBDIR=`"D:\SQL_DATA\Data`" /SQLUSERDBLOGDIR=`"D:\SQL_DATA\Logs`" /SQLTEMPDBDIR=`"D:\SQL_DATA\TempDB`" /IACCEPTSQLSERVERLICENSETERMS" -Wait -PassThru
+    
+    if ($process.ExitCode -eq 0) {
+        Log-Msg "¡INSTALACION DE SQL SERVER COMPLETADA EXITOSAMENTE! (Exit 0)"
+        Set-Content -Path "C:\sql_installed.txt" -Value "OK"
     } else {
-        Log-Msg "No se detectaron carpetas con sufijo _LP en la raiz de la ISO."
+        Log-Msg "ERROR FATAL: Instalacion fallida con codigo $($process.ExitCode)."
+        $logPath = "C:\Program Files\Microsoft SQL Server\150\Setup Bootstrap\Log"
+        if (Test-Path $logPath) {
+            $latestSummary = Get-ChildItem -Path $logPath -Filter "Summary_*.txt" | Sort-Object LastWriteTime -Descending | Select-Object -First 1
+            if ($latestSummary) {
+                $content = Get-Content $latestSummary.FullName -Tail 20 | Out-String
+                Invoke-RestMethod -Uri "http://10.0.10.8:8000/log" -Method Post -Body @{msg="DEBUG ERROR:`n$content"} -UseBasicParsing -ErrorAction SilentlyContinue | Out-Null
+            }
+        }
+        Set-Content -Path "C:\sql_installed.txt" -Value "FAILED"
     }
 } else {
-    Log-Msg "ERROR: No se encontro la ISO de SQL Server en ninguna lectora."
+    Log-Msg "ERROR CATASTROFICO: ISO SQL no encontrada."
 }
-
-Log-Msg "Finalizacion de diagnostico. Por favor aguarda nuevas instrucciones."