// line 1 "http11_parser.rl"
/**
 * Copyright (c) 2005 Zed A. Shaw
 * You can redistribute it and/or modify it under the same terms as Ruby.
 */
#include "http11_parser.h"
#include <stdio.h>
#include <assert.h>
#include <stdlib.h>
#include <ctype.h>
#include <string.h>

/*
 * capitalizes all lower-case ASCII characters,
 * converts dashes to underscores.
 */
static void snake_upcase_char(char *c)
{
    if (*c >= 'a' && *c <= 'z')
      *c &= ~0x20;
    else if (*c == '-')
      *c = '_';
}

#define LEN(AT, FPC) (FPC - buffer - parser->AT)
#define MARK(M,FPC) (parser->M = (FPC) - buffer)
#define PTR_TO(F) (buffer + parser->F)

/** Machine **/

// line 87 "http11_parser.rl"


/** Data **/

// line 37 "../../ext/http11_java/org/jruby/mongrel/Http11Parser.java"
private static byte[] init__http_parser_actions_0()
{
	return new byte [] {
	    0,    1,    0,    1,    2,    1,    3,    1,    4,    1,    5,    1,
	    6,    1,    7,    1,    8,    1,    9,    1,   11,    1,   12,    1,
	   13,    2,    0,    8,    2,    1,    2,    2,    4,    5,    2,   10,
	    7,    2,   12,    7,    3,    9,   10,    7
	};
}

private static final byte _http_parser_actions[] = init__http_parser_actions_0();


private static short[] init__http_parser_key_offsets_0()
{
	return new short [] {
	    0,    0,    8,   17,   27,   29,   30,   31,   32,   33,   34,   36,
	   39,   41,   44,   45,   61,   62,   78,   80,   81,   90,   99,  105,
	  111,  121,  130,  136,  142,  153,  159,  165,  175,  181,  187,  196,
	  205,  211,  217,  226,  235,  244,  253,  262,  271,  280,  289,  298,
	  307,  316,  325,  334,  343,  352,  361,  370,  379,  380
	};
}

private static final short _http_parser_key_offsets[] = init__http_parser_key_offsets_0();


private static char[] init__http_parser_trans_keys_0()
{
	return new char [] {
	   36,   95,   45,   46,   48,   57,   65,   90,   32,   36,   95,   45,
	   46,   48,   57,   65,   90,   42,   43,   47,   58,   45,   57,   65,
	   90,   97,  122,   32,   35,   72,   84,   84,   80,   47,   48,   57,
	   46,   48,   57,   48,   57,   13,   48,   57,   10,   13,   33,  124,
	  126,   35,   39,   42,   43,   45,   46,   48,   57,   65,   90,   94,
	  122,   10,   33,   58,  124,  126,   35,   39,   42,   43,   45,   46,
	   48,   57,   65,   90,   94,  122,   13,   32,   13,   32,   37,   60,
	   62,  127,    0,   31,   34,   35,   32,   37,   60,   62,  127,    0,
	   31,   34,   35,   48,   57,   65,   70,   97,  102,   48,   57,   65,
	   70,   97,  102,   43,   58,   45,   46,   48,   57,   65,   90,   97,
	  122,   32,   34,   35,   37,   60,   62,  127,    0,   31,   48,   57,
	   65,   70,   97,  102,   48,   57,   65,   70,   97,  102,   32,   34,
	   35,   37,   59,   60,   62,   63,  127,    0,   31,   48,   57,   65,
	   70,   97,  102,   48,   57,   65,   70,   97,  102,   32,   34,   35,
	   37,   60,   62,   63,  127,    0,   31,   48,   57,   65,   70,   97,
	  102,   48,   57,   65,   70,   97,  102,   32,   34,   35,   37,   60,
	   62,  127,    0,   31,   32,   34,   35,   37,   60,   62,  127,    0,
	   31,   48,   57,   65,   70,   97,  102,   48,   57,   65,   70,   97,
	  102,   32,   36,   95,   45,   46,   48,   57,   65,   90,   32,   36,
	   95,   45,   46,   48,   57,   65,   90,   32,   36,   95,   45,   46,
	   48,   57,   65,   90,   32,   36,   95,   45,   46,   48,   57,   65,
	   90,   32,   36,   95,   45,   46,   48,   57,   65,   90,   32,   36,
	   95,   45,   46,   48,   57,   65,   90,   32,   36,   95,   45,   46,
	   48,   57,   65,   90,   32,   36,   95,   45,   46,   48,   57,   65,
	   90,   32,   36,   95,   45,   46,   48,   57,   65,   90,   32,   36,
	   95,   45,   46,   48,   57,   65,   90,   32,   36,   95,   45,   46,
	   48,   57,   65,   90,   32,   36,   95,   45,   46,   48,   57,   65,
	   90,   32,   36,   95,   45,   46,   48,   57,   65,   90,   32,   36,
	   95,   45,   46,   48,   57,   65,   90,   32,   36,   95,   45,   46,
	   48,   57,   65,   90,   32,   36,   95,   45,   46,   48,   57,   65,
	   90,   32,   36,   95,   45,   46,   48,   57,   65,   90,   32,   36,
	   95,   45,   46,   48,   57,   65,   90,   32,    0
	};
}

private static final char _http_parser_trans_keys[] = init__http_parser_trans_keys_0();


private static byte[] init__http_parser_single_lengths_0()
{
	return new byte [] {
	    0,    2,    3,    4,    2,    1,    1,    1,    1,    1,    0,    1,
	    0,    1,    1,    4,    1,    4,    2,    1,    5,    5,    0,    0,
	    2,    7,    0,    0,    9,    0,    0,    8,    0,    0,    7,    7,
	    0,    0,    3,    3,    3,    3,    3,    3,    3,    3,    3,    3,
	    3,    3,    3,    3,    3,    3,    3,    3,    1,    0
	};
}

private static final byte _http_parser_single_lengths[] = init__http_parser_single_lengths_0();


private static byte[] init__http_parser_range_lengths_0()
{
	return new byte [] {
	    0,    3,    3,    3,    0,    0,    0,    0,    0,    0,    1,    1,
	    1,    1,    0,    6,    0,    6,    0,    0,    2,    2,    3,    3,
	    4,    1,    3,    3,    1,    3,    3,    1,    3,    3,    1,    1,
	    3,    3,    3,    3,    3,    3,    3,    3,    3,    3,    3,    3,
	    3,    3,    3,    3,    3,    3,    3,    3,    0,    0
	};
}

private static final byte _http_parser_range_lengths[] = init__http_parser_range_lengths_0();


private static short[] init__http_parser_index_offsets_0()
{
	return new short [] {
	    0,    0,    6,   13,   21,   24,   26,   28,   30,   32,   34,   36,
	   39,   41,   44,   46,   57,   59,   70,   73,   75,   83,   91,   95,
	   99,  106,  115,  119,  123,  134,  138,  142,  152,  156,  160,  169,
	  178,  182,  186,  193,  200,  207,  214,  221,  228,  235,  242,  249,
	  256,  263,  270,  277,  284,  291,  298,  305,  312,  314
	};
}

private static final short _http_parser_index_offsets[] = init__http_parser_index_offsets_0();


private static byte[] init__http_parser_indicies_0()
{
	return new byte [] {
	    0,    0,    0,    0,    0,    1,    2,    3,    3,    3,    3,    3,
	    1,    4,    5,    6,    7,    5,    5,    5,    1,    8,    9,    1,
	   10,    1,   11,    1,   12,    1,   13,    1,   14,    1,   15,    1,
	   16,   15,    1,   17,    1,   18,   17,    1,   19,    1,   20,   21,
	   21,   21,   21,   21,   21,   21,   21,   21,    1,   22,    1,   23,
	   24,   23,   23,   23,   23,   23,   23,   23,   23,    1,   26,   27,
	   25,   29,   28,   30,   32,    1,    1,    1,    1,    1,   31,   33,
	   35,    1,    1,    1,    1,    1,   34,   36,   36,   36,    1,   34,
	   34,   34,    1,   37,   38,   37,   37,   37,   37,    1,    8,    1,
	    9,   39,    1,    1,    1,    1,   38,   40,   40,   40,    1,   38,
	   38,   38,    1,   41,    1,   43,   44,   45,    1,    1,   46,    1,
	    1,   42,   47,   47,   47,    1,   42,   42,   42,    1,    8,    1,
	    9,   49,    1,    1,   50,    1,    1,   48,   51,   51,   51,    1,
	   48,   48,   48,    1,   52,    1,   54,   55,    1,    1,    1,    1,
	   53,   56,    1,   58,   59,    1,    1,    1,    1,   57,   60,   60,
	   60,    1,   57,   57,   57,    1,    2,   61,   61,   61,   61,   61,
	    1,    2,   62,   62,   62,   62,   62,    1,    2,   63,   63,   63,
	   63,   63,    1,    2,   64,   64,   64,   64,   64,    1,    2,   65,
	   65,   65,   65,   65,    1,    2,   66,   66,   66,   66,   66,    1,
	    2,   67,   67,   67,   67,   67,    1,    2,   68,   68,   68,   68,
	   68,    1,    2,   69,   69,   69,   69,   69,    1,    2,   70,   70,
	   70,   70,   70,    1,    2,   71,   71,   71,   71,   71,    1,    2,
	   72,   72,   72,   72,   72,    1,    2,   73,   73,   73,   73,   73,
	    1,    2,   74,   74,   74,   74,   74,    1,    2,   75,   75,   75,
	   75,   75,    1,    2,   76,   76,   76,   76,   76,    1,    2,   77,
	   77,   77,   77,   77,    1,    2,   78,   78,   78,   78,   78,    1,
	    2,    1,    1,    0
	};
}

private static final byte _http_parser_indicies[] = init__http_parser_indicies_0();


private static byte[] init__http_parser_trans_targs_wi_0()
{
	return new byte [] {
	    2,    0,    3,   38,    4,   24,   28,   25,    5,   20,    6,    7,
	    8,    9,   10,   11,   12,   13,   14,   15,   16,   17,   57,   17,
	   18,   19,   14,   18,   19,   14,    5,   21,   22,    5,   21,   22,
	   23,   24,   25,   26,   27,    5,   28,   20,   29,   31,   34,   30,
	   31,   32,   34,   33,    5,   35,   20,   36,    5,   35,   20,   36,
	   37,   39,   40,   41,   42,   43,   44,   45,   46,   47,   48,   49,
	   50,   51,   52,   53,   54,   55,   56
	};
}

private static final byte _http_parser_trans_targs_wi[] = init__http_parser_trans_targs_wi_0();


private static byte[] init__http_parser_trans_actions_wi_0()
{
	return new byte [] {
	    1,    0,   11,    0,    1,    1,    1,    1,   13,   13,    1,    0,
	    0,    0,    0,    0,    0,    0,   19,    0,    0,   28,   23,    3,
	    5,    7,   31,    7,    0,    9,   25,    1,    1,   15,    0,    0,
	    0,    0,    0,    0,    0,   37,    0,   37,    0,   21,   21,    0,
	    0,    0,    0,    0,   40,   17,   40,   17,   34,    0,   34,    0,
	    0,    0,    0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
	    0,    0,    0,    0,    0,    0,    0
	};
}

private static final byte _http_parser_trans_actions_wi[] = init__http_parser_trans_actions_wi_0();


static final int http_parser_start = 1;
static final int http_parser_first_final = 57;
static final int http_parser_error = 0;

static final int http_parser_en_main = 1;

// line 91 "http11_parser.rl"

int http_parser_init(http_parser *parser)  {
  int cs = 0;
  
// line 227 "../../ext/http11_java/org/jruby/mongrel/Http11Parser.java"
	{
	cs = http_parser_start;
	}
// line 95 "http11_parser.rl"
  parser->cs = cs;
  parser->body_start = 0;
  parser->content_len = 0;
  parser->mark = 0;
  parser->nread = 0;
  parser->field_len = 0;
  parser->field_start = 0;    

  return(1);
}


/** exec **/
size_t http_parser_execute(http_parser *parser, const char *buffer, size_t len, size_t off)  {
  const char *p, *pe;
  int cs = parser->cs;

  assert(off <= len && "offset past end of buffer");

  p = buffer+off;
  pe = buffer+len;

  /* assert(*pe == '\0' && "pointer does not end on NUL"); */
  assert(pe - p == len - off && "pointers aren't same distance");


  
// line 259 "../../ext/http11_java/org/jruby/mongrel/Http11Parser.java"
	{
	int _klen;
	int _trans = 0;
	int _acts;
	int _nacts;
	int _keys;
	int _goto_targ = 0;

	_goto: while (true) {
	switch ( _goto_targ ) {
	case 0:
	if ( p == pe ) {
		_goto_targ = 4;
		continue _goto;
	}
	if ( cs == 0 ) {
		_goto_targ = 5;
		continue _goto;
	}
case 1:
	_match: do {
	_keys = _http_parser_key_offsets[cs];
	_trans = _http_parser_index_offsets[cs];
	_klen = _http_parser_single_lengths[cs];
	if ( _klen > 0 ) {
		int _lower = _keys;
		int _mid;
		int _upper = _keys + _klen - 1;
		while (true) {
			if ( _upper < _lower )
				break;

			_mid = _lower + ((_upper-_lower) >> 1);
			if ( data[p] < _http_parser_trans_keys[_mid] )
				_upper = _mid - 1;
			else if ( data[p] > _http_parser_trans_keys[_mid] )
				_lower = _mid + 1;
			else {
				_trans += (_mid - _keys);
				break _match;
			}
		}
		_keys += _klen;
		_trans += _klen;
	}

	_klen = _http_parser_range_lengths[cs];
	if ( _klen > 0 ) {
		int _lower = _keys;
		int _mid;
		int _upper = _keys + (_klen<<1) - 2;
		while (true) {
			if ( _upper < _lower )
				break;

			_mid = _lower + (((_upper-_lower) >> 1) & ~1);
			if ( data[p] < _http_parser_trans_keys[_mid] )
				_upper = _mid - 2;
			else if ( data[p] > _http_parser_trans_keys[_mid+1] )
				_lower = _mid + 2;
			else {
				_trans += ((_mid - _keys)>>1);
				break _match;
			}
		}
		_trans += _klen;
	}
	} while (false);

	_trans = _http_parser_indicies[_trans];
	cs = _http_parser_trans_targs_wi[_trans];

	if ( _http_parser_trans_actions_wi[_trans] != 0 ) {
		_acts = _http_parser_trans_actions_wi[_trans];
		_nacts = (int) _http_parser_actions[_acts++];
		while ( _nacts-- > 0 )
	{
			switch ( _http_parser_actions[_acts++] )
			{
	case 0:
// line 34 "http11_parser.rl"
	{MARK(mark, p); }
	break;
	case 1:
// line 37 "http11_parser.rl"
	{ MARK(field_start, p); }
	break;
	case 2:
// line 38 "http11_parser.rl"
	{ snake_upcase_char((char *)p); }
	break;
	case 3:
// line 39 "http11_parser.rl"
	{ 
    parser->field_len = LEN(field_start, p);
  }
	break;
	case 4:
// line 43 "http11_parser.rl"
	{ MARK(mark, p); }
	break;
	case 5:
// line 44 "http11_parser.rl"
	{ 
    if(parser->http_field != NULL) {
      parser->http_field(parser->data, PTR_TO(field_start), parser->field_len, PTR_TO(mark), LEN(mark, p));
    }
  }
	break;
	case 6:
// line 49 "http11_parser.rl"
	{ 
    if(parser->request_method != NULL) 
      parser->request_method(parser->data, PTR_TO(mark), LEN(mark, p));
  }
	break;
	case 7:
// line 53 "http11_parser.rl"
	{ 
    if(parser->request_uri != NULL)
      parser->request_uri(parser->data, PTR_TO(mark), LEN(mark, p));
  }
	break;
	case 8:
// line 57 "http11_parser.rl"
	{ 
    if(parser->fragment != NULL)
      parser->fragment(parser->data, PTR_TO(mark), LEN(mark, p));
  }
	break;
	case 9:
// line 62 "http11_parser.rl"
	{MARK(query_start, p); }
	break;
	case 10:
// line 63 "http11_parser.rl"
	{ 
    if(parser->query_string != NULL)
      parser->query_string(parser->data, PTR_TO(query_start), LEN(query_start, p));
  }
	break;
	case 11:
// line 68 "http11_parser.rl"
	{	
    if(parser->http_version != NULL)
      parser->http_version(parser->data, PTR_TO(mark), LEN(mark, p));
  }
	break;
	case 12:
// line 73 "http11_parser.rl"
	{
    if(parser->request_path != NULL)
      parser->request_path(parser->data, PTR_TO(mark), LEN(mark,p));
  }
	break;
	case 13:
// line 78 "http11_parser.rl"
	{ 
    parser->body_start = p - buffer + 1; 
    if(parser->header_done != NULL)
      parser->header_done(parser->data, p + 1, pe - p - 1);
    { p += 1; _goto_targ = 5; if (true)  continue _goto;}
  }
	break;
// line 424 "../../ext/http11_java/org/jruby/mongrel/Http11Parser.java"
			}
		}
	}

case 2:
	if ( cs == 0 ) {
		_goto_targ = 5;
		continue _goto;
	}
	if ( ++p != pe ) {
		_goto_targ = 1;
		continue _goto;
	}
case 4:
case 5:
	}
	break; }
	}
// line 122 "http11_parser.rl"

  parser->cs = cs;
  parser->nread += p - (buffer + off);

  assert(p <= pe && "buffer overflow after parsing execute");
  assert(parser->nread <= len && "nread longer than length");
  assert(parser->body_start <= len && "body starts after buffer end");
  assert(parser->mark < len && "mark is after buffer end");
  assert(parser->field_len <= len && "field has length longer than whole buffer");
  assert(parser->field_start < len && "field starts after buffer end");

  return(parser->nread);
}

int http_parser_finish(http_parser *parser)
{
  if (http_parser_has_error(parser) ) {
    return -1;
  } else if (http_parser_is_finished(parser) ) {
    return 1;
  } else {
    return 0;
  }
}

int http_parser_has_error(http_parser *parser) {
  return parser->cs == http_parser_error;
}

int http_parser_is_finished(http_parser *parser) {
  return parser->cs >= http_parser_first_final;
}