http_parser.rb 0.5.0

data/ext/ruby_http_parser/vendor/http-parser-java/http_parser.h

@@ -0,0 +1,167 @@
+/* Copyright 2009,2010 Ryan Dahl <ry@tinyclouds.org>
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a copy
+ * of this software and associated documentation files (the "Software"), to
+ * deal in the Software without restriction, including without limitation the
+ * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
+ * sell copies of the Software, and to permit persons to whom the Software is
+ * furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+ * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+ * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
+ * IN THE SOFTWARE.
+ */
+#ifndef http_parser_h
+#define http_parser_h
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+
+#include <sys/types.h>
+#include <stdint.h>
+
+#ifdef _WIN32
+typedef unsigned int size_t;
+typedef int ssize_t;
+#endif
+
+/* Compile with -DHTTP_PARSER_STRICT=0 to make less checks, but run
+ * faster
+ */
+#ifndef HTTP_PARSER_STRICT
+# define HTTP_PARSER_STRICT 1
+#else
+# define HTTP_PARSER_STRICT 0
+#endif
+
+
+/* Maximium header size allowed */
+#define HTTP_MAX_HEADER_SIZE (80*1024)
+
+
+typedef struct http_parser http_parser;
+typedef struct http_parser_settings http_parser_settings;
+
+
+/* Callbacks should return non-zero to indicate an error. The parser will
+ * then halt execution.
+ *
+ * The one exception is on_headers_complete. In a HTTP_RESPONSE parser
+ * returning '1' from on_headers_complete will tell the parser that it
+ * should not expect a body. This is used when receiving a response to a
+ * HEAD request which may contain 'Content-Length' or 'Transfer-Encoding:
+ * chunked' headers that indicate the presence of a body.
+ *
+ * http_data_cb does not return data chunks. It will be call arbitrarally
+ * many times for each string. E.G. you might get 10 callbacks for "on_path"
+ * each providing just a few characters more data.
+ */
+typedef int (*http_data_cb) (http_parser*, const char *at, size_t length);
+typedef int (*http_cb) (http_parser*);
+
+
+/* Request Methods */
+enum http_method
+  { HTTP_DELETE    = 0
+  , HTTP_GET
+  , HTTP_HEAD
+  , HTTP_POST
+  , HTTP_PUT
+  /* pathological */
+  , HTTP_CONNECT
+  , HTTP_OPTIONS
+  , HTTP_TRACE
+  /* webdav */
+  , HTTP_COPY
+  , HTTP_LOCK
+  , HTTP_MKCOL
+  , HTTP_MOVE
+  , HTTP_PROPFIND
+  , HTTP_PROPPATCH
+  , HTTP_UNLOCK
+  /* subversion */
+  , HTTP_REPORT
+  , HTTP_MKACTIVITY
+  , HTTP_CHECKOUT
+  , HTTP_MERGE
+  };
+
+
+enum http_parser_type { HTTP_REQUEST, HTTP_RESPONSE, HTTP_BOTH };
+
+
+struct http_parser {
+  /** PRIVATE **/
+  unsigned char type : 2;
+  unsigned char flags : 6;
+  unsigned char state;
+  unsigned char header_state;
+  unsigned char index;
+
+  uint32_t nread;
+  int64_t content_length;
+
+  /** READ-ONLY **/
+  unsigned short http_major;
+  unsigned short http_minor;
+  unsigned short status_code; /* responses only */
+  unsigned char method;    /* requests only */
+
+  /* 1 = Upgrade header was present and the parser has exited because of that.
+   * 0 = No upgrade header present.
+   * Should be checked when http_parser_execute() returns in addition to
+   * error checking.
+   */
+  char upgrade;
+
+  /** PUBLIC **/
+  void *data; /* A pointer to get hook to the "connection" or "socket" object */
+};
+
+
+struct http_parser_settings {
+  http_cb      on_message_begin;
+  http_data_cb on_path;
+  http_data_cb on_query_string;
+  http_data_cb on_url;
+  http_data_cb on_fragment;
+  http_data_cb on_header_field;
+  http_data_cb on_header_value;
+  http_cb      on_headers_complete;
+  http_data_cb on_body;
+  http_cb      on_message_complete;
+};
+
+
+void http_parser_init(http_parser *parser, enum http_parser_type type);
+
+
+size_t http_parser_execute(http_parser *parser,
+                           const http_parser_settings *settings,
+                           const char *data,
+                           size_t len);
+
+
+/* If http_should_keep_alive() in the on_headers_complete or
+ * on_message_complete callback returns true, then this will be should be
+ * the last message on the connection.
+ * If you are the server, respond with the "Connection: close" header.
+ * If you are the client, close the connection.
+ */
+int http_should_keep_alive(http_parser *parser);
+
+/* Returns a string version of the HTTP method. */
+const char *http_method_str(enum http_method);
+
+#ifdef __cplusplus
+}
+#endif
+#endif

data/ext/ruby_http_parser/vendor/http-parser-java/src/impl/http_parser/HTTPException.java

@@ -0,0 +1,7 @@
+package http_parser;
+
+public class HTTPException extends RuntimeException {
+  public HTTPException(String mes) {
+    super(mes);
+  }
+}

data/ext/ruby_http_parser/vendor/http-parser-java/src/impl/http_parser/HTTPMethod.java

@@ -0,0 +1,90 @@
+package http_parser;
+
+import java.nio.charset.Charset;
+
+public enum HTTPMethod {
+    HTTP_DELETE("DELETE")//    = 0
+  , HTTP_GET("GET")
+  , HTTP_HEAD("HEAD")
+  , HTTP_POST("POST")
+  , HTTP_PUT("PUT")
+  /* pathological */
+  , HTTP_CONNECT("CONNECT")
+  , HTTP_OPTIONS("OPTIONS")
+  , HTTP_TRACE("TRACE")
+  /* webdav */
+  , HTTP_COPY("COPY")
+  , HTTP_LOCK("LOCK")
+  , HTTP_MKCOL("MKCOL")
+  , HTTP_MOVE("MOVE")
+  , HTTP_PROPFIND("PROPFIND")
+  , HTTP_PROPPATCH("PROPPATCH")
+  , HTTP_UNLOCK("UNLOCK")
+  , HTTP_REPORT("REPORT")
+  , HTTP_MKACTIVITY("MKACTIVITY")
+  , HTTP_CHECKOUT("CHECKOUT")
+  , HTTP_MERGE("MERGE");
+
+	private static Charset ASCII;
+	static {
+		ASCII = Charset.forName("US-ASCII");;
+	}
+	public byte[] bytes;
+
+	HTTPMethod(String name) {
+		// good grief, Charlie Brown, the following is necessary because 
+		// java is retarded:
+		// illegal reference to static field from initializer
+    //            this.bytes = name.getBytes(ASCII);
+		// yet it's not illegal to reference static fields from
+		// methods called from initializer.
+		init(name);
+	}
+	public static HTTPMethod parse(String s) {
+				 if ("HTTP_DELETE".equalsIgnoreCase(s))  {return HTTP_DELETE;}
+		else if ("DELETE".equalsIgnoreCase(s))       {return HTTP_DELETE;}
+		else if ("HTTP_GET".equalsIgnoreCase(s))     {return HTTP_GET;}
+		else if ("GET".equalsIgnoreCase(s))          {return HTTP_GET;}
+		else if ("HTTP_HEAD".equalsIgnoreCase(s))    {return HTTP_HEAD;}
+		else if ("HEAD".equalsIgnoreCase(s))         {return HTTP_HEAD;}
+		else if ("HTTP_POST".equalsIgnoreCase(s))    {return HTTP_POST;}
+		else if ("POST".equalsIgnoreCase(s))         {return HTTP_POST;}
+		else if ("HTTP_PUT".equalsIgnoreCase(s))     {return HTTP_PUT;}
+		else if ("PUT".equalsIgnoreCase(s))          {return HTTP_PUT;}
+		else if ("HTTP_CONNECT".equalsIgnoreCase(s)) {return HTTP_CONNECT;}
+		else if ("CONNECT".equalsIgnoreCase(s))      {return HTTP_CONNECT;}
+		else if ("HTTP_OPTIONS".equalsIgnoreCase(s)) {return HTTP_OPTIONS;}
+		else if ("OPTIONS".equalsIgnoreCase(s))      {return HTTP_OPTIONS;}
+		else if ("HTTP_TRACE".equalsIgnoreCase(s))   {return HTTP_TRACE;}
+		else if ("TRACE".equalsIgnoreCase(s))        {return HTTP_TRACE;}
+		else if ("HTTP_COPY".equalsIgnoreCase(s))    {return HTTP_COPY;}
+		else if ("COPY".equalsIgnoreCase(s))         {return HTTP_COPY;}
+		else if ("HTTP_LOCK".equalsIgnoreCase(s))    {return HTTP_LOCK;}
+		else if ("LOCK".equalsIgnoreCase(s))         {return HTTP_LOCK;}
+		else if ("HTTP_MKCOL".equalsIgnoreCase(s))   {return HTTP_MKCOL;}
+		else if ("MKCOL".equalsIgnoreCase(s))        {return HTTP_MKCOL;}
+		else if ("HTTP_MOVE".equalsIgnoreCase(s))    {return HTTP_MOVE;}
+		else if ("MOVE".equalsIgnoreCase(s))         {return HTTP_MOVE;}
+		else if ("HTTP_PROPFIND".equalsIgnoreCase(s)){return HTTP_PROPFIND;}
+		else if ("PROPFIND".equalsIgnoreCase(s))     {return HTTP_PROPFIND;}
+		else if ("HTTP_PROPPATCH".equalsIgnoreCase(s)){return HTTP_PROPPATCH;}
+		else if ("PROPPATCH".equalsIgnoreCase(s))    {return HTTP_PROPPATCH;}
+		else if ("HTTP_UNLOCK".equalsIgnoreCase(s))  {return HTTP_UNLOCK;}
+		else if ("UNLOCK".equalsIgnoreCase(s))       {return HTTP_UNLOCK;}
+    else if ("HTTP_REPORT".equalsIgnoreCase(s)) {return HTTP_REPORT;}
+    else if ("REPORT".equalsIgnoreCase(s)){return HTTP_REPORT;}
+    else if ("HTTP_MKACTIVITY".equalsIgnoreCase(s)) {return HTTP_MKACTIVITY;}
+    else if ("MKACTIVITY".equalsIgnoreCase(s)){return HTTP_MKACTIVITY;}
+    else if ("HTTP_CHECKOUT".equalsIgnoreCase(s)) {return HTTP_CHECKOUT;}
+    else if ("CHECKOUT".equalsIgnoreCase(s)){return HTTP_CHECKOUT;}
+    else if ("HTTP_MERGE".equalsIgnoreCase(s)) {return HTTP_MERGE;}
+    else if ("MERGE".equalsIgnoreCase(s)){return HTTP_MERGE;}
+
+	  else                                         {return null;}
+	}	
+	void init (String name) {
+		ASCII = null == ASCII ? Charset.forName("US-ASCII") : ASCII;
+		this.bytes = name.getBytes(ASCII);
+	}
+
+}

data/ext/ruby_http_parser/vendor/http-parser-java/src/impl/http_parser/HTTPParser.java

@@ -0,0 +1,31 @@
+package http_parser;
+
+public class HTTPParser extends http_parser.lolevel.HTTPParser {
+  
+  public HTTPParser() { super(); }
+  public HTTPParser(ParserType type) { super(type); }
+
+  public int getMajor() {
+    return super.http_major;
+  }
+
+  public int getMinor() {
+    return super.http_minor;
+  }
+
+  public int getStatusCode() {
+    return super.status_code;
+  }
+
+  public HTTPMethod getHTTPMethod() {
+    return super.method;
+  }
+
+  public boolean getUpgrade() {
+    return super.upgrade;
+  }
+  
+  public boolean shouldKeepAlive() {
+    return super.http_should_keep_alive();
+  }
+} 

data/ext/ruby_http_parser/vendor/http-parser-java/src/impl/http_parser/ParserType.java

@@ -0,0 +1,13 @@
+package http_parser;
+
+public enum ParserType {
+HTTP_REQUEST, HTTP_RESPONSE, HTTP_BOTH;
+
+	public static ParserType parse(String s) {
+		     if ("HTTP_REQUEST".equalsIgnoreCase(s))  { return HTTP_REQUEST; }
+		else if ("HTTP_RESPONSE".equalsIgnoreCase(s)) { return HTTP_RESPONSE; }
+		else if ("HTTP_BOTH".equalsIgnoreCase(s))     { return HTTP_BOTH; }
+		else                                          { return null; }
+	}
+}
+

data/ext/ruby_http_parser/vendor/http-parser-java/src/impl/http_parser/lolevel/HTTPCallback.java

@@ -0,0 +1,5 @@
+package http_parser.lolevel;
+
+public interface HTTPCallback {
+	public int cb (HTTPParser parser);
+}

data/ext/ruby_http_parser/vendor/http-parser-java/src/impl/http_parser/lolevel/HTTPDataCallback.java

@@ -0,0 +1,25 @@
+package http_parser.lolevel;
+
+import java.nio.ByteBuffer;
+
+public interface HTTPDataCallback {
+	/*
+		very raw and extremly foolhardy! DANGER!
+		The whole Buffer concept is difficult enough to grasp as it is,
+		we pass in a buffer with an arbitrary position.
+
+		The interesting data is located at position pos and is len 
+		bytes long.
+		
+		The contract of this callback is that the buffer is
+		returned in the state that it was passed in, so implementing
+		this require good citizenship, you'll need to remember the current
+		position, change the position to get at the data you're interested 
+		in and then set the position back to how you found it...
+
+		//TODO: there should be an abstract implementation that implements
+		cb as described above, marks it final an provides a new callback
+		with signature cb(byte[], int, int)
+	*/
+	public int cb(HTTPParser p, ByteBuffer buf, int pos, int len);
+}

data/ext/ruby_http_parser/vendor/http-parser-java/src/impl/http_parser/lolevel/HTTPErrorCallback.java

@@ -0,0 +1,7 @@
+package http_parser.lolevel;
+
+import java.nio.ByteBuffer;
+
+public interface HTTPErrorCallback {
+	public void cb (HTTPParser parser, String mes, ByteBuffer buf, int initial_position);
+}

data/ext/ruby_http_parser/vendor/http-parser-java/src/impl/http_parser/lolevel/HTTPParser.java

@@ -0,0 +1,1894 @@
+package http_parser.lolevel;
+
+import java.nio.ByteBuffer;
+import http_parser.HTTPException;
+import http_parser.HTTPMethod;
+import http_parser.ParserType;
+import static http_parser.lolevel.HTTPParser.C.*;
+import static http_parser.lolevel.HTTPParser.State.*;
+
+public class  HTTPParser {
+	/* lots of unsigned chars here, not sure what
+	   to about them, `bytes` in java suck...  */
+
+	ParserType type;
+	State state;
+	HState header_state;
+  boolean strict;
+
+	int index; 
+	int flags; // TODO
+
+	int nread;
+	int content_length;
+
+	
+  /** READ-ONLY **/
+  protected int http_major;
+  protected int http_minor;
+  protected int status_code;   /* responses only */
+  protected HTTPMethod method; /* requests only */
+
+  /* true  = Upgrade header was present and the parser has exited because of that.
+   * false = No upgrade header present.
+   * Should be checked when http_parser_execute() returns in addition to
+   * error checking.
+   */
+  protected boolean upgrade; 
+
+  /** PUBLIC **/
+	// TODO : this is used in c to maintain application state.
+	// is this even necessary? we have state in java ?
+	// consider 
+  // Object data; /* A pointer to get hook to the "connection" or "socket" object */
+			
+
+  /* 
+   * technically we could combine all of these (except for url_mark) into one
+   * variable, saving stack space, but it seems more clear to have them
+   * separated. 
+   */
+  int header_field_mark = -1;
+  int header_value_mark = -1;
+  int fragment_mark = -1;
+  int query_string_mark = -1;
+  int path_mark = -1;
+  int url_mark = -1;
+	
+  /**
+   * Construct a Parser for ParserType.HTTP_BOTH, meaning it
+   * determines whether it's parsing a request or a response.
+   */
+	public HTTPParser() {
+		this(ParserType.HTTP_BOTH);
+	}
+	
+  /**
+   * Construct a Parser and initialise it to parse either 
+   * requests or responses.
+   */
+	public HTTPParser(ParserType type) {
+		this.type  = type;
+		switch(type) {
+			case HTTP_REQUEST:
+				this.state = State.start_req;
+				break;
+			case HTTP_RESPONSE:
+				this.state = State.start_res;
+				break;
+			case HTTP_BOTH:
+				this.state = State.start_res_or_res;
+				break;
+			default:
+				throw new HTTPException("can't happen, invalid ParserType enum");
+		}
+	}
+	
+  /*
+   * Utility to facilitate System.out.println style debugging (the way god intended)
+   */
+	static void p(Object o) {System.out.println(o);}
+
+
+  /** Execute the parser with the currently available data contained in
+   * the buffer. The buffers position() and limit() need to be set
+   * correctly (obviously) and a will be updated approriately when the
+   * method returns to reflect the consumed data.
+   */
+  public void execute(ParserSettings settings, ByteBuffer data) {
+
+    int p     = data.position();
+    int p_err = p; // this is used for pretty printing errors.
+
+    // In case the headers don't provide information about the content
+    // length, `execute` needs to be called with an empty buffer to
+    // indicate that all the data has been send be the client/server,
+    // else there is no way of knowing the message is complete. 
+    int len = (data.limit() - data.position());
+		if (0 == len) {
+			if (State.body_identity_eof == state) {
+				settings.call_on_message_complete(this);
+			}
+		}
+
+		
+    // in case the _previous_ call to the parser only has data to get to
+    // the middle of certain fields, we need to update marks to point at
+    // the beginning of the current buffer.
+    switch (state) {
+      case header_field:
+        header_field_mark = p;
+        break;
+      case header_value:
+        header_value_mark = p;
+        break;
+      case req_fragment:
+        fragment_mark = p;
+        url_mark = p;
+        break;
+      case req_query_string:
+        query_string_mark = p;
+        url_mark = p;
+        break;
+      case req_path:
+        path_mark = p;
+
+      case req_host:
+      case req_schema:
+      case req_schema_slash:
+      case req_schema_slash_slash:
+      case req_port:
+      case req_query_string_start:
+      case req_fragment_start:
+        url_mark = p;
+        break;
+    }
+
+    // this is where the work gets done, traverse the available data...
+    while (data.position() != data.limit()) {
+
+            p = data.position();
+      int  pe = data.limit();
+
+      byte ch     = data.get();           // the current character to process.
+      byte c      = -1;                   // utility variably used for up- and downcasing etc.
+      int to_read =  0;                   // used to keep track of how much of body, etc. is left to read
+
+      if (parsing_header(state)) {
+        ++nread;
+        if (nread > HTTP_MAX_HEADER_SIZE) {
+          settings.call_on_error(this, "possible buffer overflow", data, p_err);
+        }
+      }
+
+      switch (state) {
+         /*
+          * this state is used after a 'Connection: close' message
+          * the parser will error out if it reads another message
+          */
+        case dead:
+          settings.call_on_error(this, "Connection already closed", data, p_err);
+
+
+
+        case start_res_or_res:
+          if (CR == ch || LF == ch){
+            break;
+          }
+          flags = 0;
+          content_length = -1;
+
+          settings.call_on_message_begin(this);
+          
+          if (H == ch) { 
+            state = State.res_or_resp_H;
+          } else {
+            type   = ParserType.HTTP_REQUEST;  
+            method = start_req_method_assign(ch);     
+            if (null == method) {
+              settings.call_on_error(this, "invalid method", data, p_err);
+            }
+            index  = 1;
+            state  = State.req_method;
+          }
+          break;
+
+
+
+        case res_or_resp_H:
+          if (T == ch) {
+            type  = ParserType.HTTP_RESPONSE;
+            state = State.res_HT;
+          } else {
+            if (E != ch) {
+              settings.call_on_error(this, "not E", data, p_err);
+            }
+            type   = ParserType.HTTP_REQUEST;
+            method = HTTPMethod.HTTP_HEAD;
+            index  = 2;
+            state  = State.req_method;
+          }
+          break;
+
+
+
+        case start_res:
+          flags = 0;
+          content_length = -1;
+
+          settings.call_on_message_begin(this);
+          
+          switch(ch) {
+            case H:
+              state = State.res_H;
+              break;
+            case CR:
+            case LF:
+              break;
+            default:
+              settings.call_on_error(this, "Not H or CR/LF", data, p_err);
+          }
+          break;
+
+
+
+        case res_H:
+          if (strict && T != ch) {
+            settings.call_on_error(this, "Not T", data, p_err);
+          }
+          state = State.res_HT;
+          break;
+        case res_HT:
+          if (strict && T != ch) {
+            settings.call_on_error(this, "Not T2", data, p_err);
+          }
+          state = State.res_HTT;
+          break;
+        case res_HTT:
+          if (strict && P != ch) {
+            settings.call_on_error(this, "Not P", data, p_err);
+          }
+          state = State.res_HTTP;
+          break;
+        case res_HTTP:
+          if (strict && SLASH != ch) {
+            settings.call_on_error(this, "Not '/'", data, p_err);
+          }
+          state = State.res_first_http_major;
+          break;
+
+
+
+        case res_first_http_major:
+          if (!isDigit(ch)) {
+            settings.call_on_error(this, "Not a digit", data, p_err);
+          }
+          http_major = (int) ch - 0x30;
+          state = State.res_http_major;
+          break;
+
+        /* major HTTP version or dot */
+        case res_http_major:
+          if (DOT == ch) {
+            state = State.res_http_minor;
+            break;
+          }
+          if (!isDigit(ch)) {
+            settings.call_on_error(this, "Not a digit", data, p_err);
+          }
+          http_major *= 10;
+          http_major += (ch - 0x30);
+
+          if (http_major > 999) {
+            settings.call_on_error(this, "invalid http major version: "+http_major, data, p_err);
+          }
+          break;
+          
+        /* first digit of minor HTTP version */
+        case res_first_http_minor:
+          if (!isDigit(ch)) {
+            settings.call_on_error(this, "Not a digit", data, p_err);
+          }
+          http_minor = (int)ch - 0x30;
+          state = State.res_http_minor;
+          break;
+
+        /* minor HTTP version or end of request line */
+        case res_http_minor:
+          if (SPACE == ch) {
+            state = State.res_first_status_code;
+            break;
+          }
+          if (!isDigit(ch)) {
+            settings.call_on_error(this, "Not a digit", data, p_err);
+          }
+          http_minor *= 10;
+          http_minor += (ch - 0x30);
+
+          if (http_minor > 999) {
+            settings.call_on_error(this, "invalid http minor version: "+http_minor, data, p_err);
+          }
+          break;
+
+
+
+        case res_first_status_code:
+          if (!isDigit(ch)) {
+            if (SPACE == ch) {
+              break;
+            }
+            settings.call_on_error(this, "Not a digit (status code)", data, p_err);
+          }
+          status_code = (int)ch - 0x30;
+          state = State.res_status_code;
+          break;
+
+        case res_status_code:
+          if (!isDigit(ch)) {
+            switch(ch) {
+              case SPACE:
+                state = State.res_status;
+                break;
+              case CR:
+                state = State.res_line_almost_done;
+                break;
+              case LF:
+                state = State.header_field_start;
+                break;
+              default:
+                settings.call_on_error(this, "not a valid status code", data, p_err);
+            }
+            break;
+          }
+          status_code *= 10;
+          status_code += (int)ch - 0x30;
+          if (status_code > 999) {
+            settings.call_on_error(this, "ridiculous status code:"+status_code, data, p_err);
+          }
+          break;
+
+        case res_status:
+          /* the human readable status. e.g. "NOT FOUND"
+           * we are not humans so just ignore this 
+           * we are not men, we are devo. */
+
+           if (CR == ch) {
+            state = State.res_line_almost_done;
+            break;
+           }
+           if (LF == ch) { 
+            state = State.header_field_start;
+            break;
+           }
+           break;
+
+        case res_line_almost_done:
+          if (strict && LF != ch) {
+            settings.call_on_error(this, "not LF", data, p_err);
+          }
+          state = State.header_field_start;
+          break;
+
+
+
+        case start_req:
+          if (CR==ch || LF == LF) {
+            break;
+          }
+          flags = 0;
+          content_length = -1;
+          settings.call_on_message_begin(this);
+          method = start_req_method_assign(ch);
+          if (null == method) {
+            settings.call_on_error(this, "invalid method", data, p_err);
+          }
+          index  = 1;
+          state  = State.req_method;
+          break;
+        
+
+
+        case req_method:
+          if (0 == ch) {
+            settings.call_on_error(this, "NULL in method", data, p_err);
+          }
+          
+          byte [] arr = method.bytes;
+
+          if (SPACE == ch && index == arr.length) {
+            state = State.req_spaces_before_url;
+          } else if (arr[index] == ch) {
+            // wuhu!
+          } else if (HTTPMethod.HTTP_CONNECT == method) {
+              if (1 == index && H == ch) {
+                method = HTTPMethod.HTTP_CHECKOUT;
+              } else if (2 == index && P == ch) {
+                method = HTTPMethod.HTTP_COPY;
+              }
+          } else if (HTTPMethod.HTTP_MKCOL == method) {
+              if        (1 == index && O == ch) {
+                method = HTTPMethod.HTTP_MOVE;
+              } else if (1 == index && E == ch) {
+                method = HTTPMethod.HTTP_MERGE;
+              } else if (2 == index && A == ch) {
+                method = HTTPMethod.HTTP_MKACTIVITY;
+              }
+          } else if (1 == index && HTTPMethod.HTTP_POST     == method && R == ch) {
+            method = HTTPMethod.HTTP_PROPFIND;
+          } else if (1 == index && HTTPMethod.HTTP_POST     == method && U == ch) {
+            method = HTTPMethod.HTTP_PUT;
+          } else if (4 == index && HTTPMethod.HTTP_PROPFIND == method && P == ch) {
+            method = HTTPMethod.HTTP_PROPPATCH;
+          } else {
+            settings.call_on_error(this, "Invalid HTTP method", data, p_err);
+          }
+
+          ++index;
+          break;
+      
+
+
+        /******************* URL *******************/
+        case req_spaces_before_url:
+          if (SPACE == ch) {
+            break;
+          }
+          if (SLASH == ch) {
+            url_mark  = p;
+            path_mark = p;
+            state = State.req_path;
+            break;
+          }
+          if (isAtoZ(ch)) {
+            url_mark = p;
+            state = State.req_schema;
+            break;
+          }
+          settings.call_on_error(this, "Invalid something", data, p_err);
+
+        case req_schema:
+          if (isAtoZ(ch)){
+            break;
+          }
+          if (COLON == ch) {
+            state = State.req_schema_slash;
+            break;
+          } else if (DOT == ch) {
+            state = State.req_host;
+            break;
+          }
+          settings.call_on_error(this, "invalid char in schema: "+ch, data, p_err);
+
+        case req_schema_slash:
+          if (strict && SLASH != ch) {
+            settings.call_on_error(this, "invalid char in schema, not /", data, p_err);
+          }
+          state = State.req_schema_slash_slash;
+          break;
+
+        case req_schema_slash_slash:
+          if (strict && SLASH != ch) {
+            settings.call_on_error(this, "invalid char in schema, not /", data, p_err);
+          }
+          state = State.req_host;
+          break;
+        
+        case req_host:
+          if (isAtoZ(ch)) {
+            break;
+          }	
+          if (isDigit(ch) || DOT == ch || DASH == ch) break;
+          switch (ch) {
+            case COLON:
+              state = State.req_port;
+              break;
+            case SLASH:
+              path_mark = p;
+              break;
+            case SPACE:
+              /* The request line looks like:
+               *   "GET http://foo.bar.com HTTP/1.1"
+               * That is, there is no path.
+               */
+              settings.call_on_url(this, data, url_mark, p-url_mark);
+              url_mark = -1;
+              state = State.req_http_start;
+              break;
+            default:
+              settings.call_on_error(this, "host error in method line", data, p_err);
+          }
+          break;
+
+        case req_port:
+          if (isDigit(ch)) break;
+          switch (ch) {
+            case SLASH:
+              path_mark = p; 
+              state = State.req_path;
+              break;
+            case SPACE:
+              /* The request line looks like:
+               *   "GET http://foo.bar.com:1234 HTTP/1.1"
+               * That is, there is no path.
+               */
+              settings.call_on_url(this,data,url_mark,p-url_mark);
+              url_mark = -1;
+              state = State.req_http_start;
+              break;
+            default:
+              settings.call_on_error(this, "invalid port", data, p_err);
+          }
+          break;
+      
+        case req_path:
+          if (normal_url_char[ch]) break;
+          switch (ch) {
+            case SPACE:
+              settings.call_on_url(this,data,url_mark, p-url_mark);
+              url_mark = -1;
+
+              settings.call_on_path(this,data,path_mark, p-path_mark);
+              path_mark = -1;
+              
+              state = State.req_http_start;
+              break;
+
+            case CR:
+              settings.call_on_url(this,data,url_mark, p-url_mark);
+              url_mark = -1;
+              
+              settings.call_on_path(this,data,path_mark, p-path_mark);
+              path_mark = -1;
+              
+              http_minor = 9;
+              state = State.res_line_almost_done;
+              break;
+
+            case LF:
+              settings.call_on_url(this,data,url_mark, p-url_mark);
+              url_mark = -1;
+              
+              settings.call_on_path(this,data,path_mark, p-path_mark);
+              path_mark = -1;
+              
+              http_minor = 9;
+              state = State.header_field_start;
+              break;
+
+            case QMARK:
+              settings.call_on_path(this,data,path_mark, p-path_mark);
+              path_mark = -1;
+              
+              state = State.req_query_string_start;
+              break;
+            
+            case HASH:
+              settings.call_on_path(this,data,path_mark, p-path_mark);
+              path_mark = -1;
+              
+              state = State.req_fragment_start;
+              break;
+            
+            default:
+              settings.call_on_error(this, "unexpected char in path", data, p_err);
+          }
+          break;
+      
+        case req_query_string_start:
+          if (normal_url_char[ch]) {
+            query_string_mark = p;
+            state = State.req_query_string;
+            break;
+          }
+
+          switch (ch) {
+            case QMARK: break;
+            case SPACE: 
+              settings.call_on_url(this, data, url_mark, p-url_mark);
+              url_mark = -1;
+              state = State.req_http_start;
+              break;
+            case CR:
+              settings.call_on_url(this,data,url_mark, p-url_mark);
+              url_mark = -1; 
+              http_minor = 9;
+              state = State.res_line_almost_done;
+              break;
+            case LF:
+              settings.call_on_url(this,data,url_mark, p-url_mark);
+              url_mark = -1;
+              http_minor = 9;
+              state = State.header_field_start;
+              break;
+            case HASH:
+              state = State.req_fragment_start;
+              break;
+            default:
+              settings.call_on_error(this, "unexpected char in path", data, p_err);
+          }
+          break;
+        
+        case req_query_string:
+          if (normal_url_char[ch]) {
+            break;
+          }
+
+          switch (ch) {
+            case QMARK: break; // allow extra '?' in query string
+            case SPACE: 
+              settings.call_on_url(this, data, url_mark, p-url_mark);
+              url_mark = -1;
+
+              settings.call_on_query_string(this, data, query_string_mark, p-query_string_mark);
+              query_string_mark = -1;
+
+              state = State.req_http_start;
+              break;
+            case CR:
+              settings.call_on_url(this,data,url_mark, p-url_mark);
+              url_mark = -1; 
+
+              settings.call_on_query_string(this, data, query_string_mark, p-query_string_mark);
+              query_string_mark = -1;
+              
+              http_minor = 9;
+              state = State.res_line_almost_done;
+              break;
+            case LF:
+              settings.call_on_url(this,data,url_mark, p-url_mark);
+              url_mark = -1;
+
+              settings.call_on_query_string(this, data, query_string_mark, p-query_string_mark);
+              query_string_mark = -1;
+              http_minor = 9;
+
+              state = State.header_field_start;
+              break;
+            case HASH:
+              settings.call_on_query_string(this, data, query_string_mark, p-query_string_mark);
+              query_string_mark = -1;
+              
+              state = State.req_fragment_start;
+              break;
+            default:
+              settings.call_on_error(this, "unexpected char in path", data, p_err);
+          }
+          break;
+
+        case req_fragment_start:
+          if (normal_url_char[ch]) {
+            fragment_mark = p;
+            state = State.req_fragment;
+            break;
+          }
+
+          switch (ch) {
+            case SPACE: 
+              settings.call_on_url(this, data, url_mark, p-url_mark);
+              url_mark = -1;
+     
+              state = State.req_http_start;
+              break;
+            case CR:
+              settings.call_on_url(this,data,url_mark, p-url_mark);
+              url_mark = -1; 
+
+              http_minor = 9;
+              state = State.res_line_almost_done;
+              break;
+            case LF:
+              settings.call_on_url(this,data,url_mark, p-url_mark);
+              url_mark = -1;
+              
+              http_minor = 9;
+              state = State.header_field_start;
+              break;
+            case QMARK:
+              fragment_mark = p;
+              state = State.req_fragment;
+              break;
+            case HASH:
+              break;
+            default:
+              settings.call_on_error(this, "unexpected char in path", data, p_err);
+          }
+          break;
+
+        case req_fragment:
+          if (normal_url_char[ch]) {
+            break;
+          }
+
+          switch (ch) {
+            case SPACE: 
+              settings.call_on_url(this, data, url_mark, p-url_mark);
+              url_mark = -1;
+          
+              settings.call_on_fragment(this, data, fragment_mark, p-fragment_mark);
+              fragment_mark = -1;
+              
+              state = State.req_http_start;
+              break;
+            case CR:
+              settings.call_on_url(this,data,url_mark, p-url_mark);
+              url_mark = -1; 
+              
+              settings.call_on_fragment(this, data, query_string_mark, p-query_string_mark);
+              fragment_mark = -1;
+              
+              http_minor = 9;
+              state = State.res_line_almost_done;
+              break;
+            case LF:
+              settings.call_on_url(this,data,url_mark, p-url_mark);
+              url_mark = -1;
+              
+              settings.call_on_fragment(this, data, query_string_mark, p-query_string_mark);
+              fragment_mark = -1;
+              
+              http_minor = 9;
+              state = State.header_field_start;
+              break;
+            case QMARK:
+            case HASH:
+              break;
+            default:
+              settings.call_on_error(this, "unexpected char in path", data, p_err);
+          }
+          break;
+        /******************* URL *******************/
+
+
+
+        /******************* HTTP 1.1 *******************/
+        case req_http_start:
+          switch (ch) {
+            case H:
+              state = State.req_http_H;
+              break;
+            case SPACE:
+              break;
+            default:
+              settings.call_on_error(this, "error in req_http_H", data, p_err);
+          }
+          break;
+
+        case req_http_H:
+          if (strict && T != ch) {
+            settings.call_on_error(this, "unexpected char", data, p_err);
+          }
+          state = State.req_http_HT;
+          break;
+
+        case req_http_HT:
+          if (strict && T != ch) {
+            settings.call_on_error(this, "unexpected char", data, p_err);
+          }
+          state = State.req_http_HTT;
+          break;
+
+        case req_http_HTT:
+          if (strict && P != ch) {
+            settings.call_on_error(this, "unexpected char", data, p_err);
+          }
+          state = State.req_http_HTTP;
+          break;
+
+        case req_http_HTTP:
+          if (strict && SLASH != ch) {
+            settings.call_on_error(this, "unexpected char", data, p_err);
+          }
+          state = req_first_http_major;
+          break;
+
+        /* first digit of major HTTP version */
+        case req_first_http_major:
+          if (!isDigit(ch)) {
+            settings.call_on_error(this, "non digit in http major", data, p_err);
+          }
+          http_major = (int)ch - 0x30;
+          state = State.req_http_major;
+          break;
+
+        /* major HTTP version or dot */
+        case req_http_major:
+          if (DOT == ch) {
+            state = State.req_first_http_minor;
+            break;
+          }
+
+          if (!isDigit(ch)) {
+            settings.call_on_error(this, "non digit in http major", data, p_err);
+          }
+
+          http_major *= 10;
+          http_major += (int)ch - 0x30;
+
+          if (http_major > 999) {
+            settings.call_on_error(this, "ridiculous http major", data, p_err);
+          };
+          break;
+        
+        /* first digit of minor HTTP version */
+        case req_first_http_minor:
+          if (!isDigit(ch)) {
+            settings.call_on_error(this, "non digit in http minor", data, p_err);
+          }
+          http_minor = (int)ch - 0x30;
+          state = State.req_http_minor;
+          break;
+
+        case req_http_minor:
+          if (ch == CR) {
+            state = State.req_line_almost_done;
+            break;
+          }
+
+          if (ch == LF) {
+            state = State.header_field_start;
+            break;
+          }
+
+          /* XXX allow spaces after digit? */
+
+          if (!isDigit(ch)) {
+            settings.call_on_error(this, "non digit in http minor", data, p_err);
+          }
+
+          http_minor *= 10;
+          http_minor += (int)ch - 0x30;
+
+         
+          if (http_minor > 999) {
+            settings.call_on_error(this, "ridiculous http minor", data, p_err);
+          };
+   
+          break;
+
+        /* end of request line */
+        case req_line_almost_done:
+        {
+          if (ch != LF) {
+            settings.call_on_error(this, "missing LF after request line", data, p_err);
+          }
+          state = State.header_field_start;
+          break;
+        }
+
+        /******************* HTTP 1.1 *******************/
+
+
+
+        /******************* Header *******************/
+        case header_field_start:
+        {
+          if (ch == CR) {
+            state = State.headers_almost_done;
+            break;
+          }
+
+          if (ch == LF) {
+            /* they might be just sending \n instead of \r\n so this would be
+             * the second \n to denote the end of headers*/
+            state = State.headers_almost_done;
+            if (!headers_almost_done(ch, settings)) {
+              settings.call_on_error(this, "header not properly completed", data, p_err);
+            }
+            break;
+          }
+
+          c = upper(ch);
+
+          if (c < A || Z < c) {
+            settings.call_on_error(this, "invalid char in header", data, p_err);
+          };
+
+          header_field_mark = p;
+
+          index = 0;
+          state = State.header_field;
+
+          switch (c) {
+            case C: 
+              header_state = HState.C;
+              break;
+
+            case P:
+              header_state = HState.matching_proxy_connection;
+              break;
+
+            case T:
+              header_state = HState.matching_transfer_encoding;
+              break;
+
+            case U:
+              header_state = HState.matching_upgrade;
+              break;
+
+            default:
+              header_state = HState.general;
+              break;
+          }
+          break;
+        }
+
+
+
+        case header_field:
+        {
+          c = (byte) acceptable_header[ch];
+          if (0 != c) {  
+            switch (header_state) {
+              case general:
+                break;
+
+              case C:
+                index++;
+                header_state = (O == c ? HState.CO : HState.general);
+                break;
+
+              case CO:
+                index++;
+                header_state = (N == c ? HState.CON : HState.general);
+                break;
+
+              case CON:
+                index++;
+                switch (c) {
+                  case N:
+                    header_state = HState.matching_connection;
+                    break;
+                  case T:
+                    header_state = HState.matching_content_length;
+                    break;
+                  default:
+                    header_state = HState.general;
+                    break;
+                }
+                break;
+
+              /* connection */
+
+              case matching_connection:
+                index++;
+                if (index > CONNECTION.length || c != CONNECTION[index]) {
+                  header_state = HState.general;
+                } else if (index == CONNECTION.length-1) {
+                  header_state = HState.connection;
+                }
+                break;
+
+              /* proxy-connection */
+
+              case matching_proxy_connection:
+                index++;
+                if (index > PROXY_CONNECTION.length || c != PROXY_CONNECTION[index]) {
+                  header_state = HState.general;
+                } else if (index == PROXY_CONNECTION.length-1) {
+                  header_state = HState.connection;
+                }
+                break;
+
+              /* content-length */
+
+              case matching_content_length:
+                index++;
+                if (index > CONTENT_LENGTH.length || c != CONTENT_LENGTH[index]) {
+                  header_state = HState.general;
+                } else if (index == CONTENT_LENGTH.length-1) {
+                  header_state = HState.content_length;
+                }
+                break;
+
+              /* transfer-encoding */
+
+              case matching_transfer_encoding:
+                index++;
+                if (index > TRANSFER_ENCODING.length || c != TRANSFER_ENCODING[index]) {
+                  header_state = HState.general;
+                } else if (index == TRANSFER_ENCODING.length-1) {
+                  header_state = HState.transfer_encoding;
+                }
+                break;
+
+              /* upgrade */
+
+              case matching_upgrade:
+                index++;
+                if (index > UPGRADE.length || c != UPGRADE[index]) {
+                  header_state = HState.general;
+                } else if (index == UPGRADE.length-1) {
+                  header_state = HState.upgrade;
+                }
+                break;
+
+              case connection:
+              case content_length:
+              case transfer_encoding:
+              case upgrade:
+                if (SPACE != ch) header_state = HState.general;
+                break;
+
+              default:
+                settings.call_on_error(this, "Unknown Header State", data, p_err);
+            } // switch: header_state
+            break;
+          } // 0 != c
+
+          if (COLON == ch)  {
+            settings.call_on_header_field(this, data, header_field_mark, p-header_field_mark);
+            header_field_mark = -1;
+
+            state = State.header_value_start;
+            break;
+          }
+
+          if (CR == ch) {
+            state = State.header_almost_done;
+            settings.call_on_header_field(this, data, header_field_mark, p-header_field_mark);
+            
+            header_field_mark = -1;
+            break;
+          }
+
+          if (ch == LF) {
+            settings.call_on_header_field(this, data, header_field_mark, p-header_field_mark);
+            header_field_mark = -1;
+            
+            state = State.header_field_start;
+            break;
+          }
+
+          settings.call_on_error(this, "invalid header field", data, p_err);
+        }
+
+
+
+        case header_value_start:
+        {
+          if (SPACE == ch) break;
+
+          header_value_mark = p;
+
+          state = State.header_value;
+          index = 0;
+
+          c = (byte)acceptable_header[ch];
+
+          if (c == 0) {
+            if (CR == ch) {
+              settings.call_on_header_value(this, data, header_value_mark, p-header_value_mark);
+              header_value_mark = -1;
+
+              header_state = HState.general;
+              state = State.header_almost_done;
+              break;
+            }
+
+            if (LF == ch) {
+              settings.call_on_header_value(this, data, header_value_mark, p-header_value_mark);
+              header_value_mark = -1;
+              
+              state = State.header_field_start;
+              break;
+            }
+
+            header_state = HState.general;
+            break;
+          }
+
+          switch (header_state) {
+            case upgrade:
+              flags |= F_UPGRADE;
+              header_state = HState.general;
+              break;
+
+            case transfer_encoding:
+              /* looking for 'Transfer-Encoding: chunked' */
+              if (C == c) {
+                header_state = HState.matching_transfer_encoding_chunked;
+              } else {
+                header_state = HState.general;
+              }
+              break;
+
+            case content_length:
+              if (!isDigit(ch)) {
+                settings.call_on_error(this, "Content-Length not numeric", data, p_err);
+              } 
+              content_length = (int)ch - 0x30;
+              break;
+
+            case connection:
+              /* looking for 'Connection: keep-alive' */
+              if (K == c) {
+                header_state = HState.matching_connection_keep_alive;
+              /* looking for 'Connection: close' */
+              } else if (C == c) {
+                header_state = HState.matching_connection_close;
+              } else {
+                header_state = HState.general;
+              }
+              break;
+
+            default:
+              header_state = HState.general;
+              break;
+          }
+          break;
+        } // header value start
+
+
+
+        case header_value:
+        {
+          c = (byte)acceptable_header[ch];
+
+          if (c == 0) {
+            if (CR == ch) {
+              settings.call_on_header_value(this, data, header_value_mark, p-header_value_mark);
+              header_value_mark = -1;
+
+              state = State.header_almost_done;
+              break;
+            }
+
+            if (LF == ch) {
+              settings.call_on_header_value(this, data, header_value_mark, p-header_value_mark);
+              header_value_mark = -1;
+              
+              if (!header_almost_done(ch)) {
+                settings.call_on_error(this,"incorrect header ending, expection LF", data, p_err);
+              }
+              break;
+            }
+            break;
+          }
+
+          switch (header_state) {
+            case general:
+              break;
+
+            case connection:
+            case transfer_encoding:
+              settings.call_on_error(this, "Shouldn't be here", data, p_err);
+
+            case content_length:
+              if (SPACE == ch) {
+                break;
+              }
+              if (!isDigit(ch)) {
+                settings.call_on_error(this, "Content-Length not numeric", data, p_err);
+              } 
+
+              content_length *= 10;
+              content_length += (int)ch - 0x30;
+              break;
+
+            /* Transfer-Encoding: chunked */
+            case matching_transfer_encoding_chunked:
+              index++;
+              if (index > CHUNKED.length || c != CHUNKED[index]) {
+                header_state = HState.general;
+              } else if (index == CHUNKED.length-1) {
+                header_state = HState.transfer_encoding_chunked;
+              }
+              break;
+
+            /* looking for 'Connection: keep-alive' */
+            case matching_connection_keep_alive:
+              index++;
+              if (index > KEEP_ALIVE.length || c != KEEP_ALIVE[index]) {
+                header_state = HState.general;
+              } else if (index == KEEP_ALIVE.length-1) {
+                header_state = HState.connection_keep_alive;
+              }
+              break;
+
+            /* looking for 'Connection: close' */
+            case matching_connection_close:
+              index++;
+              if (index > CLOSE.length || c != CLOSE[index]) {
+                header_state = HState.general;
+              } else if (index == CLOSE.length-1) {
+                header_state = HState.connection_close;
+              }
+              break;
+
+            case transfer_encoding_chunked:
+            case connection_keep_alive:
+            case connection_close:
+              if (SPACE != ch) header_state = HState.general;
+              break;
+
+            default:
+              state = State.header_value;
+              header_state = HState.general;
+              break;
+          }
+          break;
+        } // header_value
+
+
+
+        case header_almost_done:
+          if (!header_almost_done(ch)) {
+            settings.call_on_error(this,"incorrect header ending, expection LF", data, p_err);
+          }
+          break;
+
+        case headers_almost_done:
+          if (!headers_almost_done(ch, settings)) {
+            settings.call_on_error(this, "header not properly completed", data, p_err);
+          }
+          break;
+
+        /******************* Header *******************/
+
+
+
+
+        /******************* Body *******************/
+        case body_identity:
+          to_read = min(pe - p, content_length); //TODO change to use buffer? 
+
+          if (to_read > 0) {
+            settings.call_on_body(this, data, p, to_read); 
+            data.position(p+to_read);
+            content_length -= to_read;
+            if (content_length == 0) {
+              settings.call_on_message_complete(this);
+              state = new_message(); 
+            }
+          }
+          break;
+
+
+
+        case body_identity_eof:
+          to_read = pe - p;  // TODO change to use buffer ?
+          if (to_read > 0) {
+            settings.call_on_body(this, data, p, to_read); 
+            data.position(p+to_read);
+          }
+          break;
+        /******************* Body *******************/
+
+
+
+        /******************* Chunk *******************/
+        case chunk_size_start:
+          if (0 == (flags & F_CHUNKED)) {
+            settings.call_on_error(this, "not chunked", data, p_err);
+          }
+
+          c = UNHEX[ch];
+          if (c == -1) {
+            settings.call_on_error(this, "invalid hex char in chunk content length", data, p_err);
+          }
+          content_length = c;
+          state = State.chunk_size;
+          break;
+
+
+
+        case chunk_size:
+          if (0 == (flags & F_CHUNKED)) {
+            settings.call_on_error(this, "not chunked", data, p_err);
+          }
+
+          if (CR == ch) {
+            state = State.chunk_size_almost_done;
+            break;
+          }
+
+          c = UNHEX[ch];
+
+          if (c == -1) {
+            if (SEMI == ch || SPACE == ch) {
+              state = State.chunk_parameters;
+              break;
+            }
+            settings.call_on_error(this, "invalid hex char in chunk content length", data, p_err);
+          }
+
+          content_length *= 16;
+          content_length += c;
+          break;
+
+
+
+        case chunk_parameters:
+          if (0 == (flags & F_CHUNKED)) {
+            settings.call_on_error(this, "not chunked", data, p_err);
+          }
+          /* just ignore this shit. TODO check for overflow */
+          if (CR == ch) {
+            state = State.chunk_size_almost_done;
+            break;
+          }
+          break;
+          
+
+
+        case chunk_size_almost_done:
+          if (0 == (flags & F_CHUNKED)) {
+            settings.call_on_error(this, "not chunked", data, p_err);
+          }
+          if (strict && LF != ch) {
+            settings.call_on_error(this, "expected LF at end of chunk size", data, p_err);
+          }
+
+          if (0 == content_length) {
+            flags |= F_TRAILING;
+            state = State.header_field_start;
+          } else {
+            state = State.chunk_data;
+          }
+          break;
+
+
+
+        case chunk_data:
+        {
+          if (0 == (flags & F_CHUNKED)) {
+            settings.call_on_error(this, "not chunked", data, p_err);
+          }
+
+          to_read = min(pe-p, content_length);
+          if (to_read > 0) {
+            settings.call_on_body(this, data, p, to_read);
+            data.position(p+to_read);
+          }
+
+          if (to_read == content_length) {
+            state = State.chunk_data_almost_done;
+          }
+
+          content_length -= to_read;
+          break;
+        }
+
+
+
+        case chunk_data_almost_done:
+          if (0 == (flags & F_CHUNKED)) {
+            settings.call_on_error(this, "not chunked", data, p_err);
+          }
+          if (strict && CR != ch) {
+            settings.call_on_error(this, "chunk data terminated incorrectly, expected CR", data, p_err);
+          }
+          state = State.chunk_data_done;
+          break;
+
+
+
+        case chunk_data_done:
+          if (0 == (flags & F_CHUNKED)) {
+            settings.call_on_error(this, "not chunked", data, p_err);
+          }
+          if (strict && LF != ch) {
+            settings.call_on_error(this, "chunk data terminated incorrectly, expected LF", data, p_err);
+          }
+          state = State.chunk_size_start;
+          break;
+        /******************* Chunk *******************/
+    
+        
+        
+        default:
+          settings.call_on_error(this, "unhandled state", data, p_err);
+          
+      } // switch
+    } // while
+
+    p = data.position();
+
+
+    /* Reaching this point assumes that we only received part of a
+     * message, inform the callbacks about the progress made so far*/
+    
+	  settings.call_on_header_field(this, data, header_field_mark, p-header_field_mark);
+    settings.call_on_header_value(this, data, header_value_mark, p-header_value_mark);
+    settings.call_on_fragment    (this, data, fragment_mark,     p-fragment_mark);
+    settings.call_on_query_string(this, data, query_string_mark, p-query_string_mark);
+    settings.call_on_path        (this, data, path_mark,         p-path_mark);
+    settings.call_on_url         (this, data, url_mark,          p-url_mark);
+	
+  } // execute
+
+  /* If http_should_keep_alive() in the on_headers_complete or
+   * on_message_complete callback returns true, then this will be should be
+   * the last message on the connection.
+   * If you are the server, respond with the "Connection: close" header.
+   * If you are the client, close the connection.
+   */
+  public boolean http_should_keep_alive() {
+    if (http_major > 0 && http_minor > 0) {
+      /* HTTP/1.1 */
+      if ( 0 != (flags & F_CONNECTION_CLOSE) ) {
+        return false;
+      } else {
+        return true;
+      }
+    } else {
+      /* HTTP/1.0 or earlier */
+      if ( 0 != (flags & F_CONNECTION_KEEP_ALIVE) ) {
+        return true;
+      } else {
+        return false;
+      }
+    }
+  }
+
+  boolean isDigit(byte b) {
+    if (b >= 0x30 && b <=0x39) {
+      return true;
+    }
+    return false;
+  }
+
+  boolean isAtoZ(byte b) {
+    byte c = lower(b);
+    return (c>= 0x61 /*a*/ && c <=  0x7a /*z*/);
+  }
+
+
+  byte lower (byte b) {
+    return (byte)(b|0x20);
+  }
+
+  byte upper(byte b) {
+    char c = (char)(b);
+    return (byte)Character.toUpperCase(c);
+  }
+	
+
+  HTTPMethod start_req_method_assign(byte c){
+    switch (c) {
+      case C: return HTTPMethod.HTTP_CONNECT;  /* or COPY, CHECKOUT */
+      case D: return HTTPMethod.HTTP_DELETE;  
+      case G: return HTTPMethod.HTTP_GET;     
+      case H: return HTTPMethod.HTTP_HEAD;    
+      case L: return HTTPMethod.HTTP_LOCK;    
+      case M: return HTTPMethod.HTTP_MKCOL;    /* or MOVE, MKACTIVITY, MERGE */
+      case O: return HTTPMethod.HTTP_OPTIONS; 
+      case P: return HTTPMethod.HTTP_POST;     /* or PROPFIND, PROPPATH, PUT */
+      case R: return HTTPMethod.HTTP_REPORT;
+      case T: return HTTPMethod.HTTP_TRACE;   
+      case U: return HTTPMethod.HTTP_UNLOCK;  
+    }
+    return null; // ugh.
+  }
+
+  boolean header_almost_done(byte ch) {
+    if (strict && LF != ch) {
+      return false;
+    }
+
+    state = State.header_field_start;
+    // TODO java enums support some sort of bitflag mechanism !?
+    switch (header_state) {
+      case connection_keep_alive:
+        flags |= F_CONNECTION_KEEP_ALIVE;
+        break;
+      case connection_close:
+        flags |= F_CONNECTION_CLOSE;
+        break;
+      case transfer_encoding_chunked:
+        flags |= F_CHUNKED;
+        break;
+      default:
+        break;
+    }
+    return true;
+  }
+
+  boolean headers_almost_done (byte ch, ParserSettings settings) {
+
+    if (LF != ch) {
+      return false;
+    }
+
+    if (0 != (flags & F_TRAILING)) {
+      /* End of a chunked request */
+
+      settings.call_on_headers_complete(this);
+      settings.call_on_message_complete(this);
+
+      state = new_message(); 
+
+      return true;
+    }
+
+    nread = 0;
+
+    if (0 != (flags & F_UPGRADE) || HTTPMethod.HTTP_CONNECT == method) {
+      upgrade = true;
+    }
+    
+
+    /* Here we call the headers_complete callback. This is somewhat
+     * different than other callbacks because if the user returns 1, we
+     * will interpret that as saying that this message has no body. This
+     * is needed for the annoying case of recieving a response to a HEAD
+     * request.
+     */
+
+    /* (responses to HEAD request contain a CONTENT-LENGTH header
+     * but no content)
+     *
+     * Consider what to do here: I don't like the idea of the callback
+     * interface having a different contract in the case of HEAD
+     * responses. The alternatives would be either to:
+     *
+     * a.) require the header_complete callback to implement a different
+     * interface or
+     *
+     * b.) provide an overridden execute(bla, bla, boolean
+     * parsingHeader) implementation ...
+     */
+
+    /*TODO TODO TODO TODO TODO TODO TODO TODO TODO TODO */ 
+    if (null != settings.on_headers_complete) {
+      settings.call_on_headers_complete(this);
+      //return;
+    }
+    
+    //        if (null != settings.on_headers_complete) {
+    //          switch (settings.on_headers_complete.cb(parser)) {
+    //            case 0:
+    //              break;
+    //
+    //            case 1:
+    //              flags |= F_SKIPBODY;
+    //              break;
+    //
+    //            default:
+    //              return p - data; /* Error */ // TODO // RuntimeException ?
+    //          }
+    //        }
+
+
+    // Exit, the rest of the connect is in a different protocol.
+    if (upgrade) {
+      settings.call_on_message_complete(this);
+      return true;
+    }
+
+    if (0 != (flags & F_SKIPBODY)) {
+      settings.call_on_message_complete(this);
+      state = new_message(); 
+    } else if (0 != (flags & F_CHUNKED)) {
+      /* chunked encoding - ignore Content-Length header */
+      state = State.chunk_size_start;
+    } else {
+      if (content_length == 0) {
+        /* Content-Length header given but zero: Content-Length: 0\r\n */
+        settings.call_on_message_complete(this);
+        state = new_message(); 
+      } else if (content_length > 0) {
+        /* Content-Length header given and non-zero */
+        state = State.body_identity;
+      } else {
+        if (type == ParserType.HTTP_REQUEST || http_should_keep_alive()) {
+          /* Assume content-length 0 - read the next */
+          settings.call_on_message_complete(this);
+          state = new_message(); 
+        } else {
+          /* Read body until EOF */
+          state = State.body_identity_eof;
+        }
+      }
+    }
+    return true;
+  } // headers_almost_fone
+
+
+  final int min (int a, int b) {
+    return a < b ? a : b;
+  }
+  
+  /* probably not the best place to hide this ... */
+	public boolean HTTP_PARSER_STRICT;
+  State new_message() {
+    if (HTTP_PARSER_STRICT){
+      return http_should_keep_alive() ? start_state() : State.dead;
+    } else {
+      return start_state();
+    }
+
+  }
+	
+  State start_state() {
+    return type == ParserType.HTTP_REQUEST ? State.start_req : State.start_res;
+  }
+
+
+	boolean parsing_header(State state) {
+
+		switch (state) {
+			case chunk_size_start :
+			case chunk_size :
+			case chunk_size_almost_done :
+			case chunk_parameters :
+			case chunk_data :
+			case chunk_data_almost_done :
+			case chunk_data_done :
+			case body_identity :
+			case body_identity_eof :
+				return false;
+
+		}
+		return (0==(flags & F_TRAILING));
+	}
+
+	/* "Dial C for Constants" */
+  static class C {
+    static final int HTTP_MAX_HEADER_SIZE = 80 * 1024;
+
+    static final int F_CHUNKED               = 1 << 0;
+    static final int F_CONNECTION_KEEP_ALIVE = 1 << 1;
+    static final int F_CONNECTION_CLOSE      = 1 << 2;
+    static final int F_TRAILING              = 1 << 3;
+    static final int F_UPGRADE               = 1 << 4;
+    static final int F_SKIPBODY              = 1 << 5;
+
+    static final byte [] UPCASE = {
+      0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+      0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+      0x20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  0x00,0x00,0x00,0x00,0x00,0x2d,0x00,0x2f,
+      0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,  0x38,0x39,0x00,0x00,0x00,0x00,0x00,0x00,
+      0x00,0x41,0x42,0x43,0x44,0x45,0x46,0x47,  0x48,0x49,0x4a,0x4b,0x4c,0x4d,0x4e,0x4f,
+      0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,  0x58,0x59,0x5a,0x00,0x00,0x00,0x00,0x5f,
+      0x00,0x41,0x42,0x43,0x44,0x45,0x46,0x47,  0x48,0x49,0x4a,0x4b,0x4c,0x4d,0x4e,0x4f,
+      0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,  0x58,0x59,0x5a,0x00,0x00,0x00,0x00,0x00,
+      0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+      0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+      0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+      0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+      0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+      0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+      0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+      0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+    };
+    static final byte [] CONNECTION = {
+      0x43, 0x4f, 0x4e, 0x4e, 0x45, 0x43, 0x54, 0x49, 0x4f, 0x4e, 
+    };
+    static final byte [] PROXY_CONNECTION = {
+      0x50, 0x52, 0x4f, 0x58, 0x59, 0x2d, 0x43, 0x4f, 0x4e, 0x4e, 0x45, 0x43, 0x54, 0x49, 0x4f, 0x4e, 
+    };
+    static final byte [] CONTENT_LENGTH = {
+      0x43, 0x4f, 0x4e, 0x54, 0x45, 0x4e, 0x54, 0x2d, 0x4c, 0x45, 0x4e, 0x47, 0x54, 0x48, 
+    };
+    static final byte [] TRANSFER_ENCODING = {
+      0x54, 0x52, 0x41, 0x4e, 0x53, 0x46, 0x45, 0x52, 0x2d, 0x45, 0x4e, 0x43, 0x4f, 0x44, 0x49, 0x4e, 0x47, 
+    };
+    static final byte [] UPGRADE = {
+      0x55, 0x50, 0x47, 0x52, 0x41, 0x44, 0x45, 
+    };
+    static final byte [] CHUNKED = {
+      0x43, 0x48, 0x55, 0x4e, 0x4b, 0x45, 0x44, 
+    };
+    static final byte [] KEEP_ALIVE = {
+      0x4b, 0x45, 0x45, 0x50, 0x2d, 0x41, 0x4c, 0x49, 0x56, 0x45, 
+    };
+    static final byte [] CLOSE = {
+      0x43, 0x4c, 0x4f, 0x53, 0x45, 
+    };
+    /* 
+     * ' ', '_', '-' and all alpha-numeric ascii characters are accepted by acceptable_header.
+     * The 'A'-'Z' are upper-cased.  
+    */
+    
+    static final char [] acceptable_header = {
+/*   0 nul    1 soh    2 stx    3 etx    4 eot    5 enq    6 ack    7 bel  */
+        0,       0,       0,       0,       0,       0,       0,       0,
+/*   8 bs     9 ht    10 nl    11 vt    12 np    13 cr    14 so    15 si   */
+        0,       0,       0,       0,       0,       0,       0,       0,
+/*  16 dle   17 dc1   18 dc2   19 dc3   20 dc4   21 nak   22 syn   23 etb */
+        0,       0,       0,       0,       0,       0,       0,       0,
+/*  24 can   25 em    26 sub   27 esc   28 fs    29 gs    30 rs    31 us  */
+        0,       0,       0,       0,       0,       0,       0,       0,
+/*  32 sp    33  !    34  "    35  #    36  $    37  %    38  &    39  '  */
+       ' ',      0,       0,       0,       0,       0,       0,       0,
+/*  40  (    41  )    42  *    43  +    44  ,    45  -    46  .    47  /  */
+        0,       0,       0,       0,       0,      '-',      0,       0,
+/*  48  0    49  1    50  2    51  3    52  4    53  5    54  6    55  7  */
+       '0',     '1',     '2',     '3',     '4',     '5',     '6',     '7',
+/*  56  8    57  9    58  :    59  ;    60  <    61  =    62  >    63  ?  */
+       '8',     '9',      0,       0,       0,       0,       0,       0,
+/*  64  @    65  A    66  B    67  C    68  D    69  E    70  F    71  G  */
+        0,      'A',     'B',     'C',     'D',     'E',     'F',     'G',
+/*  72  H    73  I    74  J    75  K    76  L    77  M    78  N    79  O  */
+       'H',     'I',     'J',     'K',     'L',     'M',     'N',     'O',
+/*  80  P    81  Q    82  R    83  S    84  T    85  U    86  V    87  W  */
+       'P',     'Q',     'R',     'S',     'T',     'U',     'V',     'W',
+/*  88  X    89  Y    90  Z    91  [    92  \    93  ]    94  ^    95  _  */
+       'X',     'Y',     'Z',      0,       0,       0,       0,      '_',
+/*  96  `    97  a    98  b    99  c   100  d   101  e   102  f   103  g  */
+        0,      'A',     'B',     'C',     'D',     'E',     'F',     'G',
+/* 104  h   105  i   106  j   107  k   108  l   109  m   110  n   111  o  */
+       'H',     'I',     'J',     'K',     'L',     'M',     'N',     'O',
+/* 112  p   113  q   114  r   115  s   116  t   117  u   118  v   119  w  */
+       'P',     'Q',     'R',     'S',     'T',     'U',     'V',     'W',
+/* 120  x   121  y   122  z   123  {   124  |   125  }   126  ~   127 del */
+       'X',     'Y',     'Z',      0,       0,       0,       0,       0 };
+
+    static final byte [] UNHEX =
+    {    -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1
+        ,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1
+        ,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1
+        , 0, 1, 2, 3, 4, 5, 6, 7, 8, 9,-1,-1,-1,-1,-1,-1
+        ,-1,10,11,12,13,14,15,-1,-1,-1,-1,-1,-1,-1,-1,-1
+        ,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1
+        ,-1,10,11,12,13,14,15,-1,-1,-1,-1,-1,-1,-1,-1,-1
+        ,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1
+    };
+
+    static final boolean [] normal_url_char = {
+/*   0 nul    1 soh    2 stx    3 etx    4 eot    5 enq    6 ack    7 bel  */
+    false,   false,   false,   false,   false,   false,   false,   false,
+/*   8 bs     9 ht    10 nl    11 vt    12 np    13 cr    14 so    15 si   */
+    false,   false,   false,   false,   false,   false,   false,   false,
+/*  16 dle   17 dc1   18 dc2   19 dc3   20 dc4   21 nak   22 syn   23 etb */
+    false,   false,   false,   false,   false,   false,   false,   false,
+/*  24 can   25 em    26 sub   27 esc   28 fs    29 gs    30 rs    31 us  */
+    false,   false,   false,   false,   false,   false,   false,   false,
+/*  32 sp    33  !    34  "    35  #    36  $    37  %    38  &    39  '  */
+    false,    true,    true,   false,    true,    true,    true,    true,
+/*  40  (    41  )    42  *    43  +    44  ,    45  -    46  .    47  /  */
+     true,    true,    true,    true,    true,    true,    true,    true,
+/*  48  0    49  1    50  2    51  3    52  4    53  5    54  6    55  7  */
+     true,    true,    true,    true,    true,    true,    true,    true,
+/*  56  8    57  9    58  :    59  ;    60  <    61  =    62  >    63  ?  */
+     true,    true,    true,    true,    true,    true,    true,   false,
+/*  64  @    65  A    66  B    67  C    68  D    69  E    70  F    71  G  */
+     true,    true,    true,    true,    true,    true,    true,    true,
+/*  72  H    73  I    74  J    75  K    76  L    77  M    78  N    79  O  */
+     true,    true,    true,    true,    true,    true,    true,    true,
+/*  80  P    81  Q    82  R    83  S    84  T    85  U    86  V    87  W  */
+     true,    true,    true,    true,    true,    true,    true,    true,
+/*  88  X    89  Y    90  Z    91  [    92  \    93  ]    94  ^    95  _  */
+     true,    true,    true,    true,    true,    true,    true,    true,
+/*  96  `    97  a    98  b    99  c   100  d   101  e   102  f   103  g  */
+     true,    true,    true,    true,    true,    true,    true,    true,
+/* 104  h   105  i   106  j   107  k   108  l   109  m   110  n   111  o  */
+     true,    true,    true,    true,    true,    true,    true,    true,
+/* 112  p   113  q   114  r   115  s   116  t   117  u   118  v   119  w  */
+     true,    true,    true,    true,    true,    true,    true,    true,
+/* 120  x   121  y   122  z   123  {   124  |   125  }   126  ~   127 del */
+     true,    true,    true,    true,    true,    true,    true,   false };
+
+    public static final byte A = 0x41;
+    public static final byte B = 0x42;
+    public static final byte C = 0x43;
+    public static final byte D = 0x44;
+    public static final byte E = 0x45;
+    public static final byte F = 0x46;
+    public static final byte G = 0x47;
+    public static final byte H = 0x48;
+    public static final byte I = 0x49;
+    public static final byte J = 0x4a;
+    public static final byte K = 0x4b;
+    public static final byte L = 0x4c;
+    public static final byte M = 0x4d;
+    public static final byte N = 0x4e;
+    public static final byte O = 0x4f;
+    public static final byte P = 0x50;
+    public static final byte Q = 0x51;
+    public static final byte R = 0x52;
+    public static final byte S = 0x53;
+    public static final byte T = 0x54;
+    public static final byte U = 0x55;
+    public static final byte V = 0x56;
+    public static final byte W = 0x57;
+    public static final byte X = 0x58;
+    public static final byte Y = 0x59;
+    public static final byte Z = 0x5a;
+    public static final byte CR = 0x0d;
+    public static final byte LF = 0x0a;
+    public static final byte DOT = 0x2e;
+    public static final byte SPACE = 0x20;
+    public static final byte SEMI = 0x3b;
+    public static final byte COLON = 0x3a;
+    public static final byte HASH = 0x23;
+    public static final byte QMARK = 0x3f;
+    public static final byte SLASH = 0x2f;
+    public static final byte DASH = 0x2d;
+    public static final byte NULL = 0x00;
+  }
+
+  enum State {
+
+    dead               
+
+    , start_res_or_res
+    , res_or_resp_H
+    , start_res
+    , res_H
+    , res_HT
+    , res_HTT
+    , res_HTTP
+    , res_first_http_major
+    , res_http_major
+    , res_first_http_minor
+    , res_http_minor
+    , res_first_status_code
+    , res_status_code
+    , res_status
+    , res_line_almost_done
+
+    , start_req
+
+    , req_method
+    , req_spaces_before_url
+    , req_schema
+    , req_schema_slash
+    , req_schema_slash_slash
+    , req_host
+    , req_port
+    , req_path
+    , req_query_string_start
+    , req_query_string
+    , req_fragment_start
+    , req_fragment
+    , req_http_start
+    , req_http_H
+    , req_http_HT
+    , req_http_HTT
+    , req_http_HTTP
+    , req_first_http_major
+    , req_http_major
+    , req_first_http_minor
+    , req_http_minor
+    , req_line_almost_done
+
+    , header_field_start
+    , header_field
+    , header_value_start
+    , header_value
+
+    , header_almost_done
+
+    , headers_almost_done
+
+    , chunk_size_start
+    , chunk_size
+    , chunk_size_almost_done
+    , chunk_parameters
+    , chunk_data
+    , chunk_data_almost_done
+    , chunk_data_done
+
+    , body_identity
+    , body_identity_eof;
+
+
+  }
+  enum HState {
+      general
+    , C
+    , CO
+    , CON
+
+    , matching_connection
+    , matching_proxy_connection
+    , matching_content_length
+    , matching_transfer_encoding
+    , matching_upgrade
+
+    , connection
+    , content_length
+    , transfer_encoding
+    , upgrade
+
+    , matching_transfer_encoding_chunked
+    , matching_connection_keep_alive
+    , matching_connection_close
+
+    , transfer_encoding_chunked
+    , connection_keep_alive
+    , connection_close
+  }
+}