third-party-mirrors/sslh
1
0
Fork 0
mirror of https://github.com/yrutschle/sslh.git synced 2025-04-13 07:37:15 +03:00
Code Issues Packages Projects Releases Wiki Activity

fix to work with test.cfg

Browse Source
This commit is contained in:
yrutschle 2021-04-14 23:27:44 +02:00
parent 5715a9f0bd
commit 0e3242c115
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
t_load
View File

@ -46,16 +46,14 @@ my $stop_client_probability = .001;
my %protocols = (
#"ssh" => { address => "localhost:9001", client => client("ssh") },
# "tls" => { address => "localhost:9002", client => client("tls") },
"openvpn" => {address => "localhost:9003", client => client("openvpn") },
"tinc" => {address => "localhost:9004", client => client("tinc") },
"openvpn" => {address => "localhost:9004", client => client("openvpn") },
"tinc" => {address => "localhost:9003", client => client("tinc") },
);
##END CONFIG
# We use ports 9000, 9001 and 9002 -- hope that won't clash
# with anything...
my $sslh_address = "localhost:9000";
my $sslh_address = "localhost:8080";
my $pidfile = "/tmp/sslh_test.pid";
@ -92,6 +90,8 @@ sub client {
while (1) {
my $r;
my $cnx = new IO::Socket::INET(PeerHost => $sslh_address);
die "$@\n" if (!$cnx);
my $cnt = 0;
warn "starting $service\n";