@ECHO OFF
FOR /F %%I IN ("%0") DO SET BATDIR=%%~dpI ::Set run-location.
mode con cols=150 lines=50 >nul

openfiles > NUL 2>&1
if %ERRORLEVEL% EQU 0 goto choice
echo You need to run this script as Administrator.
pause
exit

:choice
echo MENU:
echo [1]  INSTALL EVERYTHING
echo.
echo [2]  INSTALL FIREWALL RULES
echo [3]  REMOVE FIREWALL RULES
echo [4]  SHOW INSTALLED FIREWALL RULES
echo [5]  CHANGE NETWORK LOCATION TO PRIVATE
echo [6]  SHOW NETWORK LOCATION
echo.
echo [7]  OPENVPN - AUTOSTART SERVICE
echo [8]  OPENVPN - DOWNLOAD SERVER CONFIG
echo.
echo [9]  INFO
echo [10] EXIT
echo ==========================
echo Enter selection and press ENTER key:
set /P c=
if /I "%c%" EQU "1" goto :changenetworklocation
if /I "%c%" EQU "2" goto :install
if /I "%c%" EQU "3" goto :remove
if /I "%c%" EQU "4" goto :installedrules
if /I "%c%" EQU "5" goto :changenetworklocation
if /I "%c%" EQU "6" goto :shownetworklocation
if /I "%c%" EQU "7" goto :openvpnauto
if /I "%c%" EQU "8" goto :downlserverconf
if /I "%c%" EQU "9" goto :info
if /I "%c%" EQU "10" goto :exit
pause
cls
goto :choice

:install
set /p Torrentpath= Input path to torrentclient (example: C:\Program Files (x86)\uTorrent\uTorrent.exe)
netsh advfirewall firewall show rule name="Torrentclient - Block incoming (Without vpn)" >nul
if %errorlevel%== 0 (
    echo Rules already installed.
    echo.
) ELSE (
    netsh advfirewall firewall add rule name="Torrentclient - Block incoming (Without vpn)" dir=in action=block program="%Torrentpath%" profile=private,domain >nul
    netsh advfirewall firewall add rule name="Torrentclient - Block outgoing (Without vpn)" dir=out action=block program="%Torrentpath%" profile=private,domain >nul
    echo Rules installed.
)
for /f "delims=" %%a in ('reg query "HKEY_LOCAL_MACHINE\software\microsoft\windows nt\currentversion\networklist\Profiles" ^| FIND "{"') do set var=%%~nxa&goto :done
:done
reg query "HKEY_LOCAL_MACHINE\software\microsoft\windows nt\currentversion\networklist\Profiles\%var%" /v Category | find "0x1">nul
if %ERRORLEVEL% EQU 0 echo Your network is set to Private. >nul
if %ERRORLEVEL% EQU 1 echo Your network is set to Domain or public. The vpn-rules requires a private network.
if "%c%"=="1" goto :downlserverconf
pause
cls
goto :choice


:remove
netsh advfirewall firewall show rule name="Torrentclient - Block incoming (Without vpn)" >nul
if %errorlevel%== 1 (
    echo Rules already removed.
    echo.
) ELSE (
    netsh advfirewall firewall delete rule name="Torrentclient - Block incoming (Without vpn)" >nul
    netsh advfirewall firewall delete rule name="Torrentclient - Block outgoing (Without vpn)" >nul
    echo Rules removed.
)
pause
cls
goto :choice


:installedrules
netsh advfirewall firewall show rule name="Torrentclient - Block incoming (Without vpn)"
netsh advfirewall firewall show rule name="Torrentclient - Block outgoing (Without vpn)"
pause
cls
goto :choice


:shownetworklocation
for /f "delims=" %%a in ('reg query "HKEY_LOCAL_MACHINE\software\microsoft\windows nt\currentversion\networklist\Profiles" ^| FIND "{"') do set var=%%~nxa&goto :done
:done
reg query "HKEY_LOCAL_MACHINE\software\microsoft\windows nt\currentversion\networklist\Profiles\%var%" /v Category | find "0x1">nul
if %ERRORLEVEL% EQU 0 echo Your network is set to Private.
if %ERRORLEVEL% EQU 1 echo Your network is set to Domain or public.
pause
cls
goto :choice


:changenetworklocation
for /f "delims=" %%a in ('reg query "HKEY_LOCAL_MACHINE\software\microsoft\windows nt\currentversion\networklist\Profiles" ^| FIND "{"') do set var=%%~nxa&goto :done >nul
:done
Reg Add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\NetworkList\Profiles\%var%" /V Category /t REG_DWORD /d 1 /f >nul
if "%c%"=="1" goto :install
echo Your network is set to Private, restart your computer.
pause
cls
goto :choice


:openvpnauto
SC QUERY Openvpnservice > NUL
IF ERRORLEVEL 1060 (
	ECHO OPENVPN SERVICE IS NOT INSTALLED.
	pause
	exit
) ELSE (
	SC Config "Openvpnservice" start= AUTO > NUL
)


IF EXIST "%ProgramFiles%\OpenVPN\config\" (
	echo EXISTS > NUL
) ELSE (
	ECHO ERROR CAN'T FIND OPENVPN-DIRECTORY
	pause
	exit
)


IF EXIST "%ProgramFiles%\OpenVPN\config\*.ovpn" (
	GOTO MAKEAUTH
) ELSE (
	ECHO ERROR NO OPENVPN CONFIGURATION FILES.
	pause
	exit
)


:MAKEAUTH
cls
set /p usern= Input your vpn username:
set /p passw= input your vpn password:
cls
echo Username:%usern% Password:%passw% is this correct? [Y] [N]
set /P m=
if /I "%m%" EQU "Y" goto :MAKEFILEA
if /I "%m%" EQU "N" goto :MAKEAUTH
cls

:MAKEFILEA
cls
cd %~dp0 >nul
echo %usern%>auth.txt
echo %passw%>>auth.txt
icacls "auth.txt" /setowner %username% /T /C >nul
copy auth.txt "%ProgramFiles%\OpenVPN\config" >nul
del auth.txt >nul
set ThisScriptsDirectory=%~dp0
set PowerShellScriptPath=%ThisScriptsDirectory%ovpn_auth.ps1
PowerShell -NoProfile -ExecutionPolicy Bypass -Command "& {Start-Process PowerShell -ArgumentList '-NoProfile -ExecutionPolicy Bypass -File ""%PowerShellScriptPath%""' -Verb RunAs}";
echo Installing...
timeout 10 >nul
cls
if "%c%"=="1" echo FIREWALL RULES ARE INSTALLED, OPENVPN IS RUNNING AS AUTOSTART SERVICE. RESTART YOUR COMPUTER. & pause & exit
echo OPENVPN is now running as autostart service. Restart your computer.
pause
cls
goto :choice

:DOWNLSERVERCONF
IF NOT EXIST "%ProgramFiles%\OpenVPN\config" echo OPENVPN NOT INSTALLED & pause & exit
cls
echo [1] Sweden servers UDP
echo [2] Sweden servers TCP
echo [3] Germany servers UDP
echo [4] Germany servers TCP
echo [5] Netherland servers UDP
echo [6] Netherland servers TCP
echo [7] Canada servers UDP
echo [8] Canada servers TCP

echo Select serverconfig and press ENTER key:
set /P d=
if /I "%d%" EQU "1" set addr=https://files.ovpn.se/windows/ovpn-se.ovpn & set addrfile=ovpn-se.ovpn & GOTO :INSTALLSERVERCONFIG >nul
if /I "%d%" EQU "2" set addr=https://files.ovpn.se/windows/ovpn-se-tcp.ovpn & set addrfile=ovpn-se-tcp.ovpn & GOTO :INSTALLSERVERCONFIG >nul

if /I "%d%" EQU "3" set addr=https://files.ovpn.se/windows/ovpn-de.ovpn & set addrfile=ovpn-de.ovpn & GOTO :INSTALLSERVERCONFIG >nul
if /I "%d%" EQU "4" set addr=https://files.ovpn.se/windows/ovpn-de-tcp.ovpn & set addrfile=ovpn-de-tcp.ovpn & GOTO :INSTALLSERVERCONFIG >nul

if /I "%d%" EQU "5" set addr=https://files.ovpn.se/windows/ovpn-nl.ovpn & set addrfile=ovpn-nl.ovpn & GOTO :INSTALLSERVERCONFIG >nul
if /I "%d%" EQU "6" set addr=https://files.ovpn.se/windows/ovpn-nl-tcp.ovpn & set addrfile=ovpn-nl-tcp.ovpn & GOTO :INSTALLSERVERCONFIG >nul

if /I "%d%" EQU "7" set addr=https://files.ovpn.se/windows/ovpn-ca.ovpn & set addrfile=ovpn-ca.ovpn & GOTO :INSTALLSERVERCONFIG >nul
if /I "%d%" EQU "8" set addr=https://files.ovpn.se/windows/ovpn-ca-tcp.ovpn & set addrfile=ovpn-ca-tcp.ovpn & GOTO :INSTALLSERVERCONFIG >nul


:installserverconfig
cls
echo Installing server configuration wait...
bitsadmin.exe /transfer "ovpndowload" %addr% "%userprofile%\desktop\%addrfile%" >nul
cd %userprofile%\desktop\ >nul
icacls "*.ovpn" /setowner %username% /T /C >nul
copy *.ovpn "%ProgramFiles%\OpenVPN\config" >nul
del *.ovpn >nul

if "%c%"=="1" goto :openvpnauto
pause
cls
goto :choice

:info
cls
echo INSTALL EVERYTHING
echo Sets network to private
echo Installs firewall rules
echo Download OVPN-config files.
echo Sets up OPENVPN client as autostart service with autologin.
echo.
echo.
echo INSTALL FIREWALL RULES.
echo Installs two Windows firewall rules.
echo Which prevents torrent client to send and receive traffic if vpn-client connection drops.
echo.
echo.
echo REMOVE FIREWALL RULES
echo Removes installed rules.
echo.
echo.
echo SHOW INSTALLED FIREWALL RULES
echo Show installed rules settings.
echo.
echo.
echo CHANGE NETWORK LOCATION TO PRIVATE
echo Change your network ethernet adapter from Public/domain to Private.
echo The firewall "kill-switch" only works if your regular ethernet adapter is set to Private.
echo and your tap-adapter (Vpn-connection) is set to Public.
echo.
echo.
echo SHOW NETWORK LOCATION
echo Show your network location.
echo.
echo.
echo OPENVPN - AUTOSTART SERVICE
echo Set up OPENVPN client as autostart service
echo Auto login OpenVPN without prompt for username and password.
echo.
echo.
echo OPENVPN - DOWNLOAD SERVER CONFIG
echo Download server configuration files (.ovpn) from ovnp.se
echo.
pause
cls
goto :choice


:exit
exit