[openfirmware] r1661 - cpu/x86/pc/olpc/via
svn at openfirmware.info
svn at openfirmware.info
Tue Jan 12 23:45:35 CET 2010
Author: wmb
Date: 2010-01-12 23:45:35 +0100 (Tue, 12 Jan 2010)
New Revision: 1661
Modified:
cpu/x86/pc/olpc/via/fw.bth
Log:
OLPC trac 9980 - disable pretty boot during factory test.
Modified: cpu/x86/pc/olpc/via/fw.bth
===================================================================
--- cpu/x86/pc/olpc/via/fw.bth 2010-01-11 20:43:51 UTC (rev 1660)
+++ cpu/x86/pc/olpc/via/fw.bth 2010-01-12 22:45:35 UTC (rev 1661)
@@ -582,19 +582,15 @@
\ .built cr
;
-: ?factory-boot-sequence ( -- flag )
+: factory-test? ( -- flag )
\ TS is the "test station" tag. Its value is set to "DL" at the
\ end of manufacturing test.
- " TS" find-tag if ( adr len )
- ?-null " DL" $= 0= ( in-factory? )
- else ( )
- \ Missing TS tag is treated as not factory mode
+ " TS" find-tag if ( adr len )
+ ?-null " SHIP" $= 0= ( in-factory? )
+ else ( )
+ \ Missing TS tag is treated as not in factory test
false
- then ( in-factory? )
- if ( )
- " /prober /usb/ethernet disk:\boot\olpc.fth int:\boot\olpc.fth /xp ext:\boot\olpc.fth /wlan"
- to boot-device
- then ( )
+ then ( in-factory? )
;
: debug-interact ( -- )
@@ -650,7 +646,6 @@
no-page
?factory-mode
-\ ?factory-boot-sequence
disable-user-aborts
console-start
@@ -663,7 +658,7 @@
read-game-keys
- text-off
+ factory-test? 0= if text-off then
" probe-" do-drop-in
@@ -688,7 +683,7 @@
?scan-nand
[then]
?fs-update
- secure-startup
+ factory-test? 0= if secure-startup then
unblock-exceptions
['] (interrupt-auto-boot?) to interrupt-auto-boot?
?usb-keyboard
More information about the openfirmware
mailing list