Added remote ip logging on connection.

diff --git a/mz_ultravnc_repeater.pl b/mz_ultravnc_repeater.pl
index 9cec96f6fb379cd4c83e0fcd29d5464936d18bb7..4997d9f314f612b4bf43d2ef884b6ae37264d0df 100755 (executable)
--- a/mz_ultravnc_repeater.pl
+++ b/mz_ultravnc_repeater.pl
@@ -446,6 +446,7 @@ while (1) {
                        lprint("$prog: accept $!");
                        next;
                }
+               lprint("remote ip is ".$sock->peerhost());
 
                if (($client_listen && $fh == $client_listen) || ($client_listen6 && $fh == $client_listen6)) {
                        if (exists $ENV{ULTRAVNC_REPEATER_NO_RFB} && $ENV{ULTRAVNC_REPEATER_NO_RFB}) {