Czy jest możliwość za pomocą ClientSocket i ServerSocket napisanie programu który będzie przekierowywał [TUNELOWAL] połączenia. Tzn. Jeżeli połacze się z komputerem nr 1 to program przekieruje mnie automatycznie do komputera nr 2. [???]
0
0
W indy masz gotowe.
0
Da się, dajesz Client i Servr socket troszkę kodu, który otworzy odpowiedni port i puści pakiety, które przyjdą z serversocketa
0
a mianowicie na czym to polega :-|
0
a mianowicie na czym to polega :-|
Chcesz napisać tunel a nie wiesz na czym to polega, ani jak się za to zabrać??
Zacznij lepiej w takim razie od notatnika.
//Pod wpływem postu Rosziego..
Ja bym użył komponnetu INDY..co prawda zupełnie się tym nie bawiłem,ale wg słów murdoca taki prostacki tunel to kilkanaście minut roboty..
Jak chcesz póść na totalną łatwiznę to sobie demo przerób
0
Chcesz napisać tunel a nie wiesz na czym to polega, ani jak się za to zabrać??
Zacznij lepiej w takim razie od notatnika
eee, lofix, z calym szacunkiem, ale to mi przypomina tony owocnej polemiki w podobnym tonie gdy szukalem na zachodnich stronach odpowiedzi na pytanie 'jak polaczyc sie przez proxy w clientsocket'. Najkonkretniejsza odpowiedzia na jaka trafilem, bylo cos na wzor 'ja wiem, ja to zrobilem - trzeba wyslac dwa pakiety do proxy, potem je spamowac, potem jeszcze jeden pakiet chyba i wtedy jakos mozna bylo wyjsc na zewnatrz'. To byla zdobyta przeze mnie wiedza praktyczna... Teoretyczna zdobylem z podobnych zrodel, tutaj najbardziej sensowne bylo 'pakiet do proxy jest jak paczka z butami, na ktorej napisane jest, gdzie ja dostarczyc - proxy jest listonoszem'.
W ten oto sposob, wiedzialem na czym to polega i jak sie za to zabrac... I wyszlo mi wielkie gowno (czyt. zrobilem bez proxy w koncu).
0
Ok prościutki przykład...
Jak znajdę więcej czasu to napiszę gotowca i artykuł..
Program jest bez formy..no bo po co tunelowi jakaś forma..ale jak ktoiś się uprze to małe piwo skopiować kod do aplikacji z formą..
program tunel;
uses
IdTunnelSlave, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
IdTunnelMaster; //qforms
{$R *.res}
var
Master:TidTunnelmaster;
Slave:TidTunnelslave;
X:integer;
procedure zaczynaj;
begin
Master:=TIdTunnelMaster.Create(nil);
Master.MappedHost := '127.0.0.1';
Master.MappedPort := 5610;
Master.LockDestinationHost := True;
Master.LockDestinationPort := True;
Master.DefaultPort := 9000;
Master.Bindings.Add;
//slave
Slave:=TIdTunnelSlave.Create(nil);
Slave.MasterHost := '127.0.0.1';
Slave.MasterPort := 9000;
Slave.Socks4 := False;
Slave.DefaultPort := 8080;
Slave.Bindings.Add;
master.active:=true;
slave.active:=true;
end;
procedure koncz;
begin
Slave.Active := False;
Master.Active := False;
Slave.Destroy;
Master.Destroy;
end;
begin
x:=1;
zaczynaj;
while x=1 do
begin//zeby nie zrywalo polaczenie po razie
if not master.Active then master.Active:=true;
if not slave.Active then slave.Active:=true;
end;
koncz;
end.
//Jezeli chcesz przerwac to x przypisuyjesz np 0
<font size="14">http://www.4programmers.net/view.php?id=285</span>
0
ja kiedys napisalem cos takiego (K-Tunnel sie zwie) co pozwolilo nam (tzn. mi i kumplom;)) ominac k-lina i restrykcje na ircencie