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