
constant kAboutTitle := "Context Client v0.1";

constant kTCP := 1;

// next action constants
constant kNewSession   := 0;	// initiate new session at next connect
constant kSendData     := 1;	// the normal state in an active session
constant kCloseSession := 2;	// close session at next connect

// inputState constants
constant kReadIdle    := 0;		// default state when no input expected
constant kReadHeader  := 1;		// treat input as HTTP response header until blank line
constant kReadContent := 2;		// treat input as HTTP content


constant kDefaultHost := '["eeyore","wol","129.12.41.217","cs.ukc.ac.uk"];
constant kDefaultPort := '[80, 80, 80, 5282];
constant kDefaultPage := '["/servlets/xmlrpc.FNServlet",
						  "/servlets/xmlrpc.FNServlet",
						  "/servlets/xmlrpc.FNServlet",
						  "/projects/mobicomp/xmlrpc.FNServlet"
						 ];
constant kDefaultDtd := '["http://eeyore/servlets/FieldNote.dtd",
						 "http://wol/servlets/FieldNote.dtd",
						 "http://pcnr.ukc.ac.uk/servlets/FieldNote.dtd",
						 "http://www.cs.ukc.ac.uk/projects/mobicomp/FieldNote.dtd"
						];
