Changeset 3205


Ignore:
Timestamp:
Aug 20, 2012, 12:37:59 PM (2 years ago)
Author:
quozl
Message:

OLPC - fs-update, use zdata file size not spec file size for sanity-check, #12055

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cpu/x86/pc/olpc/via/fsupdate.fth

    r3204 r3205  
    134134; 
    135135 
     1360 2value file-bytes 
    136137: data:  ( "filename" -- ) 
    137138   safe-parse-word            ( filename$ ) 
     
    147148      true " " ?nand-abort 
    148149   then  to filefd            ( ) 
     150   filefd file-size " Can't size file" ?nand-abort  to file-bytes 
    149151   linefeed filefd force-line-delimiter 
    150152   true to secure-fsupdate? 
    151153; 
    152154 
    153 0 2value file-bytes 
    154155: size:  ( "bytes" -- ) 
    155156   ?compare-spec-line 
     
    308309 
    309310   ['] open-nand  catch  ?dup  if  .error  security-failure  then  ( adr len ) 
    310  
    311    [ also nand-commands ] dup s>d to file-bytes [ previous ] 
    312311 
    313312\  clear-context  nand-commands 
Note: See TracChangeset for help on using the changeset viewer.