unicorn 0.9.2 → 0.90.0

data/ext/unicorn_http/ext_help.h

@@ -1,12 +1,48 @@
 #ifndef ext_help_h
 #define ext_help_h
 
-#define ARRAY_SIZE(x) (sizeof(x)/sizeof(x[0]))
+#ifndef RSTRING_PTR
+#define RSTRING_PTR(s) (RSTRING(s)->ptr)
+#endif
+#ifndef RSTRING_LEN
+#define RSTRING_LEN(s) (RSTRING(s)->len)
+#endif
 
-#ifdef DEBUG
-#define TRACE()  fprintf(stderr, "> %s:%d:%s\n", __FILE__, __LINE__, __FUNCTION__)
-#else
-#define TRACE() 
+#ifndef HAVE_RB_STR_SET_LEN
+/* this is taken from Ruby 1.8.7, 1.8.6 may not have it */
+static void rb_18_str_set_len(VALUE str, long len)
+{
+  RSTRING(str)->len = len;
+  RSTRING(str)->ptr[len] = '\0';
+}
+#  define rb_str_set_len(str,len) rb_18_str_set_len(str,len)
 #endif
 
+static inline int str_cstr_eq(VALUE val, const char *ptr, size_t len)
+{
+  return (RSTRING_LEN(val) == len && !memcmp(ptr, RSTRING_PTR(val), len));
+}
+
+#define STR_CSTR_EQ(val, const_str) \
+  str_cstr_eq(val, const_str, sizeof(const_str) - 1)
+
+/* strcasecmp isn't locale independent */
+static int str_cstr_case_eq(VALUE val, const char *ptr, size_t len)
+{
+  if (RSTRING_LEN(val) == len) {
+    const char *v = RSTRING_PTR(val);
+
+    for (; len--; ++ptr, ++v) {
+      if ((*ptr == *v) || (*v >= 'A' && *v <= 'Z' && (*v | 0x20) == *ptr))
+        continue;
+      return 0;
+    }
+    return 1;
+  }
+  return 0;
+}
+
+#define STR_CSTR_CASE_EQ(val, const_str) \
+  str_cstr_case_eq(val, const_str, sizeof(const_str) - 1)
+
 #endif

data/ext/unicorn_http/extconf.rb

@@ -1,5 +1,7 @@
 require 'mkmf'
 
 dir_config("unicorn_http")
-have_library("c", "main")
+
+have_macro("SIZEOF_OFF_T", "ruby.h") or check_sizeof("off_t", "sys/types.h")
+have_func("rb_str_set_len", "ruby.h")
 create_makefile("unicorn_http")

data/ext/unicorn_http/global_variables.h

@@ -0,0 +1,93 @@
+#ifndef global_variables_h
+#define global_variables_h
+static VALUE mUnicorn;
+static VALUE cHttpParser;
+static VALUE eHttpParserError;
+
+static VALUE g_rack_url_scheme;
+static VALUE g_request_method;
+static VALUE g_request_uri;
+static VALUE g_fragment;
+static VALUE g_query_string;
+static VALUE g_http_version;
+static VALUE g_request_path;
+static VALUE g_path_info;
+static VALUE g_server_name;
+static VALUE g_server_port;
+static VALUE g_server_protocol;
+static VALUE g_http_host;
+static VALUE g_http_x_forwarded_proto;
+static VALUE g_http_transfer_encoding;
+static VALUE g_content_length;
+static VALUE g_http_trailer;
+static VALUE g_http_connection;
+static VALUE g_port_80;
+static VALUE g_port_443;
+static VALUE g_localhost;
+static VALUE g_http;
+static VALUE g_http_11;
+static VALUE g_GET;
+static VALUE g_HEAD;
+
+/** Defines common length and error messages for input length validation. */
+#define DEF_MAX_LENGTH(N, length) \
+  static const size_t MAX_##N##_LENGTH = length; \
+  static const char * const MAX_##N##_LENGTH_ERR = \
+    "HTTP element " # N  " is longer than the " # length " allowed length."
+
+/**
+ * Validates the max length of given input and throws an HttpParserError
+ * exception if over.
+ */
+#define VALIDATE_MAX_LENGTH(len, N) do { \
+  if (len > MAX_##N##_LENGTH) \
+    rb_raise(eHttpParserError, MAX_##N##_LENGTH_ERR); \
+} while (0)
+
+/** Defines global strings in the init method. */
+#define DEF_GLOBAL(N, val) do { \
+  g_##N = rb_obj_freeze(rb_str_new(val, sizeof(val) - 1)); \
+  rb_global_variable(&g_##N); \
+} while (0)
+
+/* Defines the maximum allowed lengths for various input elements.*/
+DEF_MAX_LENGTH(FIELD_NAME, 256);
+DEF_MAX_LENGTH(FIELD_VALUE, 80 * 1024);
+DEF_MAX_LENGTH(REQUEST_URI, 1024 * 12);
+DEF_MAX_LENGTH(FRAGMENT, 1024); /* Don't know if this length is specified somewhere or not */
+DEF_MAX_LENGTH(REQUEST_PATH, 1024);
+DEF_MAX_LENGTH(QUERY_STRING, (1024 * 10));
+DEF_MAX_LENGTH(HEADER, (1024 * (80 + 32)));
+
+void init_globals(void)
+{
+  mUnicorn = rb_define_module("Unicorn");
+
+  DEF_GLOBAL(rack_url_scheme, "rack.url_scheme");
+  DEF_GLOBAL(request_method, "REQUEST_METHOD");
+  DEF_GLOBAL(request_uri, "REQUEST_URI");
+  DEF_GLOBAL(fragment, "FRAGMENT");
+  DEF_GLOBAL(query_string, "QUERY_STRING");
+  DEF_GLOBAL(http_version, "HTTP_VERSION");
+  DEF_GLOBAL(request_path, "REQUEST_PATH");
+  DEF_GLOBAL(path_info, "PATH_INFO");
+  DEF_GLOBAL(server_name, "SERVER_NAME");
+  DEF_GLOBAL(server_port, "SERVER_PORT");
+  DEF_GLOBAL(server_protocol, "SERVER_PROTOCOL");
+  DEF_GLOBAL(http_x_forwarded_proto, "HTTP_X_FORWARDED_PROTO");
+  DEF_GLOBAL(port_80, "80");
+  DEF_GLOBAL(port_443, "443");
+  DEF_GLOBAL(localhost, "localhost");
+  DEF_GLOBAL(http, "http");
+  DEF_GLOBAL(http_11, "HTTP/1.1");
+  DEF_GLOBAL(GET, "GET");
+  DEF_GLOBAL(HEAD, "HEAD");
+
+  eHttpParserError =
+         rb_define_class_under(mUnicorn, "HttpParserError", rb_eIOError);
+  cHttpParser = rb_define_class_under(mUnicorn, "HttpParser", rb_cObject);
+}
+
+#undef DEF_GLOBAL
+
+#endif /* global_variables_h */

data/ext/unicorn_http/unicorn_http.c

@@ -1,3 +1,5 @@
+
+#line 1 "unicorn_http.rl"
 /**
  * Copyright (c) 2009 Eric Wong (all bugs are Eric's fault)
  * Copyright (c) 2005 Zed A. Shaw
@@ -7,310 +9,2014 @@
 #include "ext_help.h"
 #include <assert.h>
 #include <string.h>
-#include "unicorn_http.h"
-
-static http_parser *data_get(VALUE self)
-{
-  http_parser *http;
-
-  Data_Get_Struct(self, http_parser, http);
-  if (!http)
-    rb_raise(rb_eArgError, "NULL found for http when shouldn't be.");
-  return http;
-}
-
-#ifndef RSTRING_PTR
-#define RSTRING_PTR(s) (RSTRING(s)->ptr)
-#endif
-#ifndef RSTRING_LEN
-#define RSTRING_LEN(s) (RSTRING(s)->len)
-#endif
-
-static VALUE mUnicorn;
-static VALUE cHttpParser;
-static VALUE eHttpParserError;
-static VALUE sym_http_body;
-
-#define HTTP_PREFIX "HTTP_"
-#define HTTP_PREFIX_LEN (sizeof(HTTP_PREFIX) - 1)
-
-static VALUE global_rack_url_scheme;
-static VALUE global_request_method;
-static VALUE global_request_uri;
-static VALUE global_fragment;
-static VALUE global_query_string;
-static VALUE global_http_version;
-static VALUE global_request_path;
-static VALUE global_path_info;
-static VALUE global_server_name;
-static VALUE global_server_port;
-static VALUE global_server_protocol;
-static VALUE global_server_protocol_value;
-static VALUE global_http_host;
-static VALUE global_http_x_forwarded_proto;
-static VALUE global_port_80;
-static VALUE global_port_443;
-static VALUE global_localhost;
-static VALUE global_http;
-
-/** Defines common length and error messages for input length validation. */
-#define DEF_MAX_LENGTH(N, length) \
-  static const size_t MAX_##N##_LENGTH = length; \
-  static const char * const MAX_##N##_LENGTH_ERR = \
-    "HTTP element " # N  " is longer than the " # length " allowed length."
-
-/**
- * Validates the max length of given input and throws an HttpParserError
- * exception if over.
- */
-#define VALIDATE_MAX_LENGTH(len, N) do { \
-  if (len > MAX_##N##_LENGTH) \
-    rb_raise(eHttpParserError, MAX_##N##_LENGTH_ERR); \
-} while (0)
-
-/** Defines global strings in the init method. */
-#define DEF_GLOBAL(N, val) do { \
-  global_##N = rb_obj_freeze(rb_str_new(val, sizeof(val) - 1)); \
-  rb_global_variable(&global_##N); \
-} while (0)
-
-/* Defines the maximum allowed lengths for various input elements.*/
-DEF_MAX_LENGTH(FIELD_NAME, 256);
-DEF_MAX_LENGTH(FIELD_VALUE, 80 * 1024);
-DEF_MAX_LENGTH(REQUEST_URI, 1024 * 12);
-DEF_MAX_LENGTH(FRAGMENT, 1024); /* Don't know if this length is specified somewhere or not */
-DEF_MAX_LENGTH(REQUEST_PATH, 1024);
-DEF_MAX_LENGTH(QUERY_STRING, (1024 * 10));
-DEF_MAX_LENGTH(HEADER, (1024 * (80 + 32)));
-
-struct common_field {
-	const signed long len;
-	const char *name;
-	VALUE value;
+#include <sys/types.h>
+#include "common_field_optimization.h"
+#include "global_variables.h"
+#include "c_util.h"
+
+#define UH_FL_CHUNKED  0x1
+#define UH_FL_HASBODY  0x2
+#define UH_FL_INBODY   0x4
+#define UH_FL_HASTRAILER 0x8
+#define UH_FL_INTRAILER 0x10
+#define UH_FL_INCHUNK  0x20
+#define UH_FL_KAMETHOD 0x40
+#define UH_FL_KAVERSION 0x80
+
+#define UH_FL_KEEPALIVE (UH_FL_KAMETHOD | UH_FL_KAVERSION)
+
+struct http_parser {
+  int cs; /* Ragel internal state */
+  unsigned int flags;
+  size_t mark;
+  union { /* these 3 fields don't nest */
+    size_t field;
+    size_t query;
+    size_t offset;
+  } start;
+  union {
+    size_t field_len; /* only used during header processing */
+    size_t dest_offset; /* only used during body processing */
+  } s;
+  union {
+    off_t content;
+    off_t chunk;
+  } len;
 };
 
-/*
- * A list of common HTTP headers we expect to receive.
- * This allows us to avoid repeatedly creating identical string
- * objects to be used with rb_hash_aset().
- */
-static struct common_field common_http_fields[] = {
-# define f(N) { (sizeof(N) - 1), N, Qnil }
-	f("ACCEPT"),
-	f("ACCEPT_CHARSET"),
-	f("ACCEPT_ENCODING"),
-	f("ACCEPT_LANGUAGE"),
-	f("ALLOW"),
-	f("AUTHORIZATION"),
-	f("CACHE_CONTROL"),
-	f("CONNECTION"),
-	f("CONTENT_ENCODING"),
-	f("CONTENT_LENGTH"),
-	f("CONTENT_TYPE"),
-	f("COOKIE"),
-	f("DATE"),
-	f("EXPECT"),
-	f("FROM"),
-	f("HOST"),
-	f("IF_MATCH"),
-	f("IF_MODIFIED_SINCE"),
-	f("IF_NONE_MATCH"),
-	f("IF_RANGE"),
-	f("IF_UNMODIFIED_SINCE"),
-	f("KEEP_ALIVE"), /* Firefox sends this */
-	f("MAX_FORWARDS"),
-	f("PRAGMA"),
-	f("PROXY_AUTHORIZATION"),
-	f("RANGE"),
-	f("REFERER"),
-	f("TE"),
-	f("TRAILER"),
-	f("TRANSFER_ENCODING"),
-	f("UPGRADE"),
-	f("USER_AGENT"),
-	f("VIA"),
-	f("X_FORWARDED_FOR"), /* common for proxies */
-	f("X_FORWARDED_PROTO"), /* common for proxies */
-	f("X_REAL_IP"), /* common for proxies */
-	f("WARNING")
-# undef f
-};
+static void finalize_header(VALUE req);
+
+#define REMAINING (unsigned long)(pe - p)
+#define LEN(AT, FPC) (FPC - buffer - hp->AT)
+#define MARK(M,FPC) (hp->M = (FPC) - buffer)
+#define PTR_TO(F) (buffer + hp->F)
+#define STR_NEW(M,FPC) rb_str_new(PTR_TO(M), LEN(M, FPC))
 
-/* this function is not performance-critical */
-static void init_common_fields(void)
+static void
+request_method(struct http_parser *hp, VALUE req, const char *ptr, size_t len)
 {
-  int i;
-  struct common_field *cf = common_http_fields;
-  char tmp[256]; /* MAX_FIELD_NAME_LENGTH */
-  memcpy(tmp, HTTP_PREFIX, HTTP_PREFIX_LEN);
-
-  for(i = 0; i < ARRAY_SIZE(common_http_fields); cf++, i++) {
-    /* Rack doesn't like certain headers prefixed with "HTTP_" */
-    if (!strcmp("CONTENT_LENGTH", cf->name) ||
-        !strcmp("CONTENT_TYPE", cf->name)) {
-      cf->value = rb_str_new(cf->name, cf->len);
-    } else {
-      memcpy(tmp + HTTP_PREFIX_LEN, cf->name, cf->len + 1);
-      cf->value = rb_str_new(tmp, HTTP_PREFIX_LEN + cf->len);
-    }
-    cf->value = rb_obj_freeze(cf->value);
-    rb_global_variable(&cf->value);
+  VALUE v;
+
+  if (CONST_MEM_EQ("GET", ptr, len)) {
+    hp->flags |= UH_FL_KAMETHOD;
+    v = g_GET;
+  } else if (CONST_MEM_EQ("HEAD", ptr, len)) {
+    hp->flags |= UH_FL_KAMETHOD;
+    v = g_HEAD;
+  } else {
+    v = rb_str_new(ptr, len);
   }
+  rb_hash_aset(req, g_request_method, v);
 }
 
-static VALUE find_common_field_value(const char *field, size_t flen)
+static void
+http_version(struct http_parser *hp, VALUE req, const char *ptr, size_t len)
 {
-  int i;
-  struct common_field *cf = common_http_fields;
-  for(i = 0; i < ARRAY_SIZE(common_http_fields); i++, cf++) {
-    if (cf->len == flen && !memcmp(cf->name, field, flen))
-      return cf->value;
+  VALUE v;
+
+  if (CONST_MEM_EQ("HTTP/1.1", ptr, len)) {
+    hp->flags |= UH_FL_KAVERSION;
+    v = g_http_11;
+  } else {
+    v = rb_str_new(ptr, len);
   }
-  return Qnil;
+  rb_hash_aset(req, g_http_version, v);
 }
 
-static void http_field(void *data, const char *field,
-                       size_t flen, const char *value, size_t vlen)
+static void invalid_if_trailer(int flags)
 {
-  VALUE req = (VALUE)data;
-  VALUE f = Qnil;
-
-  VALIDATE_MAX_LENGTH(flen, FIELD_NAME);
-  VALIDATE_MAX_LENGTH(vlen, FIELD_VALUE);
+  if (flags & UH_FL_INTRAILER)
+    rb_raise(eHttpParserError, "invalid Trailer");
+}
 
-  f = find_common_field_value(field, flen);
+static void write_value(VALUE req, struct http_parser *hp,
+                        const char *buffer, const char *p)
+{
+  VALUE f = find_common_field(PTR_TO(start.field), hp->s.field_len);
+  VALUE v;
+  VALUE e;
 
+  VALIDATE_MAX_LENGTH(LEN(mark, p), FIELD_VALUE);
+  v = STR_NEW(mark, p);
   if (f == Qnil) {
-    /*
-     * We got a strange header that we don't have a memoized value for.
-     * Fallback to creating a new string to use as a hash key.
-     *
-     * using rb_str_new(NULL, len) here is faster than rb_str_buf_new(len)
-     * in my testing, because: there's no minimum allocation length (and
-     * no check for it, either), RSTRING_LEN(f) does not need to be
-     * written twice, and and RSTRING_PTR(f) will already be
-     * null-terminated for us.
-     */
-    f = rb_str_new(NULL, HTTP_PREFIX_LEN + flen);
-    memcpy(RSTRING_PTR(f), HTTP_PREFIX, HTTP_PREFIX_LEN);
-    memcpy(RSTRING_PTR(f) + HTTP_PREFIX_LEN, field, flen);
-    assert(*(RSTRING_PTR(f) + RSTRING_LEN(f)) == '\0'); /* paranoia */
-    /* fprintf(stderr, "UNKNOWN HEADER <%s>\n", RSTRING_PTR(f)); */
-  } else if (f == global_http_host && rb_hash_aref(req, f) != Qnil) {
-    return;
+    VALIDATE_MAX_LENGTH(hp->s.field_len, FIELD_NAME);
+    f = uncommon_field(PTR_TO(start.field), hp->s.field_len);
+  } else if (f == g_http_connection) {
+    if (hp->flags & UH_FL_KAMETHOD) {
+      if (STR_CSTR_CASE_EQ(v, "keep-alive"))
+        hp->flags |= UH_FL_KAVERSION;
+      else if (STR_CSTR_CASE_EQ(v, "close"))
+        hp->flags &= ~UH_FL_KEEPALIVE;
+    }
+  } else if (f == g_content_length) {
+    hp->len.content = parse_length(RSTRING_PTR(v), RSTRING_LEN(v));
+    if (hp->len.content < 0)
+      rb_raise(eHttpParserError, "invalid Content-Length");
+    hp->flags |= UH_FL_HASBODY;
+    invalid_if_trailer(hp->flags);
+  } else if (f == g_http_transfer_encoding) {
+    if (STR_CSTR_CASE_EQ(v, "chunked"))
+      hp->flags |= UH_FL_CHUNKED | UH_FL_HASBODY;
+    invalid_if_trailer(hp->flags);
+  } else if (f == g_http_trailer) {
+    hp->flags |= UH_FL_HASTRAILER;
+    invalid_if_trailer(hp->flags);
   }
 
-  rb_hash_aset(req, f, rb_str_new(value, vlen));
+  e = rb_hash_aref(req, f);
+  if (e == Qnil) {
+    rb_hash_aset(req, f, v);
+  } else if (f != g_http_host) {
+    /* full URLs in REQUEST_URI take precedence for the Host: header */
+    rb_str_buf_cat(e, ",", 1);
+    rb_str_buf_append(e, v);
+  }
 }
 
-static void request_method(void *data, const char *at, size_t length)
-{
-  VALUE req = (VALUE)data;
-  VALUE val = Qnil;
+/** Machine **/
 
-  val = rb_str_new(at, length);
-  rb_hash_aset(req, global_request_method, val);
-}
 
-static void scheme(void *data, const char *at, size_t length)
-{
-  rb_hash_aset((VALUE)data, global_rack_url_scheme, rb_str_new(at, length));
-}
+#line 250 "unicorn_http.rl"
 
-static void host(void *data, const char *at, size_t length)
-{
-  rb_hash_aset((VALUE)data, global_http_host, rb_str_new(at, length));
-}
 
-static void request_uri(void *data, const char *at, size_t length)
-{
-  VALUE req = (VALUE)data;
-  VALUE val = Qnil;
+/** Data **/
 
-  VALIDATE_MAX_LENGTH(length, REQUEST_URI);
+#line 145 "unicorn_http.c"
+static const int http_parser_start = 1;
+static const int http_parser_first_final = 83;
+static const int http_parser_error = 0;
 
-  val = rb_str_new(at, length);
-  rb_hash_aset(req, global_request_uri, val);
+static const int http_parser_en_ChunkedBody = 63;
+static const int http_parser_en_ChunkedBody_chunk_chunk_end = 69;
+static const int http_parser_en_Trailers = 77;
+static const int http_parser_en_main = 1;
 
-  /* "OPTIONS * HTTP/1.1\r\n" is a valid request */
-  if (length == 1 && *at == '*') {
-    val = rb_str_new(NULL, 0);
-    rb_hash_aset(req, global_request_path, val);
-    rb_hash_aset(req, global_path_info, val);
-  }
-}
 
-static void fragment(void *data, const char *at, size_t length)
+#line 254 "unicorn_http.rl"
+
+static void http_parser_init(struct http_parser *hp)
 {
-  VALUE req = (VALUE)data;
-  VALUE val = Qnil;
+  int cs = 0;
+  memset(hp, 0, sizeof(struct http_parser));
 
-  VALIDATE_MAX_LENGTH(length, FRAGMENT);
+#line 163 "unicorn_http.c"
+	{
+	cs = http_parser_start;
+	}
 
-  val = rb_str_new(at, length);
-  rb_hash_aset(req, global_fragment, val);
+#line 260 "unicorn_http.rl"
+  hp->cs = cs;
 }
 
-static void request_path(void *data, const char *at, size_t length)
+/** exec **/
+static void http_parser_execute(struct http_parser *hp,
+  VALUE req, const char *buffer, size_t len)
 {
-  VALUE req = (VALUE)data;
-  VALUE val = Qnil;
+  const char *p, *pe;
+  int cs = hp->cs;
+  size_t off = hp->start.offset;
 
-  VALIDATE_MAX_LENGTH(length, REQUEST_PATH);
+  if (cs == http_parser_first_final)
+    return;
 
-  val = rb_str_new(at, length);
-  rb_hash_aset(req, global_request_path, val);
+  assert(off <= len && "offset past end of buffer");
 
-  /* rack says PATH_INFO must start with "/" or be empty */
-  if (!(length == 1 && *at == '*'))
-    rb_hash_aset(req, global_path_info, val);
-}
+  p = buffer+off;
+  pe = buffer+len;
 
-static void query_string(void *data, const char *at, size_t length)
-{
-  VALUE req = (VALUE)data;
-  VALUE val = Qnil;
+  assert(pe - p == len - off && "pointers aren't same distance");
+
+  if (hp->flags & UH_FL_INCHUNK) {
+    hp->flags &= ~(UH_FL_INCHUNK);
+    goto skip_chunk_data_hack;
+  }
+
+#line 195 "unicorn_http.c"
+	{
+	if ( p == pe )
+		goto _test_eof;
+	switch ( cs )
+	{
+case 1:
+	switch( (*p) ) {
+		case 36: goto tr0;
+		case 95: goto tr0;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto tr0;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto tr0;
+	} else
+		goto tr0;
+	goto st0;
+st0:
+cs = 0;
+	goto _out;
+tr0:
+#line 139 "unicorn_http.rl"
+	{MARK(mark, p); }
+	goto st2;
+st2:
+	if ( ++p == pe )
+		goto _test_eof2;
+case 2:
+#line 226 "unicorn_http.c"
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st44;
+		case 95: goto st44;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st44;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st44;
+	} else
+		goto st44;
+	goto st0;
+tr2:
+#line 147 "unicorn_http.rl"
+	{
+    request_method(hp, req, PTR_TO(mark), LEN(mark, p));
+  }
+	goto st3;
+st3:
+	if ( ++p == pe )
+		goto _test_eof3;
+case 3:
+#line 251 "unicorn_http.c"
+	switch( (*p) ) {
+		case 42: goto tr4;
+		case 47: goto tr5;
+		case 72: goto tr6;
+		case 104: goto tr6;
+	}
+	goto st0;
+tr4:
+#line 139 "unicorn_http.rl"
+	{MARK(mark, p); }
+	goto st4;
+st4:
+	if ( ++p == pe )
+		goto _test_eof4;
+case 4:
+#line 267 "unicorn_http.c"
+	switch( (*p) ) {
+		case 32: goto tr7;
+		case 35: goto tr8;
+	}
+	goto st0;
+tr7:
+#line 156 "unicorn_http.rl"
+	{
+    size_t len = LEN(mark, p);
+    VALUE str;
+
+    VALIDATE_MAX_LENGTH(len, REQUEST_URI);
+    str = rb_hash_aset(req, g_request_uri, STR_NEW(mark, p));
+    /*
+     * "OPTIONS * HTTP/1.1\r\n" is a valid request, but we can't have '*'
+     * in REQUEST_PATH or PATH_INFO or else Rack::Lint will complain
+     */
+    if (STR_CSTR_EQ(str, "*")) {
+      str = rb_str_new(NULL, 0);
+      rb_hash_aset(req, g_path_info, str);
+      rb_hash_aset(req, g_request_path, str);
+    }
+  }
+	goto st5;
+tr30:
+#line 139 "unicorn_http.rl"
+	{MARK(mark, p); }
+#line 172 "unicorn_http.rl"
+	{
+    VALIDATE_MAX_LENGTH(LEN(mark, p), FRAGMENT);
+    rb_hash_aset(req, g_fragment, STR_NEW(mark, p));
+  }
+	goto st5;
+tr33:
+#line 172 "unicorn_http.rl"
+	{
+    VALIDATE_MAX_LENGTH(LEN(mark, p), FRAGMENT);
+    rb_hash_aset(req, g_fragment, STR_NEW(mark, p));
+  }
+	goto st5;
+tr37:
+#line 182 "unicorn_http.rl"
+	{
+    VALUE val;
+    size_t len = LEN(mark, p);
+
+    VALIDATE_MAX_LENGTH(len, REQUEST_PATH);
+    val = rb_hash_aset(req, g_request_path, STR_NEW(mark, p));
+
+    /* rack says PATH_INFO must start with "/" or be empty */
+    if (!STR_CSTR_EQ(val, "*"))
+      rb_hash_aset(req, g_path_info, val);
+  }
+#line 156 "unicorn_http.rl"
+	{
+    size_t len = LEN(mark, p);
+    VALUE str;
+
+    VALIDATE_MAX_LENGTH(len, REQUEST_URI);
+    str = rb_hash_aset(req, g_request_uri, STR_NEW(mark, p));
+    /*
+     * "OPTIONS * HTTP/1.1\r\n" is a valid request, but we can't have '*'
+     * in REQUEST_PATH or PATH_INFO or else Rack::Lint will complain
+     */
+    if (STR_CSTR_EQ(str, "*")) {
+      str = rb_str_new(NULL, 0);
+      rb_hash_aset(req, g_path_info, str);
+      rb_hash_aset(req, g_request_path, str);
+    }
+  }
+	goto st5;
+tr48:
+#line 176 "unicorn_http.rl"
+	{MARK(start.query, p); }
+#line 177 "unicorn_http.rl"
+	{
+    VALIDATE_MAX_LENGTH(LEN(start.query, p), QUERY_STRING);
+    rb_hash_aset(req, g_query_string, STR_NEW(start.query, p));
+  }
+#line 156 "unicorn_http.rl"
+	{
+    size_t len = LEN(mark, p);
+    VALUE str;
+
+    VALIDATE_MAX_LENGTH(len, REQUEST_URI);
+    str = rb_hash_aset(req, g_request_uri, STR_NEW(mark, p));
+    /*
+     * "OPTIONS * HTTP/1.1\r\n" is a valid request, but we can't have '*'
+     * in REQUEST_PATH or PATH_INFO or else Rack::Lint will complain
+     */
+    if (STR_CSTR_EQ(str, "*")) {
+      str = rb_str_new(NULL, 0);
+      rb_hash_aset(req, g_path_info, str);
+      rb_hash_aset(req, g_request_path, str);
+    }
+  }
+	goto st5;
+tr52:
+#line 177 "unicorn_http.rl"
+	{
+    VALIDATE_MAX_LENGTH(LEN(start.query, p), QUERY_STRING);
+    rb_hash_aset(req, g_query_string, STR_NEW(start.query, p));
+  }
+#line 156 "unicorn_http.rl"
+	{
+    size_t len = LEN(mark, p);
+    VALUE str;
+
+    VALIDATE_MAX_LENGTH(len, REQUEST_URI);
+    str = rb_hash_aset(req, g_request_uri, STR_NEW(mark, p));
+    /*
+     * "OPTIONS * HTTP/1.1\r\n" is a valid request, but we can't have '*'
+     * in REQUEST_PATH or PATH_INFO or else Rack::Lint will complain
+     */
+    if (STR_CSTR_EQ(str, "*")) {
+      str = rb_str_new(NULL, 0);
+      rb_hash_aset(req, g_path_info, str);
+      rb_hash_aset(req, g_request_path, str);
+    }
+  }
+	goto st5;
+st5:
+	if ( ++p == pe )
+		goto _test_eof5;
+case 5:
+#line 393 "unicorn_http.c"
+	if ( (*p) == 72 )
+		goto tr9;
+	goto st0;
+tr9:
+#line 139 "unicorn_http.rl"
+	{MARK(mark, p); }
+	goto st6;
+st6:
+	if ( ++p == pe )
+		goto _test_eof6;
+case 6:
+#line 405 "unicorn_http.c"
+	if ( (*p) == 84 )
+		goto st7;
+	goto st0;
+st7:
+	if ( ++p == pe )
+		goto _test_eof7;
+case 7:
+	if ( (*p) == 84 )
+		goto st8;
+	goto st0;
+st8:
+	if ( ++p == pe )
+		goto _test_eof8;
+case 8:
+	if ( (*p) == 80 )
+		goto st9;
+	goto st0;
+st9:
+	if ( ++p == pe )
+		goto _test_eof9;
+case 9:
+	if ( (*p) == 47 )
+		goto st10;
+	goto st0;
+st10:
+	if ( ++p == pe )
+		goto _test_eof10;
+case 10:
+	if ( 48 <= (*p) && (*p) <= 57 )
+		goto st11;
+	goto st0;
+st11:
+	if ( ++p == pe )
+		goto _test_eof11;
+case 11:
+	if ( (*p) == 46 )
+		goto st12;
+	if ( 48 <= (*p) && (*p) <= 57 )
+		goto st11;
+	goto st0;
+st12:
+	if ( ++p == pe )
+		goto _test_eof12;
+case 12:
+	if ( 48 <= (*p) && (*p) <= 57 )
+		goto st13;
+	goto st0;
+st13:
+	if ( ++p == pe )
+		goto _test_eof13;
+case 13:
+	if ( (*p) == 13 )
+		goto tr17;
+	if ( 48 <= (*p) && (*p) <= 57 )
+		goto st13;
+	goto st0;
+tr17:
+#line 181 "unicorn_http.rl"
+	{ http_version(hp, req, PTR_TO(mark), LEN(mark, p)); }
+	goto st14;
+tr25:
+#line 145 "unicorn_http.rl"
+	{ MARK(mark, p); }
+#line 146 "unicorn_http.rl"
+	{ write_value(req, hp, buffer, p); }
+	goto st14;
+tr28:
+#line 146 "unicorn_http.rl"
+	{ write_value(req, hp, buffer, p); }
+	goto st14;
+st14:
+	if ( ++p == pe )
+		goto _test_eof14;
+case 14:
+#line 480 "unicorn_http.c"
+	if ( (*p) == 10 )
+		goto st15;
+	goto st0;
+st15:
+	if ( ++p == pe )
+		goto _test_eof15;
+case 15:
+	switch( (*p) ) {
+		case 13: goto st16;
+		case 33: goto tr20;
+		case 124: goto tr20;
+		case 126: goto tr20;
+	}
+	if ( (*p) < 45 ) {
+		if ( (*p) > 39 ) {
+			if ( 42 <= (*p) && (*p) <= 43 )
+				goto tr20;
+		} else if ( (*p) >= 35 )
+			goto tr20;
+	} else if ( (*p) > 46 ) {
+		if ( (*p) < 65 ) {
+			if ( 48 <= (*p) && (*p) <= 57 )
+				goto tr20;
+		} else if ( (*p) > 90 ) {
+			if ( 94 <= (*p) && (*p) <= 122 )
+				goto tr20;
+		} else
+			goto tr20;
+	} else
+		goto tr20;
+	goto st0;
+st16:
+	if ( ++p == pe )
+		goto _test_eof16;
+case 16:
+	if ( (*p) == 10 )
+		goto tr21;
+	goto st0;
+tr21:
+#line 198 "unicorn_http.rl"
+	{
+    finalize_header(req);
+
+    cs = http_parser_first_final;
+    if (hp->flags & UH_FL_HASBODY) {
+      hp->flags |= UH_FL_INBODY;
+      if (hp->flags & UH_FL_CHUNKED)
+        cs = http_parser_en_ChunkedBody;
+    } else {
+      assert(!(hp->flags & UH_FL_CHUNKED));
+    }
+    /*
+     * go back to Ruby so we can call the Rack application, we'll reenter
+     * the parser iff the body needs to be processed.
+     */
+    goto post_exec;
+  }
+	goto st83;
+st83:
+	if ( ++p == pe )
+		goto _test_eof83;
+case 83:
+#line 543 "unicorn_http.c"
+	goto st0;
+tr20:
+#line 141 "unicorn_http.rl"
+	{ MARK(start.field, p); }
+#line 142 "unicorn_http.rl"
+	{ snake_upcase_char((char *)p); }
+	goto st17;
+tr22:
+#line 142 "unicorn_http.rl"
+	{ snake_upcase_char((char *)p); }
+	goto st17;
+st17:
+	if ( ++p == pe )
+		goto _test_eof17;
+case 17:
+#line 559 "unicorn_http.c"
+	switch( (*p) ) {
+		case 33: goto tr22;
+		case 58: goto tr23;
+		case 124: goto tr22;
+		case 126: goto tr22;
+	}
+	if ( (*p) < 45 ) {
+		if ( (*p) > 39 ) {
+			if ( 42 <= (*p) && (*p) <= 43 )
+				goto tr22;
+		} else if ( (*p) >= 35 )
+			goto tr22;
+	} else if ( (*p) > 46 ) {
+		if ( (*p) < 65 ) {
+			if ( 48 <= (*p) && (*p) <= 57 )
+				goto tr22;
+		} else if ( (*p) > 90 ) {
+			if ( 94 <= (*p) && (*p) <= 122 )
+				goto tr22;
+		} else
+			goto tr22;
+	} else
+		goto tr22;
+	goto st0;
+tr23:
+#line 144 "unicorn_http.rl"
+	{ hp->s.field_len = LEN(start.field, p); }
+	goto st18;
+tr26:
+#line 145 "unicorn_http.rl"
+	{ MARK(mark, p); }
+	goto st18;
+st18:
+	if ( ++p == pe )
+		goto _test_eof18;
+case 18:
+#line 596 "unicorn_http.c"
+	switch( (*p) ) {
+		case 13: goto tr25;
+		case 32: goto tr26;
+	}
+	goto tr24;
+tr24:
+#line 145 "unicorn_http.rl"
+	{ MARK(mark, p); }
+	goto st19;
+st19:
+	if ( ++p == pe )
+		goto _test_eof19;
+case 19:
+#line 610 "unicorn_http.c"
+	if ( (*p) == 13 )
+		goto tr28;
+	goto st19;
+tr8:
+#line 156 "unicorn_http.rl"
+	{
+    size_t len = LEN(mark, p);
+    VALUE str;
+
+    VALIDATE_MAX_LENGTH(len, REQUEST_URI);
+    str = rb_hash_aset(req, g_request_uri, STR_NEW(mark, p));
+    /*
+     * "OPTIONS * HTTP/1.1\r\n" is a valid request, but we can't have '*'
+     * in REQUEST_PATH or PATH_INFO or else Rack::Lint will complain
+     */
+    if (STR_CSTR_EQ(str, "*")) {
+      str = rb_str_new(NULL, 0);
+      rb_hash_aset(req, g_path_info, str);
+      rb_hash_aset(req, g_request_path, str);
+    }
+  }
+	goto st20;
+tr38:
+#line 182 "unicorn_http.rl"
+	{
+    VALUE val;
+    size_t len = LEN(mark, p);
+
+    VALIDATE_MAX_LENGTH(len, REQUEST_PATH);
+    val = rb_hash_aset(req, g_request_path, STR_NEW(mark, p));
+
+    /* rack says PATH_INFO must start with "/" or be empty */
+    if (!STR_CSTR_EQ(val, "*"))
+      rb_hash_aset(req, g_path_info, val);
+  }
+#line 156 "unicorn_http.rl"
+	{
+    size_t len = LEN(mark, p);
+    VALUE str;
+
+    VALIDATE_MAX_LENGTH(len, REQUEST_URI);
+    str = rb_hash_aset(req, g_request_uri, STR_NEW(mark, p));
+    /*
+     * "OPTIONS * HTTP/1.1\r\n" is a valid request, but we can't have '*'
+     * in REQUEST_PATH or PATH_INFO or else Rack::Lint will complain
+     */
+    if (STR_CSTR_EQ(str, "*")) {
+      str = rb_str_new(NULL, 0);
+      rb_hash_aset(req, g_path_info, str);
+      rb_hash_aset(req, g_request_path, str);
+    }
+  }
+	goto st20;
+tr49:
+#line 176 "unicorn_http.rl"
+	{MARK(start.query, p); }
+#line 177 "unicorn_http.rl"
+	{
+    VALIDATE_MAX_LENGTH(LEN(start.query, p), QUERY_STRING);
+    rb_hash_aset(req, g_query_string, STR_NEW(start.query, p));
+  }
+#line 156 "unicorn_http.rl"
+	{
+    size_t len = LEN(mark, p);
+    VALUE str;
 
-  VALIDATE_MAX_LENGTH(length, QUERY_STRING);
+    VALIDATE_MAX_LENGTH(len, REQUEST_URI);
+    str = rb_hash_aset(req, g_request_uri, STR_NEW(mark, p));
+    /*
+     * "OPTIONS * HTTP/1.1\r\n" is a valid request, but we can't have '*'
+     * in REQUEST_PATH or PATH_INFO or else Rack::Lint will complain
+     */
+    if (STR_CSTR_EQ(str, "*")) {
+      str = rb_str_new(NULL, 0);
+      rb_hash_aset(req, g_path_info, str);
+      rb_hash_aset(req, g_request_path, str);
+    }
+  }
+	goto st20;
+tr53:
+#line 177 "unicorn_http.rl"
+	{
+    VALIDATE_MAX_LENGTH(LEN(start.query, p), QUERY_STRING);
+    rb_hash_aset(req, g_query_string, STR_NEW(start.query, p));
+  }
+#line 156 "unicorn_http.rl"
+	{
+    size_t len = LEN(mark, p);
+    VALUE str;
 
-  val = rb_str_new(at, length);
-  rb_hash_aset(req, global_query_string, val);
+    VALIDATE_MAX_LENGTH(len, REQUEST_URI);
+    str = rb_hash_aset(req, g_request_uri, STR_NEW(mark, p));
+    /*
+     * "OPTIONS * HTTP/1.1\r\n" is a valid request, but we can't have '*'
+     * in REQUEST_PATH or PATH_INFO or else Rack::Lint will complain
+     */
+    if (STR_CSTR_EQ(str, "*")) {
+      str = rb_str_new(NULL, 0);
+      rb_hash_aset(req, g_path_info, str);
+      rb_hash_aset(req, g_request_path, str);
+    }
+  }
+	goto st20;
+st20:
+	if ( ++p == pe )
+		goto _test_eof20;
+case 20:
+#line 718 "unicorn_http.c"
+	switch( (*p) ) {
+		case 32: goto tr30;
+		case 35: goto st0;
+		case 37: goto tr31;
+		case 127: goto st0;
+	}
+	if ( 0 <= (*p) && (*p) <= 31 )
+		goto st0;
+	goto tr29;
+tr29:
+#line 139 "unicorn_http.rl"
+	{MARK(mark, p); }
+	goto st21;
+st21:
+	if ( ++p == pe )
+		goto _test_eof21;
+case 21:
+#line 736 "unicorn_http.c"
+	switch( (*p) ) {
+		case 32: goto tr33;
+		case 35: goto st0;
+		case 37: goto st22;
+		case 127: goto st0;
+	}
+	if ( 0 <= (*p) && (*p) <= 31 )
+		goto st0;
+	goto st21;
+tr31:
+#line 139 "unicorn_http.rl"
+	{MARK(mark, p); }
+	goto st22;
+st22:
+	if ( ++p == pe )
+		goto _test_eof22;
+case 22:
+#line 754 "unicorn_http.c"
+	if ( (*p) < 65 ) {
+		if ( 48 <= (*p) && (*p) <= 57 )
+			goto st23;
+	} else if ( (*p) > 70 ) {
+		if ( 97 <= (*p) && (*p) <= 102 )
+			goto st23;
+	} else
+		goto st23;
+	goto st0;
+st23:
+	if ( ++p == pe )
+		goto _test_eof23;
+case 23:
+	if ( (*p) < 65 ) {
+		if ( 48 <= (*p) && (*p) <= 57 )
+			goto st21;
+	} else if ( (*p) > 70 ) {
+		if ( 97 <= (*p) && (*p) <= 102 )
+			goto st21;
+	} else
+		goto st21;
+	goto st0;
+tr5:
+#line 139 "unicorn_http.rl"
+	{MARK(mark, p); }
+	goto st24;
+tr65:
+#line 153 "unicorn_http.rl"
+	{
+    rb_hash_aset(req, g_http_host, STR_NEW(mark, p));
+  }
+#line 139 "unicorn_http.rl"
+	{MARK(mark, p); }
+	goto st24;
+st24:
+	if ( ++p == pe )
+		goto _test_eof24;
+case 24:
+#line 793 "unicorn_http.c"
+	switch( (*p) ) {
+		case 32: goto tr37;
+		case 35: goto tr38;
+		case 37: goto st25;
+		case 59: goto tr40;
+		case 63: goto tr41;
+		case 127: goto st0;
+	}
+	if ( 0 <= (*p) && (*p) <= 31 )
+		goto st0;
+	goto st24;
+st25:
+	if ( ++p == pe )
+		goto _test_eof25;
+case 25:
+	if ( (*p) < 65 ) {
+		if ( 48 <= (*p) && (*p) <= 57 )
+			goto st26;
+	} else if ( (*p) > 70 ) {
+		if ( 97 <= (*p) && (*p) <= 102 )
+			goto st26;
+	} else
+		goto st26;
+	goto st0;
+st26:
+	if ( ++p == pe )
+		goto _test_eof26;
+case 26:
+	if ( (*p) < 65 ) {
+		if ( 48 <= (*p) && (*p) <= 57 )
+			goto st24;
+	} else if ( (*p) > 70 ) {
+		if ( 97 <= (*p) && (*p) <= 102 )
+			goto st24;
+	} else
+		goto st24;
+	goto st0;
+tr40:
+#line 182 "unicorn_http.rl"
+	{
+    VALUE val;
+    size_t len = LEN(mark, p);
+
+    VALIDATE_MAX_LENGTH(len, REQUEST_PATH);
+    val = rb_hash_aset(req, g_request_path, STR_NEW(mark, p));
+
+    /* rack says PATH_INFO must start with "/" or be empty */
+    if (!STR_CSTR_EQ(val, "*"))
+      rb_hash_aset(req, g_path_info, val);
+  }
+	goto st27;
+st27:
+	if ( ++p == pe )
+		goto _test_eof27;
+case 27:
+#line 849 "unicorn_http.c"
+	switch( (*p) ) {
+		case 32: goto tr7;
+		case 35: goto tr8;
+		case 37: goto st28;
+		case 63: goto st30;
+		case 127: goto st0;
+	}
+	if ( 0 <= (*p) && (*p) <= 31 )
+		goto st0;
+	goto st27;
+st28:
+	if ( ++p == pe )
+		goto _test_eof28;
+case 28:
+	if ( (*p) < 65 ) {
+		if ( 48 <= (*p) && (*p) <= 57 )
+			goto st29;
+	} else if ( (*p) > 70 ) {
+		if ( 97 <= (*p) && (*p) <= 102 )
+			goto st29;
+	} else
+		goto st29;
+	goto st0;
+st29:
+	if ( ++p == pe )
+		goto _test_eof29;
+case 29:
+	if ( (*p) < 65 ) {
+		if ( 48 <= (*p) && (*p) <= 57 )
+			goto st27;
+	} else if ( (*p) > 70 ) {
+		if ( 97 <= (*p) && (*p) <= 102 )
+			goto st27;
+	} else
+		goto st27;
+	goto st0;
+tr41:
+#line 182 "unicorn_http.rl"
+	{
+    VALUE val;
+    size_t len = LEN(mark, p);
+
+    VALIDATE_MAX_LENGTH(len, REQUEST_PATH);
+    val = rb_hash_aset(req, g_request_path, STR_NEW(mark, p));
+
+    /* rack says PATH_INFO must start with "/" or be empty */
+    if (!STR_CSTR_EQ(val, "*"))
+      rb_hash_aset(req, g_path_info, val);
+  }
+	goto st30;
+st30:
+	if ( ++p == pe )
+		goto _test_eof30;
+case 30:
+#line 904 "unicorn_http.c"
+	switch( (*p) ) {
+		case 32: goto tr48;
+		case 35: goto tr49;
+		case 37: goto tr50;
+		case 127: goto st0;
+	}
+	if ( 0 <= (*p) && (*p) <= 31 )
+		goto st0;
+	goto tr47;
+tr47:
+#line 176 "unicorn_http.rl"
+	{MARK(start.query, p); }
+	goto st31;
+st31:
+	if ( ++p == pe )
+		goto _test_eof31;
+case 31:
+#line 922 "unicorn_http.c"
+	switch( (*p) ) {
+		case 32: goto tr52;
+		case 35: goto tr53;
+		case 37: goto st32;
+		case 127: goto st0;
+	}
+	if ( 0 <= (*p) && (*p) <= 31 )
+		goto st0;
+	goto st31;
+tr50:
+#line 176 "unicorn_http.rl"
+	{MARK(start.query, p); }
+	goto st32;
+st32:
+	if ( ++p == pe )
+		goto _test_eof32;
+case 32:
+#line 940 "unicorn_http.c"
+	if ( (*p) < 65 ) {
+		if ( 48 <= (*p) && (*p) <= 57 )
+			goto st33;
+	} else if ( (*p) > 70 ) {
+		if ( 97 <= (*p) && (*p) <= 102 )
+			goto st33;
+	} else
+		goto st33;
+	goto st0;
+st33:
+	if ( ++p == pe )
+		goto _test_eof33;
+case 33:
+	if ( (*p) < 65 ) {
+		if ( 48 <= (*p) && (*p) <= 57 )
+			goto st31;
+	} else if ( (*p) > 70 ) {
+		if ( 97 <= (*p) && (*p) <= 102 )
+			goto st31;
+	} else
+		goto st31;
+	goto st0;
+tr6:
+#line 139 "unicorn_http.rl"
+	{MARK(mark, p); }
+#line 143 "unicorn_http.rl"
+	{ downcase_char((char *)p); }
+	goto st34;
+st34:
+	if ( ++p == pe )
+		goto _test_eof34;
+case 34:
+#line 973 "unicorn_http.c"
+	switch( (*p) ) {
+		case 84: goto tr56;
+		case 116: goto tr56;
+	}
+	goto st0;
+tr56:
+#line 143 "unicorn_http.rl"
+	{ downcase_char((char *)p); }
+	goto st35;
+st35:
+	if ( ++p == pe )
+		goto _test_eof35;
+case 35:
+#line 987 "unicorn_http.c"
+	switch( (*p) ) {
+		case 84: goto tr57;
+		case 116: goto tr57;
+	}
+	goto st0;
+tr57:
+#line 143 "unicorn_http.rl"
+	{ downcase_char((char *)p); }
+	goto st36;
+st36:
+	if ( ++p == pe )
+		goto _test_eof36;
+case 36:
+#line 1001 "unicorn_http.c"
+	switch( (*p) ) {
+		case 80: goto tr58;
+		case 112: goto tr58;
+	}
+	goto st0;
+tr58:
+#line 143 "unicorn_http.rl"
+	{ downcase_char((char *)p); }
+	goto st37;
+st37:
+	if ( ++p == pe )
+		goto _test_eof37;
+case 37:
+#line 1015 "unicorn_http.c"
+	switch( (*p) ) {
+		case 58: goto tr59;
+		case 83: goto tr60;
+		case 115: goto tr60;
+	}
+	goto st0;
+tr59:
+#line 150 "unicorn_http.rl"
+	{
+    rb_hash_aset(req, g_rack_url_scheme, STR_NEW(mark, p));
+  }
+	goto st38;
+st38:
+	if ( ++p == pe )
+		goto _test_eof38;
+case 38:
+#line 1032 "unicorn_http.c"
+	if ( (*p) == 47 )
+		goto st39;
+	goto st0;
+st39:
+	if ( ++p == pe )
+		goto _test_eof39;
+case 39:
+	if ( (*p) == 47 )
+		goto st40;
+	goto st0;
+st40:
+	if ( ++p == pe )
+		goto _test_eof40;
+case 40:
+	if ( (*p) == 95 )
+		goto tr63;
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto tr63;
+	} else if ( (*p) > 57 ) {
+		if ( (*p) > 90 ) {
+			if ( 97 <= (*p) && (*p) <= 122 )
+				goto tr63;
+		} else if ( (*p) >= 65 )
+			goto tr63;
+	} else
+		goto tr63;
+	goto st0;
+tr63:
+#line 139 "unicorn_http.rl"
+	{MARK(mark, p); }
+	goto st41;
+st41:
+	if ( ++p == pe )
+		goto _test_eof41;
+case 41:
+#line 1069 "unicorn_http.c"
+	switch( (*p) ) {
+		case 47: goto tr65;
+		case 58: goto st42;
+		case 95: goto st41;
+	}
+	if ( (*p) < 65 ) {
+		if ( 45 <= (*p) && (*p) <= 57 )
+			goto st41;
+	} else if ( (*p) > 90 ) {
+		if ( 97 <= (*p) && (*p) <= 122 )
+			goto st41;
+	} else
+		goto st41;
+	goto st0;
+st42:
+	if ( ++p == pe )
+		goto _test_eof42;
+case 42:
+	if ( (*p) == 47 )
+		goto tr65;
+	if ( 48 <= (*p) && (*p) <= 57 )
+		goto st42;
+	goto st0;
+tr60:
+#line 143 "unicorn_http.rl"
+	{ downcase_char((char *)p); }
+	goto st43;
+st43:
+	if ( ++p == pe )
+		goto _test_eof43;
+case 43:
+#line 1101 "unicorn_http.c"
+	if ( (*p) == 58 )
+		goto tr59;
+	goto st0;
+st44:
+	if ( ++p == pe )
+		goto _test_eof44;
+case 44:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st45;
+		case 95: goto st45;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st45;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st45;
+	} else
+		goto st45;
+	goto st0;
+st45:
+	if ( ++p == pe )
+		goto _test_eof45;
+case 45:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st46;
+		case 95: goto st46;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st46;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st46;
+	} else
+		goto st46;
+	goto st0;
+st46:
+	if ( ++p == pe )
+		goto _test_eof46;
+case 46:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st47;
+		case 95: goto st47;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st47;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st47;
+	} else
+		goto st47;
+	goto st0;
+st47:
+	if ( ++p == pe )
+		goto _test_eof47;
+case 47:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st48;
+		case 95: goto st48;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st48;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st48;
+	} else
+		goto st48;
+	goto st0;
+st48:
+	if ( ++p == pe )
+		goto _test_eof48;
+case 48:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st49;
+		case 95: goto st49;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st49;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st49;
+	} else
+		goto st49;
+	goto st0;
+st49:
+	if ( ++p == pe )
+		goto _test_eof49;
+case 49:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st50;
+		case 95: goto st50;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st50;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st50;
+	} else
+		goto st50;
+	goto st0;
+st50:
+	if ( ++p == pe )
+		goto _test_eof50;
+case 50:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st51;
+		case 95: goto st51;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st51;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st51;
+	} else
+		goto st51;
+	goto st0;
+st51:
+	if ( ++p == pe )
+		goto _test_eof51;
+case 51:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st52;
+		case 95: goto st52;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st52;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st52;
+	} else
+		goto st52;
+	goto st0;
+st52:
+	if ( ++p == pe )
+		goto _test_eof52;
+case 52:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st53;
+		case 95: goto st53;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st53;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st53;
+	} else
+		goto st53;
+	goto st0;
+st53:
+	if ( ++p == pe )
+		goto _test_eof53;
+case 53:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st54;
+		case 95: goto st54;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st54;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st54;
+	} else
+		goto st54;
+	goto st0;
+st54:
+	if ( ++p == pe )
+		goto _test_eof54;
+case 54:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st55;
+		case 95: goto st55;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st55;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st55;
+	} else
+		goto st55;
+	goto st0;
+st55:
+	if ( ++p == pe )
+		goto _test_eof55;
+case 55:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st56;
+		case 95: goto st56;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st56;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st56;
+	} else
+		goto st56;
+	goto st0;
+st56:
+	if ( ++p == pe )
+		goto _test_eof56;
+case 56:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st57;
+		case 95: goto st57;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st57;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st57;
+	} else
+		goto st57;
+	goto st0;
+st57:
+	if ( ++p == pe )
+		goto _test_eof57;
+case 57:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st58;
+		case 95: goto st58;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st58;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st58;
+	} else
+		goto st58;
+	goto st0;
+st58:
+	if ( ++p == pe )
+		goto _test_eof58;
+case 58:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st59;
+		case 95: goto st59;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st59;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st59;
+	} else
+		goto st59;
+	goto st0;
+st59:
+	if ( ++p == pe )
+		goto _test_eof59;
+case 59:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st60;
+		case 95: goto st60;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st60;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st60;
+	} else
+		goto st60;
+	goto st0;
+st60:
+	if ( ++p == pe )
+		goto _test_eof60;
+case 60:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st61;
+		case 95: goto st61;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st61;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st61;
+	} else
+		goto st61;
+	goto st0;
+st61:
+	if ( ++p == pe )
+		goto _test_eof61;
+case 61:
+	switch( (*p) ) {
+		case 32: goto tr2;
+		case 36: goto st62;
+		case 95: goto st62;
+	}
+	if ( (*p) < 48 ) {
+		if ( 45 <= (*p) && (*p) <= 46 )
+			goto st62;
+	} else if ( (*p) > 57 ) {
+		if ( 65 <= (*p) && (*p) <= 90 )
+			goto st62;
+	} else
+		goto st62;
+	goto st0;
+st62:
+	if ( ++p == pe )
+		goto _test_eof62;
+case 62:
+	if ( (*p) == 32 )
+		goto tr2;
+	goto st0;
+st63:
+	if ( ++p == pe )
+		goto _test_eof63;
+case 63:
+	if ( (*p) == 48 )
+		goto tr85;
+	if ( (*p) < 65 ) {
+		if ( 49 <= (*p) && (*p) <= 57 )
+			goto tr86;
+	} else if ( (*p) > 70 ) {
+		if ( 97 <= (*p) && (*p) <= 102 )
+			goto tr86;
+	} else
+		goto tr86;
+	goto st0;
+tr85:
+#line 193 "unicorn_http.rl"
+	{
+    hp->len.chunk = step_incr(hp->len.chunk, (*p), 16);
+    if (hp->len.chunk < 0)
+      rb_raise(eHttpParserError, "invalid chunk size");
+  }
+	goto st64;
+st64:
+	if ( ++p == pe )
+		goto _test_eof64;
+case 64:
+#line 1463 "unicorn_http.c"
+	switch( (*p) ) {
+		case 13: goto st65;
+		case 48: goto tr85;
+		case 59: goto st74;
+	}
+	if ( (*p) < 65 ) {
+		if ( 49 <= (*p) && (*p) <= 57 )
+			goto tr86;
+	} else if ( (*p) > 70 ) {
+		if ( 97 <= (*p) && (*p) <= 102 )
+			goto tr86;
+	} else
+		goto tr86;
+	goto st0;
+st65:
+	if ( ++p == pe )
+		goto _test_eof65;
+case 65:
+	if ( (*p) == 10 )
+		goto tr89;
+	goto st0;
+tr89:
+#line 221 "unicorn_http.rl"
+	{
+    if (hp->flags & UH_FL_HASTRAILER) {
+      hp->flags |= UH_FL_INTRAILER;
+      cs = http_parser_en_Trailers;
+    } else {
+      cs = http_parser_first_final;
+    }
+    ++p;
+    goto post_exec;
+  }
+	goto st84;
+st84:
+	if ( ++p == pe )
+		goto _test_eof84;
+case 84:
+#line 1502 "unicorn_http.c"
+	goto st0;
+tr86:
+#line 193 "unicorn_http.rl"
+	{
+    hp->len.chunk = step_incr(hp->len.chunk, (*p), 16);
+    if (hp->len.chunk < 0)
+      rb_raise(eHttpParserError, "invalid chunk size");
+  }
+	goto st66;
+st66:
+	if ( ++p == pe )
+		goto _test_eof66;
+case 66:
+#line 1516 "unicorn_http.c"
+	switch( (*p) ) {
+		case 13: goto st67;
+		case 59: goto st71;
+	}
+	if ( (*p) < 65 ) {
+		if ( 48 <= (*p) && (*p) <= 57 )
+			goto tr86;
+	} else if ( (*p) > 70 ) {
+		if ( 97 <= (*p) && (*p) <= 102 )
+			goto tr86;
+	} else
+		goto tr86;
+	goto st0;
+st67:
+	if ( ++p == pe )
+		goto _test_eof67;
+case 67:
+	if ( (*p) == 10 )
+		goto st68;
+	goto st0;
+st68:
+	if ( ++p == pe )
+		goto _test_eof68;
+case 68:
+	goto tr93;
+tr93:
+#line 232 "unicorn_http.rl"
+	{
+  skip_chunk_data_hack: {
+    size_t nr = MIN(hp->len.chunk, REMAINING);
+    memcpy(RSTRING_PTR(req) + hp->s.dest_offset, p, nr);
+    hp->s.dest_offset += nr;
+    hp->len.chunk -= nr;
+    p += nr;
+    assert(hp->len.chunk >= 0);
+    if (hp->len.chunk > REMAINING) {
+      hp->flags |= UH_FL_INCHUNK;
+      goto post_exec;
+    } else {
+      p--;
+      {goto st69;}
+    }
+  }}
+	goto st69;
+st69:
+	if ( ++p == pe )
+		goto _test_eof69;
+case 69:
+#line 1565 "unicorn_http.c"
+	if ( (*p) == 13 )
+		goto st70;
+	goto st0;
+st70:
+	if ( ++p == pe )
+		goto _test_eof70;
+case 70:
+	if ( (*p) == 10 )
+		goto st63;
+	goto st0;
+st71:
+	if ( ++p == pe )
+		goto _test_eof71;
+case 71:
+	switch( (*p) ) {
+		case 13: goto st67;
+		case 32: goto st71;
+		case 33: goto st72;
+		case 59: goto st71;
+		case 61: goto st73;
+		case 124: goto st72;
+		case 126: goto st72;
+	}
+	if ( (*p) < 45 ) {
+		if ( (*p) > 39 ) {
+			if ( 42 <= (*p) && (*p) <= 43 )
+				goto st72;
+		} else if ( (*p) >= 35 )
+			goto st72;
+	} else if ( (*p) > 46 ) {
+		if ( (*p) < 65 ) {
+			if ( 48 <= (*p) && (*p) <= 57 )
+				goto st72;
+		} else if ( (*p) > 90 ) {
+			if ( 94 <= (*p) && (*p) <= 122 )
+				goto st72;
+		} else
+			goto st72;
+	} else
+		goto st72;
+	goto st0;
+st72:
+	if ( ++p == pe )
+		goto _test_eof72;
+case 72:
+	switch( (*p) ) {
+		case 13: goto st67;
+		case 33: goto st72;
+		case 59: goto st71;
+		case 61: goto st73;
+		case 124: goto st72;
+		case 126: goto st72;
+	}
+	if ( (*p) < 45 ) {
+		if ( (*p) > 39 ) {
+			if ( 42 <= (*p) && (*p) <= 43 )
+				goto st72;
+		} else if ( (*p) >= 35 )
+			goto st72;
+	} else if ( (*p) > 46 ) {
+		if ( (*p) < 65 ) {
+			if ( 48 <= (*p) && (*p) <= 57 )
+				goto st72;
+		} else if ( (*p) > 90 ) {
+			if ( 94 <= (*p) && (*p) <= 122 )
+				goto st72;
+		} else
+			goto st72;
+	} else
+		goto st72;
+	goto st0;
+st73:
+	if ( ++p == pe )
+		goto _test_eof73;
+case 73:
+	switch( (*p) ) {
+		case 13: goto st67;
+		case 33: goto st73;
+		case 59: goto st71;
+		case 124: goto st73;
+		case 126: goto st73;
+	}
+	if ( (*p) < 45 ) {
+		if ( (*p) > 39 ) {
+			if ( 42 <= (*p) && (*p) <= 43 )
+				goto st73;
+		} else if ( (*p) >= 35 )
+			goto st73;
+	} else if ( (*p) > 46 ) {
+		if ( (*p) < 65 ) {
+			if ( 48 <= (*p) && (*p) <= 57 )
+				goto st73;
+		} else if ( (*p) > 90 ) {
+			if ( 94 <= (*p) && (*p) <= 122 )
+				goto st73;
+		} else
+			goto st73;
+	} else
+		goto st73;
+	goto st0;
+st74:
+	if ( ++p == pe )
+		goto _test_eof74;
+case 74:
+	switch( (*p) ) {
+		case 13: goto st65;
+		case 32: goto st74;
+		case 33: goto st75;
+		case 59: goto st74;
+		case 61: goto st76;
+		case 124: goto st75;
+		case 126: goto st75;
+	}
+	if ( (*p) < 45 ) {
+		if ( (*p) > 39 ) {
+			if ( 42 <= (*p) && (*p) <= 43 )
+				goto st75;
+		} else if ( (*p) >= 35 )
+			goto st75;
+	} else if ( (*p) > 46 ) {
+		if ( (*p) < 65 ) {
+			if ( 48 <= (*p) && (*p) <= 57 )
+				goto st75;
+		} else if ( (*p) > 90 ) {
+			if ( 94 <= (*p) && (*p) <= 122 )
+				goto st75;
+		} else
+			goto st75;
+	} else
+		goto st75;
+	goto st0;
+st75:
+	if ( ++p == pe )
+		goto _test_eof75;
+case 75:
+	switch( (*p) ) {
+		case 13: goto st65;
+		case 33: goto st75;
+		case 59: goto st74;
+		case 61: goto st76;
+		case 124: goto st75;
+		case 126: goto st75;
+	}
+	if ( (*p) < 45 ) {
+		if ( (*p) > 39 ) {
+			if ( 42 <= (*p) && (*p) <= 43 )
+				goto st75;
+		} else if ( (*p) >= 35 )
+			goto st75;
+	} else if ( (*p) > 46 ) {
+		if ( (*p) < 65 ) {
+			if ( 48 <= (*p) && (*p) <= 57 )
+				goto st75;
+		} else if ( (*p) > 90 ) {
+			if ( 94 <= (*p) && (*p) <= 122 )
+				goto st75;
+		} else
+			goto st75;
+	} else
+		goto st75;
+	goto st0;
+st76:
+	if ( ++p == pe )
+		goto _test_eof76;
+case 76:
+	switch( (*p) ) {
+		case 13: goto st65;
+		case 33: goto st76;
+		case 59: goto st74;
+		case 124: goto st76;
+		case 126: goto st76;
+	}
+	if ( (*p) < 45 ) {
+		if ( (*p) > 39 ) {
+			if ( 42 <= (*p) && (*p) <= 43 )
+				goto st76;
+		} else if ( (*p) >= 35 )
+			goto st76;
+	} else if ( (*p) > 46 ) {
+		if ( (*p) < 65 ) {
+			if ( 48 <= (*p) && (*p) <= 57 )
+				goto st76;
+		} else if ( (*p) > 90 ) {
+			if ( 94 <= (*p) && (*p) <= 122 )
+				goto st76;
+		} else
+			goto st76;
+	} else
+		goto st76;
+	goto st0;
+st77:
+	if ( ++p == pe )
+		goto _test_eof77;
+case 77:
+	switch( (*p) ) {
+		case 13: goto st78;
+		case 33: goto tr101;
+		case 124: goto tr101;
+		case 126: goto tr101;
+	}
+	if ( (*p) < 45 ) {
+		if ( (*p) > 39 ) {
+			if ( 42 <= (*p) && (*p) <= 43 )
+				goto tr101;
+		} else if ( (*p) >= 35 )
+			goto tr101;
+	} else if ( (*p) > 46 ) {
+		if ( (*p) < 65 ) {
+			if ( 48 <= (*p) && (*p) <= 57 )
+				goto tr101;
+		} else if ( (*p) > 90 ) {
+			if ( 94 <= (*p) && (*p) <= 122 )
+				goto tr101;
+		} else
+			goto tr101;
+	} else
+		goto tr101;
+	goto st0;
+st78:
+	if ( ++p == pe )
+		goto _test_eof78;
+case 78:
+	if ( (*p) == 10 )
+		goto tr102;
+	goto st0;
+tr102:
+#line 216 "unicorn_http.rl"
+	{
+    cs = http_parser_first_final;
+    goto post_exec;
+  }
+	goto st85;
+st85:
+	if ( ++p == pe )
+		goto _test_eof85;
+case 85:
+#line 1802 "unicorn_http.c"
+	goto st0;
+tr101:
+#line 141 "unicorn_http.rl"
+	{ MARK(start.field, p); }
+#line 142 "unicorn_http.rl"
+	{ snake_upcase_char((char *)p); }
+	goto st79;
+tr103:
+#line 142 "unicorn_http.rl"
+	{ snake_upcase_char((char *)p); }
+	goto st79;
+st79:
+	if ( ++p == pe )
+		goto _test_eof79;
+case 79:
+#line 1818 "unicorn_http.c"
+	switch( (*p) ) {
+		case 33: goto tr103;
+		case 58: goto tr104;
+		case 124: goto tr103;
+		case 126: goto tr103;
+	}
+	if ( (*p) < 45 ) {
+		if ( (*p) > 39 ) {
+			if ( 42 <= (*p) && (*p) <= 43 )
+				goto tr103;
+		} else if ( (*p) >= 35 )
+			goto tr103;
+	} else if ( (*p) > 46 ) {
+		if ( (*p) < 65 ) {
+			if ( 48 <= (*p) && (*p) <= 57 )
+				goto tr103;
+		} else if ( (*p) > 90 ) {
+			if ( 94 <= (*p) && (*p) <= 122 )
+				goto tr103;
+		} else
+			goto tr103;
+	} else
+		goto tr103;
+	goto st0;
+tr104:
+#line 144 "unicorn_http.rl"
+	{ hp->s.field_len = LEN(start.field, p); }
+	goto st80;
+tr107:
+#line 145 "unicorn_http.rl"
+	{ MARK(mark, p); }
+	goto st80;
+st80:
+	if ( ++p == pe )
+		goto _test_eof80;
+case 80:
+#line 1855 "unicorn_http.c"
+	switch( (*p) ) {
+		case 13: goto tr106;
+		case 32: goto tr107;
+	}
+	goto tr105;
+tr105:
+#line 145 "unicorn_http.rl"
+	{ MARK(mark, p); }
+	goto st81;
+st81:
+	if ( ++p == pe )
+		goto _test_eof81;
+case 81:
+#line 1869 "unicorn_http.c"
+	if ( (*p) == 13 )
+		goto tr109;
+	goto st81;
+tr106:
+#line 145 "unicorn_http.rl"
+	{ MARK(mark, p); }
+#line 146 "unicorn_http.rl"
+	{ write_value(req, hp, buffer, p); }
+	goto st82;
+tr109:
+#line 146 "unicorn_http.rl"
+	{ write_value(req, hp, buffer, p); }
+	goto st82;
+st82:
+	if ( ++p == pe )
+		goto _test_eof82;
+case 82:
+#line 1887 "unicorn_http.c"
+	if ( (*p) == 10 )
+		goto st77;
+	goto st0;
+	}
+	_test_eof2: cs = 2; goto _test_eof;
+	_test_eof3: cs = 3; goto _test_eof;
+	_test_eof4: cs = 4; goto _test_eof;
+	_test_eof5: cs = 5; goto _test_eof;
+	_test_eof6: cs = 6; goto _test_eof;
+	_test_eof7: cs = 7; goto _test_eof;
+	_test_eof8: cs = 8; goto _test_eof;
+	_test_eof9: cs = 9; goto _test_eof;
+	_test_eof10: cs = 10; goto _test_eof;
+	_test_eof11: cs = 11; goto _test_eof;
+	_test_eof12: cs = 12; goto _test_eof;
+	_test_eof13: cs = 13; goto _test_eof;
+	_test_eof14: cs = 14; goto _test_eof;
+	_test_eof15: cs = 15; goto _test_eof;
+	_test_eof16: cs = 16; goto _test_eof;
+	_test_eof83: cs = 83; goto _test_eof;
+	_test_eof17: cs = 17; goto _test_eof;
+	_test_eof18: cs = 18; goto _test_eof;
+	_test_eof19: cs = 19; goto _test_eof;
+	_test_eof20: cs = 20; goto _test_eof;
+	_test_eof21: cs = 21; goto _test_eof;
+	_test_eof22: cs = 22; goto _test_eof;
+	_test_eof23: cs = 23; goto _test_eof;
+	_test_eof24: cs = 24; goto _test_eof;
+	_test_eof25: cs = 25; goto _test_eof;
+	_test_eof26: cs = 26; goto _test_eof;
+	_test_eof27: cs = 27; goto _test_eof;
+	_test_eof28: cs = 28; goto _test_eof;
+	_test_eof29: cs = 29; goto _test_eof;
+	_test_eof30: cs = 30; goto _test_eof;
+	_test_eof31: cs = 31; goto _test_eof;
+	_test_eof32: cs = 32; goto _test_eof;
+	_test_eof33: cs = 33; goto _test_eof;
+	_test_eof34: cs = 34; goto _test_eof;
+	_test_eof35: cs = 35; goto _test_eof;
+	_test_eof36: cs = 36; goto _test_eof;
+	_test_eof37: cs = 37; goto _test_eof;
+	_test_eof38: cs = 38; goto _test_eof;
+	_test_eof39: cs = 39; goto _test_eof;
+	_test_eof40: cs = 40; goto _test_eof;
+	_test_eof41: cs = 41; goto _test_eof;
+	_test_eof42: cs = 42; goto _test_eof;
+	_test_eof43: cs = 43; goto _test_eof;
+	_test_eof44: cs = 44; goto _test_eof;
+	_test_eof45: cs = 45; goto _test_eof;
+	_test_eof46: cs = 46; goto _test_eof;
+	_test_eof47: cs = 47; goto _test_eof;
+	_test_eof48: cs = 48; goto _test_eof;
+	_test_eof49: cs = 49; goto _test_eof;
+	_test_eof50: cs = 50; goto _test_eof;
+	_test_eof51: cs = 51; goto _test_eof;
+	_test_eof52: cs = 52; goto _test_eof;
+	_test_eof53: cs = 53; goto _test_eof;
+	_test_eof54: cs = 54; goto _test_eof;
+	_test_eof55: cs = 55; goto _test_eof;
+	_test_eof56: cs = 56; goto _test_eof;
+	_test_eof57: cs = 57; goto _test_eof;
+	_test_eof58: cs = 58; goto _test_eof;
+	_test_eof59: cs = 59; goto _test_eof;
+	_test_eof60: cs = 60; goto _test_eof;
+	_test_eof61: cs = 61; goto _test_eof;
+	_test_eof62: cs = 62; goto _test_eof;
+	_test_eof63: cs = 63; goto _test_eof;
+	_test_eof64: cs = 64; goto _test_eof;
+	_test_eof65: cs = 65; goto _test_eof;
+	_test_eof84: cs = 84; goto _test_eof;
+	_test_eof66: cs = 66; goto _test_eof;
+	_test_eof67: cs = 67; goto _test_eof;
+	_test_eof68: cs = 68; goto _test_eof;
+	_test_eof69: cs = 69; goto _test_eof;
+	_test_eof70: cs = 70; goto _test_eof;
+	_test_eof71: cs = 71; goto _test_eof;
+	_test_eof72: cs = 72; goto _test_eof;
+	_test_eof73: cs = 73; goto _test_eof;
+	_test_eof74: cs = 74; goto _test_eof;
+	_test_eof75: cs = 75; goto _test_eof;
+	_test_eof76: cs = 76; goto _test_eof;
+	_test_eof77: cs = 77; goto _test_eof;
+	_test_eof78: cs = 78; goto _test_eof;
+	_test_eof85: cs = 85; goto _test_eof;
+	_test_eof79: cs = 79; goto _test_eof;
+	_test_eof80: cs = 80; goto _test_eof;
+	_test_eof81: cs = 81; goto _test_eof;
+	_test_eof82: cs = 82; goto _test_eof;
+
+	_test_eof: {}
+	_out: {}
+	}
+
+#line 286 "unicorn_http.rl"
+post_exec: /* "_out:" also goes here */
+  if (hp->cs != http_parser_error)
+    hp->cs = cs;
+  hp->start.offset = p - buffer;
+
+  assert(p <= pe && "buffer overflow after parsing execute");
+  assert(hp->start.offset <= len && "start.offset longer than length");
 }
 
-static void http_version(void *data, const char *at, size_t length)
+static struct http_parser *data_get(VALUE self)
 {
-  VALUE req = (VALUE)data;
-  VALUE val = rb_str_new(at, length);
-  rb_hash_aset(req, global_http_version, val);
+  struct http_parser *hp;
+
+  Data_Get_Struct(self, struct http_parser, hp);
+  assert(hp);
+  return hp;
 }
 
-/** Finalizes the request header to have a bunch of stuff that's needed. */
-static void header_done(void *data, const char *at, size_t length)
+static void finalize_header(VALUE req)
 {
-  VALUE req = (VALUE)data;
-  VALUE server_name = global_localhost;
-  VALUE server_port = global_port_80;
-  VALUE temp;
-
-  /* rack requires QUERY_STRING */
-  if (rb_hash_aref(req, global_query_string) == Qnil)
-    rb_hash_aset(req, global_query_string, rb_str_new(NULL, 0));
+  VALUE temp = rb_hash_aref(req, g_rack_url_scheme);
+  VALUE server_name = g_localhost;
+  VALUE server_port = g_port_80;
 
   /* set rack.url_scheme to "https" or "http", no others are allowed by Rack */
-  if ((temp = rb_hash_aref(req, global_rack_url_scheme)) == Qnil) {
-    if ((temp = rb_hash_aref(req, global_http_x_forwarded_proto)) != Qnil &&
-        RSTRING_LEN(temp) == 5 &&
-        !memcmp("https", RSTRING_PTR(temp), 5))
-      server_port = global_port_443;
+  if (temp == Qnil) {
+    temp = rb_hash_aref(req, g_http_x_forwarded_proto);
+    if (temp != Qnil && STR_CSTR_EQ(temp, "https"))
+      server_port = g_port_443;
     else
-      temp = global_http;
-    rb_hash_aset(req, global_rack_url_scheme, temp);
-  } else if (RSTRING_LEN(temp) == 5 && !memcmp("https", RSTRING_PTR(temp), 5)) {
-    server_port = global_port_443;
+      temp = g_http;
+    rb_hash_aset(req, g_rack_url_scheme, temp);
+  } else if (STR_CSTR_EQ(temp, "https")) {
+    server_port = g_port_443;
   }
 
   /* parse and set the SERVER_NAME and SERVER_PORT variables */
-  if ((temp = rb_hash_aref(req, global_http_host)) != Qnil) {
+  temp = rb_hash_aref(req, g_http_host);
+  if (temp != Qnil) {
     char *colon = memchr(RSTRING_PTR(temp), ':', RSTRING_LEN(temp));
     if (colon) {
       long port_start = colon - RSTRING_PTR(temp) + 1;
@@ -322,40 +2028,19 @@ static void header_done(void *data, const char *at, size_t length)
       server_name = temp;
     }
   }
-  rb_hash_aset(req, global_server_name, server_name);
-  rb_hash_aset(req, global_server_port, server_port);
-  rb_hash_aset(req, global_server_protocol, global_server_protocol_value);
-
-  /* grab the initial body and stuff it into the hash */
-  temp = rb_hash_aref(req, global_request_method);
-  if (temp != Qnil) {
-    long len = RSTRING_LEN(temp);
-    char *ptr = RSTRING_PTR(temp);
-
-    if (memcmp(ptr, "HEAD", len) && memcmp(ptr, "GET", len))
-      rb_hash_aset(req, sym_http_body, rb_str_new(at, length));
-  }
-}
+  rb_hash_aset(req, g_server_name, server_name);
+  rb_hash_aset(req, g_server_port, server_port);
+  rb_hash_aset(req, g_server_protocol, g_http_11);
 
-static void HttpParser_free(void *data) {
-  TRACE();
-
-  if(data) {
-    free(data);
-  }
+  /* rack requires QUERY_STRING */
+  if (rb_hash_aref(req, g_query_string) == Qnil)
+    rb_hash_aset(req, g_query_string, rb_str_new(NULL, 0));
 }
 
-
 static VALUE HttpParser_alloc(VALUE klass)
 {
-  VALUE obj;
-  http_parser *hp = ALLOC_N(http_parser, 1);
-  TRACE();
-  http_parser_init(hp);
-
-  obj = Data_Wrap_Struct(klass, NULL, HttpParser_free, hp);
-
-  return obj;
+  struct http_parser *hp;
+  return Data_Make_Struct(klass, struct http_parser, NULL, NULL, hp);
 }
 
 
@@ -387,71 +2072,183 @@ static VALUE HttpParser_reset(VALUE self)
   return Qnil;
 }
 
+static void advance_str(VALUE str, off_t nr)
+{
+  long len = RSTRING_LEN(str);
+
+  if (len == 0)
+    return;
+
+  assert(nr <= len);
+  len -= nr;
+  if (len > 0) /* unlikely, len is usually 0 */
+    memmove(RSTRING_PTR(str), RSTRING_PTR(str) + nr, len);
+  rb_str_set_len(str, len);
+}
+
+static VALUE HttpParser_content_length(VALUE self)
+{
+  struct http_parser *hp = data_get(self);
+
+  return (hp->flags & UH_FL_CHUNKED) ? Qnil : OFFT2NUM(hp->len.content);
+}
 
 /**
  * call-seq:
- *    parser.execute(req_hash, data) -> true/false
+ *    parser.headers(req, data) -> req or nil
+ *    parser.trailers(req, data) -> req or nil
  *
  * Takes a Hash and a String of data, parses the String of data filling
- * in the Hash returning a boolean to indicate whether or not parsing
- * is finished.
- * 
- * This function now throws an exception when there is a parsing error.
- * This makes the logic for working with the parser much easier.  You
- * will need to wrap the parser with an exception handling block.
+ * in the Hash returning the Hash if parsing is finished, nil otherwise
+ * When returning the req Hash, it may modify data to point to where
+ * body processing should begin
+ *
+ * Raises HttpParserError if there are parsing errors
  */
+static VALUE HttpParser_headers(VALUE self, VALUE req, VALUE data)
+{
+  struct http_parser *hp = data_get(self);
+
+  http_parser_execute(hp, req, RSTRING_PTR(data), RSTRING_LEN(data));
+  VALIDATE_MAX_LENGTH(hp->start.offset, HEADER);
+
+  if (hp->cs == http_parser_first_final ||
+      hp->cs == http_parser_en_ChunkedBody) {
+    advance_str(data, hp->start.offset + 1);
+    hp->start.offset = 0;
+
+    return req;
+  }
 
-static VALUE HttpParser_execute(VALUE self, VALUE req_hash, VALUE data)
+  if (hp->cs == http_parser_error)
+    rb_raise(eHttpParserError, "Invalid HTTP format, parsing fails.");
+
+  return Qnil;
+}
+
+static int chunked_eof(struct http_parser *hp)
 {
-  http_parser *http = data_get(self);
+  return ((hp->cs == http_parser_first_final) ||
+          (hp->flags & UH_FL_INTRAILER));
+}
+
+static VALUE HttpParser_body_eof(VALUE self)
+{
+  struct http_parser *hp = data_get(self);
+
+  if (hp->flags & UH_FL_CHUNKED)
+    return chunked_eof(hp) ? Qtrue : Qfalse;
+
+  return hp->len.content == 0 ? Qtrue : Qfalse;
+}
+
+static VALUE HttpParser_keepalive(VALUE self)
+{
+  struct http_parser *hp = data_get(self);
+
+  return (hp->flags & UH_FL_KEEPALIVE) == UH_FL_KEEPALIVE ? Qtrue : Qfalse;
+}
+
+/**
+ * call-seq:
+ *    parser.filter_body(buf, data) -> nil/data
+ *
+ * Takes a String of +data+, will modify data if dechunking is done.
+ * Returns +nil+ if there is more data left to process.  Returns
+ * +data+ if body processing is complete. When returning +data+,
+ * it may modify +data+ so the start of the string points to where
+ * the body ended so that trailer processing can begin.
+ *
+ * Raises HttpParserError if there are dechunking errors
+ * Basically this is a glorified memcpy(3) that copies +data+
+ * into +buf+ while filtering it through the dechunker.
+ */
+static VALUE HttpParser_filter_body(VALUE self, VALUE buf, VALUE data)
+{
+  struct http_parser *hp = data_get(self);
   char *dptr = RSTRING_PTR(data);
   long dlen = RSTRING_LEN(data);
 
-  if (http->nread < dlen) {
-    http->data = (void *)req_hash;
-    http_parser_execute(http, dptr, dlen);
+  StringValue(buf);
+  rb_str_resize(buf, dlen); /* we can never copy more than dlen bytes */
+  OBJ_TAINT(buf); /* keep weirdo $SAFE users happy */
 
-    VALIDATE_MAX_LENGTH(http->nread, HEADER);
+  if (hp->flags & UH_FL_CHUNKED) {
+    if (chunked_eof(hp))
+      goto end_of_body;
 
-    if (!http_parser_has_error(http))
-      return http_parser_is_finished(http) ? Qtrue : Qfalse;
+    hp->s.dest_offset = 0;
+    http_parser_execute(hp, buf, dptr, dlen);
+    if (hp->cs == http_parser_error)
+      rb_raise(eHttpParserError, "Invalid HTTP format, parsing fails.");
 
-    rb_raise(eHttpParserError, "Invalid HTTP format, parsing fails.");
+    assert(hp->s.dest_offset <= hp->start.offset);
+    advance_str(data, hp->start.offset);
+    rb_str_set_len(buf, hp->s.dest_offset);
+
+    if (RSTRING_LEN(buf) == 0 && chunked_eof(hp)) {
+      assert(hp->len.chunk == 0);
+    } else {
+      data = Qnil;
+    }
+  } else {
+    /* no need to enter the Ragel machine for unchunked transfers */
+    assert(hp->len.content >= 0);
+    if (hp->len.content > 0) {
+      long nr = MIN(dlen, hp->len.content);
+
+      memcpy(RSTRING_PTR(buf), dptr, nr);
+      hp->len.content -= nr;
+      if (hp->len.content == 0)
+        hp->cs = http_parser_first_final;
+      advance_str(data, nr);
+      rb_str_set_len(buf, nr);
+      data = Qnil;
+    }
   }
-  rb_raise(eHttpParserError, "Requested start is after data buffer end.");
+end_of_body:
+  hp->start.offset = 0; /* for trailer parsing */
+  return data;
 }
 
+#define SET_GLOBAL(var,str) do { \
+  var = find_common_field(str, sizeof(str) - 1); \
+  assert(var != Qnil); \
+} while (0)
+
 void Init_unicorn_http(void)
 {
-  mUnicorn = rb_define_module("Unicorn");
-
-  DEF_GLOBAL(rack_url_scheme, "rack.url_scheme");
-  DEF_GLOBAL(request_method, "REQUEST_METHOD");
-  DEF_GLOBAL(request_uri, "REQUEST_URI");
-  DEF_GLOBAL(fragment, "FRAGMENT");
-  DEF_GLOBAL(query_string, "QUERY_STRING");
-  DEF_GLOBAL(http_version, "HTTP_VERSION");
-  DEF_GLOBAL(request_path, "REQUEST_PATH");
-  DEF_GLOBAL(path_info, "PATH_INFO");
-  DEF_GLOBAL(server_name, "SERVER_NAME");
-  DEF_GLOBAL(server_port, "SERVER_PORT");
-  DEF_GLOBAL(server_protocol, "SERVER_PROTOCOL");
-  DEF_GLOBAL(server_protocol_value, "HTTP/1.1");
-  DEF_GLOBAL(http_x_forwarded_proto, "HTTP_X_FORWARDED_PROTO");
-  DEF_GLOBAL(port_80, "80");
-  DEF_GLOBAL(port_443, "443");
-  DEF_GLOBAL(localhost, "localhost");
-  DEF_GLOBAL(http, "http");
-
-  eHttpParserError = rb_define_class_under(mUnicorn, "HttpParserError", rb_eIOError);
-
-  cHttpParser = rb_define_class_under(mUnicorn, "HttpParser", rb_cObject);
+  init_globals();
   rb_define_alloc_func(cHttpParser, HttpParser_alloc);
   rb_define_method(cHttpParser, "initialize", HttpParser_init,0);
   rb_define_method(cHttpParser, "reset", HttpParser_reset,0);
-  rb_define_method(cHttpParser, "execute", HttpParser_execute,2);
-  sym_http_body = ID2SYM(rb_intern("http_body"));
+  rb_define_method(cHttpParser, "headers", HttpParser_headers, 2);
+  rb_define_method(cHttpParser, "filter_body", HttpParser_filter_body, 2);
+  rb_define_method(cHttpParser, "trailers", HttpParser_headers, 2);
+  rb_define_method(cHttpParser, "content_length", HttpParser_content_length, 0);
+  rb_define_method(cHttpParser, "body_eof?", HttpParser_body_eof, 0);
+  rb_define_method(cHttpParser, "keepalive?", HttpParser_keepalive, 0);
+
+  /*
+   * The maximum size a single chunk when using chunked transfer encoding.
+   * This is only a theoretical maximum used to detect errors in clients,
+   * it is highly unlikely to encounter clients that send more than
+   * several kilobytes at once.
+   */
+  rb_define_const(cHttpParser, "CHUNK_MAX", OFFT2NUM(UH_OFF_T_MAX));
+
+  /*
+   * The maximum size of the body as specified by Content-Length.
+   * This is only a theoretical maximum, the actual limit is subject
+   * to the limits of the file system used for +Dir::tmpdir+
+   */
+  rb_define_const(cHttpParser, "LENGTH_MAX", OFFT2NUM(UH_OFF_T_MAX));
+
   init_common_fields();
-  global_http_host = find_common_field_value("HOST", 4);
-  assert(global_http_host != Qnil);
+  SET_GLOBAL(g_http_host, "HOST");
+  SET_GLOBAL(g_http_trailer, "TRAILER");
+  SET_GLOBAL(g_http_transfer_encoding, "TRANSFER_ENCODING");
+  SET_GLOBAL(g_content_length, "CONTENT_LENGTH");
+  SET_GLOBAL(g_http_connection, "CONNECTION");
 }
+#undef SET_GLOBAL