Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @echo off
- :: Asegurar que el script se ejecuta como Administrador automáticamente
- >nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
- if '%errorlevel%' NEQ '0' (
- echo [!] Este script requiere permisos de Administrador.
- echo Solicitando elevacion de privilegios...
- goto UACPrompt
- ) else ( goto gotAdmin )
- :UACPrompt
- echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs"
- echo UAC.ShellExecute "%~s0", "", "", "runas", 1 >> "%temp%\getadmin.vbs"
- "%temp%\getadmin.vbs"
- del "%temp%\getadmin.vbs"
- exit /B
- :gotAdmin
- pushd "%~dp0"
- :MENU
- title Control GGC Movistar - YouTube
- cls
- echo ===================================================
- echo CONTROL DE CACHE YOUTUBE (GGC MOVISTAR)
- echo ===================================================
- echo.
- :: Comprobar el estado dinámico de la regla en el Firewall de Windows
- powershell -Command "Get-NetFirewallRule -DisplayName 'Bloqueo YouTube GGC Movistar' -ErrorAction SilentlyContinue | Out-Null"
- if %errorlevel% EQU 0 (
- powershell -Command "$r = Get-NetFirewallRule -DisplayName 'Bloqueo YouTube GGC Movistar'; if ($r.Enabled -eq 'True') { exit 0 } else { exit 1 }"
- if %errorlevel% EQU 0 (
- echo ESTADO ACTUAL: [ ACTIVO ] - Cache lento bloqueado. Directo a Google.
- ) else (
- echo ESTADO ACTUAL: [ DESACTIVADO ] - Usando cache local de Movistar.
- )
- ) else (
- echo ESTADO ACTUAL: [ NO INSTALADO ] - Sin reglas aplicadas aun.
- )
- echo.
- echo ===================================================
- echo [1] ACTIVAR Bloqueo (Saltar cache lento e ir a Google)
- echo [2] DESACTIVAR Bloqueo (Volver al estado por defecto)
- echo [3] Salir
- echo ===================================================
- echo.
- set /p opcion="Selecciona una opcion (1-3): "
- if "%opcion%"=="1" goto ACTIVAR
- if "%opcion%"=="2" goto DESACTIVAR
- if "%opcion%"=="3" goto SALIR
- goto MENU
- :ACTIVAR
- cls
- echo Configurando Firewall... Activando bloqueo del rango 213.4.152.0/22...
- powershell -Command "Remove-NetFirewallRule -DisplayName 'Bloqueo YouTube GGC Movistar' -ErrorAction SilentlyContinue; New-NetFirewallRule -DisplayName 'Bloqueo YouTube GGC Movistar' -Direction Outbound -RemoteAddress '213.4.152.0/22' -Action Block -Enabled True" >nul 2>&1
- echo.
- echo [OK] Regla activada con exito.
- timeout /t 2 >nul
- goto MENU
- :DESACTIVAR
- cls
- echo Limpiando reglas del Firewall...
- powershell -Command "Remove-NetFirewallRule -DisplayName 'Bloqueo YouTube GGC Movistar' -ErrorAction SilentlyContinue" >nul 2>&1
- echo.
- echo [OK] Regla eliminada. El tráfico vuelve a gestionarse de forma normal.
- timeout /t 2 >nul
- goto MENU
- :SALIR
- exit
Add Comment
Please, Sign In to add comment