Ya, I know, it is connection timeout.
However, I never used the server before, neither I know about fRO have FW rules to drop packets without any response directly. The thing is, why am I able to connect with the exact same config and stuff from another server. I just don't know why the RO server doesn't let me connect to it. It doesn't make any sense....
// Also tried to connect through a proxy (afaik, lol):
shell:/openkorebla# perl test.pl
Client Send: +-----+----------+---------+
Client Send: | ver | nmethods | methods |
Client Send: +-----+----------+---------+
Client Send: | 5 | 1 | 0 |
Client Send: +-----+----------+---------+
Client Recv: +-----+--------+
Client Recv: | ver | method |
Client Recv: +-----+--------+
Client Recv: | 5 | 0 |
Client Recv: +-----+--------+
Client Send: +-----+-----+-----+------+------+------------+---------+
Client Send: | ver | cmd | rsv | atyp | hlen | dstaddr | dstport |
Client Send: +-----+-----+-----+------+------+------------+---------+
Client Send: | 5 | 1 | 0 | 3 | 10 | 52.1.23.62 | 6900 |
Client Send: +-----+-----+-----+------+------+------------+---------+
ERROR in Socket Creation : Connection timed out
. at test.pl line 23.
here is the script:
Code: Select all
#!/usr/bin/perl
#test.pl
# wrap all connections
use IO::Socket::Socks::Wrapper ( # should be before any other `use'
{
ProxyAddr => '5.39.37.149',
ProxyPort => 1080,
SocksDebug => 1,
Timeout => 10
}
);
use IO::Socket::INET;
# flush after every write
$| = 1;
my ($socket,$client_socket);
# creating object interface of IO::Socket::INET modules which internally creates
# socket, binds and connects to the TCP server running on the specific port.
$socket = new IO::Socket::INET ( PeerHost => '52.1.23.62', PeerPort => '6900', Proto =>
'tcp', Timeout => 40 ) or die "ERROR in Socket Creation : $!\n.";
print ".TCP Connection Success.\n.";