[openfirmware] [commit] r2868 - cpu/x86/pc/olpc/via

[repository service]

Author: quozl
Date: Mon Feb 20 07:51:21 2012
New Revision: 2868
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2868

Log:
OLPC fs-update - split for use by factory scripts

Modified:
   cpu/x86/pc/olpc/via/fsupdate.fth

Modified: cpu/x86/pc/olpc/via/fsupdate.fth
==============================================================================
--- cpu/x86/pc/olpc/via/fsupdate.fth	Wed Feb 15 09:11:51 2012	(r2867)
+++ cpu/x86/pc/olpc/via/fsupdate.fth	Mon Feb 20 07:51:21 2012	(r2868)
@@ -216,13 +216,13 @@
 
 previous definitions
 
-: fs-update  ( "devspec" -- )
+: $fs-update  ( file$ -- )
    load-crypto  abort" Can't load hash routines"
 
-   open-nand                           ( )
+   open-nand                           ( file$ )
 
-   false to secure-fsupdate?           ( )
-   safe-parse-word r/o open-file       ( fd error? )
+   false to secure-fsupdate?           ( file$ )
+   r/o open-file                       ( fd error? )
    " Can't open file" ?nand-abort      ( fd )
 
    linefeed over force-line-delimiter  ( fd )
@@ -240,6 +240,10 @@
    )t-hms
 ;
 
+: fs-update  ( "devspec" -- )
+   safe-parse-word $fs-update
+;
+
 : do-fs-update  ( img$ -- )
    tuck  load-base h# c00000 +  swap move  ( len )
    load-base h# c00000 + swap              ( adr len )