Author: wmb Date: Thu Dec 13 01:27:26 2012 New Revision: 3491 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3491 Log: Ping utility - clean up properly (close network driver) if set-host aborts due to an unresolvable hostname. Modified: ofw/inet/ping.fth Modified: ofw/inet/ping.fth ============================================================================== --- ofw/inet/ping.fth Thu Dec 13 01:26:17 2012 (r3490) +++ ofw/inet/ping.fth Thu Dec 13 01:27:26 2012 (r3491) @@ -246,7 +246,10 @@ ; : $ping ( ip$ -- ) - open-net " $set-host" $call-net + open-net + " $set-host" ['] $call-net catch ?dup if ( x x errno ) + .error 2drop close-net exit + then /ping-max " allocate-ip" $call-net to ping-packet try-pings ping-packet /ping-max " free-ip" $call-net