Author: quozl Date: Wed Aug 8 09:42:36 2012 New Revision: 3134 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/3134
Log: OLPC - oatstime, fix a typo, add name based virtual host support
Modified: cpu/x86/pc/olpc/oatstime.fth
Modified: cpu/x86/pc/olpc/oatstime.fth ============================================================================== --- cpu/x86/pc/olpc/oatstime.fth Wed Aug 8 09:41:24 2012 (r3133) +++ cpu/x86/pc/olpc/oatstime.fth Wed Aug 8 09:42:36 2012 (r3134) @@ -4,6 +4,9 @@ \ Set this to the name or IP address of the deployment's OATS server : server$ " 192.168.200.57" ; \ DNS name or IP address
+\ Set this to the HTTP/1.1 name-based virtual host name of the OATS server +: host$ " antitheft.laptop.org" ; + \ Replace this key with a deployment-specific one create oats-pubkey " "(30 82 01 0a 02 82 01 01 00 cf 2c 9a 49 81 a9 dd)" $, @@ -306,7 +309,7 @@ server$ " set-server" $call-http d# 80 " connect" $call-http 0= abort" Can't connect to server" " POST /antitheft/1/ HTTP/1.1" http-write-line - " Host: antitheft.laptop.org" http-write-line + host$ " Host: %s" sprintf http-write-line " Content-Type: application/x-www-form-urlencoded" http-write-line dup " Content-Length: %d" sprintf http-write-line ( msg$ ) " " http-write-line ( msg$ ) @@ -341,7 +344,7 @@ d# 0 d# 59 numfield >r ( rem$ r: y m d h m ) d# 0 d# 59 numfield >r ( rem$ r: y m d h m s )
- 1 cut$ " Z" $= 0= abort" Expecting T in time" ( rem$ r: y m d h m s ) + 1 cut$ " Z" $= 0= abort" Expecting Z in time" ( rem$ r: y m d h m s ) 0<> abort" Junk after time" drop ( r: y m d h m s ) r> r> r> r> r> r> ;