[openfirmware] r1545 - ofw/inet
svn at openfirmware.info
svn at openfirmware.info
Sun Dec 6 23:52:21 CET 2009
Author: wmb
Date: 2009-12-06 23:52:21 +0100 (Sun, 06 Dec 2009)
New Revision: 1545
Modified:
ofw/inet/dhcp.fth
Log:
Added brief DHCP progress reports.
Modified: ofw/inet/dhcp.fth
===================================================================
--- ofw/inet/dhcp.fth 2009-12-06 14:05:53 UTC (rev 1544)
+++ ofw/inet/dhcp.fth 2009-12-06 22:52:21 UTC (rev 1545)
@@ -297,6 +297,8 @@
use-router? if
indent indent ." BOOTP relay agent: " router-ip-addr .ipaddr cr
then
+ else
+ ." got " my-ip-addr .ipaddr cr
then
;
@@ -366,6 +368,8 @@
bootnet-debug if
indent ." DHCP Discover: requesting an IP address for "
my-en-addr .enaddr cr
+ else
+ ." DHCP "
then
init-backoff
@@ -374,7 +378,7 @@
\ Enter SELECTING state
choose-response ( timeout? )
while ( )
- " Timeout" .dhcp-msg
+ bootnet-debug if " Timeout" .dhcp-msg else ." Retry " then
\ If too many retries, go to INIT state
too-many? if true exit then
More information about the openfirmware
mailing list