Changeset 3134

Timestamp:

Aug 8, 2012 9:42:36 AM (10 months ago)

Author:

quozl

Message:

OLPC - oatstime, fix a typo, add name based virtual host support

File:

• cpu/x86/pc/olpc/oatstime.fth (modified) (3 diffs)

cpu/x86/pc/olpc/oatstime.fth

@@ -4 +4 @@
 \ 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
@@ -307 +310 @@
    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$ )
@@ -342 +345 @@
    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>