tcpoverudp2/server.bat at master · levitation-opensource/tcpoverudp2 · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
@echo off


title TCP over UDP server


REM change active dir to current location
%~d0
cd /d "%~dp0"


REM if not defined iammaximized (
REM     set iammaximized=1
REM     start "" /max /wait "%~0"
REM     exit
REM )


REM change screen dimensions
mode con: cols=200 lines=9999


:loop


REM depending on the Perl installation you can use either
REM - C:\Strawberry\perl\bin\perl.exe
REM - C:\Perl64\bin\perl.exe

REM no indendation is allowed in batch files after line break using caret

C:\Perl64\bin\perl.exe -w tcpoverudp2.pl --udp-listen-port=8120 ^
--tcp-forward-addr=public.web.proxy --tcp-forward-port=3128 ^
--tcp-forward-addr=127.0.0.1 --tcp-forward-port=22 > log.txt 2>&1


REM ping -n 2 127.0.0.1
sleep 1


goto loop