I have a COTS Server Application that runs on a Solaris 9 machine communicating with a COTS client application on another Solaris 9 machine. The COTS Server application is also cloned on another Solaris 9 machine to act as a high availability Server with a shared IP address between the two servers to which the COTS client connects via TCP socket. Between the two Servers only one of the shared IP addresses can be up at a time. I am currently using ifconfig <port> Up/Down to activate/deactivate the IP ports. Unfortunately, when I bring down the hardware interface, the TCP sessions on both the client and server remain in ESTABLISHED state for several minutes before going to Time-wait and then die.
Since I do not have access to the COTS code, is there a way in Perl to bind to an existing Socket connection and close it gracefully or fast? The info that is available to me
is the IP address at both ends and the port addresses at both ends.
Any wisdom would be much appreciated.
thanks
W3NTP
Neil