Changeset 3134


Ignore:
Timestamp:
Aug 8, 2012, 9:42:36 AM (3 years ago)
Author:
quozl
Message:

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

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cpu/x86/pc/olpc/oatstime.fth

    r3016 r3134  
    44\ Set this to the name or IP address of the deployment's OATS server
    55: server$  " 192.168.200.57"  ;  \ DNS name or IP address
     6
     7\ Set this to the HTTP/1.1 name-based virtual host name of the OATS server
     8: host$  " antitheft.laptop.org"  ;
    69
    710\ Replace this key with a deployment-specific one
     
    307310   d# 80 " connect" $call-http  0=  abort" Can't connect to server"
    308311   " POST /antitheft/1/ HTTP/1.1" http-write-line
    309    " Host: antitheft.laptop.org" http-write-line
     312   host$ " Host: %s" sprintf http-write-line
    310313   " Content-Type: application/x-www-form-urlencoded" http-write-line
    311314   dup " Content-Length: %d" sprintf http-write-line         ( msg$ )
     
    342345   d#  0 d# 59 numfield  >r                  ( rem$  r: y m d h m s )
    343346
    344    1 cut$  " Z" $= 0= abort" Expecting T in time"  ( rem$  r: y m d h m s )
     347   1 cut$  " Z" $= 0= abort" Expecting Z in time"  ( rem$  r: y m d h m s )
    345348   0<> abort" Junk after time"  drop             ( r: y m d h m s )
    346349   r> r> r> r> r> r>
Note: See TracChangeset for help on using the changeset viewer.