kill off ssh process when re-opening connection
authorivan <ivan>
Sat, 15 Nov 2003 07:28:26 +0000 (07:28 +0000)
committerivan <ivan>
Sat, 15 Nov 2003 07:28:26 +0000 (07:28 +0000)
FS/bin/freeside-selfservice-server

index d2358e3..f9571fa 100644 (file)
@@ -79,6 +79,11 @@ while (1) {
       warn "Storable error receiving packet from client".
            " (assuming lost connection): $@\n"
         if $Debug;
+      if ( $ssh_pid ) {
+        warn "sending TERM signal to ssh process $ssh_pid\n" if $Debug;
+        kill 'TERM', $ssh_pid;
+        $ssh_pid = 0;
+      }
       last;
     }
     warn "packet received\n".