Author: wmb Date: 2007-09-20 00:17:16 +0200 (Thu, 20 Sep 2007) New Revision: 628
Modified: cpu/x86/pc/olpc/security.fth Log: OLPC security - added new "secure?" value initialized by the presence of the wp tag, instead of calling wp? directly. This will help when developer keys are enabled.
Modified: cpu/x86/pc/olpc/security.fth =================================================================== --- cpu/x86/pc/olpc/security.fth 2007-09-19 09:58:27 UTC (rev 627) +++ cpu/x86/pc/olpc/security.fth 2007-09-19 22:17:16 UTC (rev 628) @@ -510,15 +510,17 @@ go ;
-\ wp? returns true if a "wp" manufacturing data tag is present +false value secure?
-: wp? ( -- flag ) " wp" find-tag dup if nip nip then ; +stand-init: wp + " wp" find-tag if 2drop true to secure? then +;
\ ?secure-boot performs either the secure boot algorithm or the \ historical boot algorithm depending on the presence of a "wp" \ manufacturing data tag.
-: ?secure-boot ( -- ) wp? if secure-boot else boot then ; +: ?secure-boot ( -- ) secure? if secure-boot else boot then ; " ?secure-boot" ' boot-command set-config-string-default