| Uptime | <%= Time.now - @start_time %> sec |
|---|---|
| PID | <%=h Process.pid %> |
| Requests | <%= @requests %> |
| Finished | <%= @requests_finished %> |
| Errors | <%= @requests - @requests_finished %> |
| Last request | <%= @last_request_time %> sec |
| Variable | Value |
|---|---|
| <%=h key %> | <%=h val.inspect %> |
No GET data.
<% end %>| Variable | Value |
|---|---|
| <%=h key %> | <%=h val.inspect %> |
No POST data.
<% end %>| Variable | Value |
|---|---|
| <%=h key %> | <%=h val.inspect %> |
No cookie data.
<% end %>| Variable | Value |
|---|---|
| <%=h key %> | <%=h val %> |
You're seeing this page because you use Thin::Stats.
"]
end
EventMachine::popen('tail -f /var/log/system.log', TailRenderer) do |t|
t.callback = body
# If for some reason we 'complete' body, close the tail.
body.callback do
t.close_connection
end
# If for some reason the client disconnects, close the tail.
body.errback do
t.close_connection
end
end
AsyncResponse
end
end
run AsyncTailer.new
thin-1.6.3/example/myapp.rb 0000644 0000041 0000041 00000000065 12432275201 015620 0 ustar www-data www-data Myapp = lambda { |env| [200, {}, 'this is my app!'] } thin-1.6.3/example/ramaze.ru 0000644 0000041 0000041 00000000336 12432275201 015775 0 ustar www-data www-data # Ramaze Rackup config file.
# by tmm1
# Use with --rackup option:
#
# thin start -r ramaze.ru
#
require 'start'
Ramaze.trait[:essentials].delete Ramaze::Adapter
Ramaze.start :force => true
run Ramaze::Adapter::Base
thin-1.6.3/example/thin_solaris_smf.erb 0000644 0000041 0000041 00000003533 12432275201 020205 0 ustar www-data www-data
<% 0.upto(thin_max_instances - 1) do |instance| %>
<% end %>
thin-1.6.3/example/vlad.rake 0000644 0000041 0000041 00000004137 12432275201 015743 0 ustar www-data www-data # $GEM_HOME/gems/vlad-1.2.0/lib/vlad/thin.rb
# Thin tasks for Vlad the Deployer
# By cnantais
require 'vlad'
namespace :vlad do
##
# Thin app server
set :thin_address, nil
set :thin_command, "thin"
set(:thin_conf) { "#{shared_path}/thin_cluster.conf" }
set :thin_environment, "production"
set :thin_group, nil
set :thin_log_file, nil
set :thin_pid_file, nil
set :thin_port, nil
set :thin_socket, nil
set :thin_prefix, nil
set :thin_servers, 2
set :thin_user, nil
set :thin_uses_bundler, true
desc "Prepares application servers for deployment. thin
configuration is set via the thin_* variables.".cleanup
remote_task :setup_app, :roles => :app do
raise(ArgumentError, "Please provide either thin_socket or thin_port") if thin_port.nil? && thin_socket.nil?
cmd = [
"config",
(%(-s "#{thin_servers}") if thin_servers),
(%(-S "#{thin_socket}") if thin_socket),
(%(-e "#{thin_environment}") if thin_environment),
(%(-a "#{thin_address}") if thin_address),
%(-c "#{current_path}"),
(%(-C "#{thin_conf}") if thin_conf),
(%(-P "#{thin_pid_file}") if thin_pid_file),
(%(-l "#{thin_log_file}") if thin_log_file),
(%(--user "#{thin_user}") if thin_user),
(%(--group "#{thin_group}") if thin_group),
(%(--prefix "#{thin_prefix}") if thin_prefix),
(%(-p "#{thin_port}") if thin_port),
].compact.join ' '
thin(cmd)
end
def thin(cmd) # :nodoc:
command = if thin_uses_bundler
%(BUNDLE_GEMFILE="#{current_path}/Gemfile" bundle exec #{thin_command} #{cmd} -C "#{thin_conf}")
else
%(#{thin_command} #{cmd} -C "#{thin_conf}")
end
%(cd "#{current_path}" && #{command})
end
desc "Restart the app servers"
remote_task :start_app, :roles => :app do
run thin(%(restart -O -s "#{thin_servers}"))
end
desc "Stop the app servers"
remote_task :stop_app, :roles => :app do
run thin(%(stop -s "#{thin_servers}"))
end
end
thin-1.6.3/example/adapter.rb 0000644 0000041 0000041 00000001224 12432275201 016110 0 ustar www-data www-data # Run with: ruby adapter.rb
# Then browse to http://localhost:3000/test
# and http://localhost:3000/files/adapter.rb
require 'thin'
class SimpleAdapter
def call(env)
body = ["hello!"]
[
200,
{ 'Content-Type' => 'text/plain' },
body
]
end
end
Thin::Server.start('0.0.0.0', 3000) do
use Rack::CommonLogger
map '/test' do
run SimpleAdapter.new
end
map '/files' do
run Rack::File.new('.')
end
end
# You could also start the server like this:
#
# app = Rack::URLMap.new('/test' => SimpleAdapter.new,
# '/files' => Rack::File.new('.'))
# Thin::Server.start('0.0.0.0', 3000, app)
#
thin-1.6.3/example/monit_sockets 0000644 0000041 0000041 00000001762 12432275201 016756 0 ustar www-data www-data check process blog1
with pidfile /u/apps/blog/shared/pids/thin.14000.pid
start program = "ruby thin start -d -e production -u nobody -g nobody -p 14000 -a 127.0.0.1 -P tmp/pids/thin.14000.pid -c /u/apps/blog/current"
stop program = "ruby thin stop -P /u/apps/blog/shared/pids/thin.14000.pid"
if totalmem > 90.0 MB for 5 cycles then restart
if failed port 14000 then restart
if cpu usage > 95% for 3 cycles then restart
if 5 restarts within 5 cycles then timeout
group blog
check process blog2
with pidfile /u/apps/blog/shared/pids/thin.14001.pid
start program = "ruby thin start -d -e production -u nobody -g nobody -p 14001 -a 127.0.0.1 -P tmp/pids/thin.14001.pid -c /u/apps/blog/current"
stop program = "ruby thin stop -P /u/apps/blog/shared/pids/thin.14001.pid"
if totalmem > 90.0 MB for 5 cycles then restart
if failed port 14001 then restart
if cpu usage > 95% for 3 cycles then restart
if 5 restarts within 5 cycles then timeout
group blog
thin-1.6.3/example/config.ru 0000644 0000041 0000041 00000001250 12432275201 015757 0 ustar www-data www-data # Run with: rackup -s thin
# then browse to http://localhost:9292
# Or with: thin start -R config.ru
# then browse to http://localhost:3000
#
# Check Rack::Builder doc for more details on this file format:
# http://rack.rubyforge.org/doc/classes/Rack/Builder.html
require 'thin'
app = proc do |env|
# Response body has to respond to each and yield strings
# See Rack specs for more info: http://rack.rubyforge.org/doc/files/SPEC.html
body = ['hi!']
[
200, # Status code
{ 'Content-Type' => 'text/html' }, # Reponse headers
body # Body of the response
]
end
run app thin-1.6.3/ext/ 0000755 0000041 0000041 00000000000 12432275201 013311 5 ustar www-data www-data thin-1.6.3/ext/thin_parser/ 0000755 0000041 0000041 00000000000 12432275201 015627 5 ustar www-data www-data thin-1.6.3/ext/thin_parser/parser.c 0000644 0000041 0000041 00000065657 12432275201 017312 0 ustar www-data www-data
#line 1 "parser.rl"
/**
* Copyright (c) 2005 Zed A. Shaw
* You can redistribute it and/or modify it under the same terms as Ruby.
*/
#include "parser.h"
#include
#include
#include
#include
#include
#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 81 "parser.rl"
/** Data **/
#line 27 "parser.c"
static const int http_parser_start = 1;
static const int http_parser_first_final = 70;
static const int http_parser_error = 0;
static const int http_parser_en_main = 1;
#line 85 "parser.rl"
int thin_http_parser_init(http_parser *parser) {
int cs = 0;
#line 40 "parser.c"
{
cs = http_parser_start;
}
#line 89 "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 thin_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 == (long)(len - off) && "pointers aren't same distance");
#line 73 "parser.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 22 "parser.rl"
{MARK(mark, p); }
goto st2;
st2:
if ( ++p == pe )
goto _test_eof2;
case 2:
#line 104 "parser.c"
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;
tr2:
#line 36 "parser.rl"
{
if (parser->request_method != NULL) {
parser->request_method(parser->data, PTR_TO(mark), LEN(mark, p));
}
}
goto st3;
st3:
if ( ++p == pe )
goto _test_eof3;
case 3:
#line 131 "parser.c"
switch( (*p) ) {
case 42: goto tr4;
case 47: goto tr5;
case 72: goto st34;
case 104: goto st34;
}
goto st0;
tr4:
#line 22 "parser.rl"
{MARK(mark, p); }
goto st4;
st4:
if ( ++p == pe )
goto _test_eof4;
case 4:
#line 147 "parser.c"
switch( (*p) ) {
case 32: goto tr7;
case 35: goto tr8;
}
goto st0;
tr7:
#line 41 "parser.rl"
{
if (parser->request_uri != NULL) {
parser->request_uri(parser->data, PTR_TO(mark), LEN(mark, p));
}
}
goto st5;
tr30:
#line 22 "parser.rl"
{MARK(mark, p); }
#line 46 "parser.rl"
{
if (parser->fragment != NULL) {
parser->fragment(parser->data, PTR_TO(mark), LEN(mark, p));
}
}
goto st5;
tr33:
#line 46 "parser.rl"
{
if (parser->fragment != NULL) {
parser->fragment(parser->data, PTR_TO(mark), LEN(mark, p));
}
}
goto st5;
tr38:
#line 65 "parser.rl"
{
if (parser->request_path != NULL) {
parser->request_path(parser->data, PTR_TO(mark), LEN(mark,p));
}
}
#line 41 "parser.rl"
{
if (parser->request_uri != NULL) {
parser->request_uri(parser->data, PTR_TO(mark), LEN(mark, p));
}
}
goto st5;
tr45:
#line 52 "parser.rl"
{MARK(query_start, p); }
#line 53 "parser.rl"
{
if (parser->query_string != NULL) {
parser->query_string(parser->data, PTR_TO(query_start), LEN(query_start, p));
}
}
#line 41 "parser.rl"
{
if (parser->request_uri != NULL) {
parser->request_uri(parser->data, PTR_TO(mark), LEN(mark, p));
}
}
goto st5;
tr49:
#line 53 "parser.rl"
{
if (parser->query_string != NULL) {
parser->query_string(parser->data, PTR_TO(query_start), LEN(query_start, p));
}
}
#line 41 "parser.rl"
{
if (parser->request_uri != NULL) {
parser->request_uri(parser->data, PTR_TO(mark), LEN(mark, p));
}
}
goto st5;
st5:
if ( ++p == pe )
goto _test_eof5;
case 5:
#line 227 "parser.c"
if ( (*p) == 72 )
goto tr9;
goto st0;
tr9:
#line 22 "parser.rl"
{MARK(mark, p); }
goto st6;
st6:
if ( ++p == pe )
goto _test_eof6;
case 6:
#line 239 "parser.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 59 "parser.rl"
{
if (parser->http_version != NULL) {
parser->http_version(parser->data, PTR_TO(mark), LEN(mark, p));
}
}
goto st14;
tr25:
#line 30 "parser.rl"
{ MARK(mark, p); }
#line 31 "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));
}
}
goto st14;
tr28:
#line 31 "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));
}
}
goto st14;
st14:
if ( ++p == pe )
goto _test_eof14;
case 14:
#line 326 "parser.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 71 "parser.rl"
{
parser->body_start = p - buffer + 1;
if (parser->header_done != NULL) {
parser->header_done(parser->data, p + 1, pe - p - 1);
}
{p++; cs = 70; goto _out;}
}
goto st70;
st70:
if ( ++p == pe )
goto _test_eof70;
case 70:
#line 379 "parser.c"
goto st0;
tr20:
#line 25 "parser.rl"
{ MARK(field_start, p); }
goto st17;
st17:
if ( ++p == pe )
goto _test_eof17;
case 17:
#line 389 "parser.c"
switch( (*p) ) {
case 33: goto st17;
case 58: goto tr23;
case 124: goto st17;
case 126: goto st17;
}
if ( (*p) < 45 ) {
if ( (*p) > 39 ) {
if ( 42 <= (*p) && (*p) <= 43 )
goto st17;
} else if ( (*p) >= 35 )
goto st17;
} else if ( (*p) > 46 ) {
if ( (*p) < 65 ) {
if ( 48 <= (*p) && (*p) <= 57 )
goto st17;
} else if ( (*p) > 90 ) {
if ( 94 <= (*p) && (*p) <= 122 )
goto st17;
} else
goto st17;
} else
goto st17;
goto st0;
tr23:
#line 26 "parser.rl"
{
parser->field_len = LEN(field_start, p);
}
goto st18;
tr26:
#line 30 "parser.rl"
{ MARK(mark, p); }
goto st18;
st18:
if ( ++p == pe )
goto _test_eof18;
case 18:
#line 428 "parser.c"
switch( (*p) ) {
case 13: goto tr25;
case 32: goto tr26;
}
goto tr24;
tr24:
#line 30 "parser.rl"
{ MARK(mark, p); }
goto st19;
st19:
if ( ++p == pe )
goto _test_eof19;
case 19:
#line 442 "parser.c"
if ( (*p) == 13 )
goto tr28;
goto st19;
tr8:
#line 41 "parser.rl"
{
if (parser->request_uri != NULL) {
parser->request_uri(parser->data, PTR_TO(mark), LEN(mark, p));
}
}
goto st20;
tr39:
#line 65 "parser.rl"
{
if (parser->request_path != NULL) {
parser->request_path(parser->data, PTR_TO(mark), LEN(mark,p));
}
}
#line 41 "parser.rl"
{
if (parser->request_uri != NULL) {
parser->request_uri(parser->data, PTR_TO(mark), LEN(mark, p));
}
}
goto st20;
tr46:
#line 52 "parser.rl"
{MARK(query_start, p); }
#line 53 "parser.rl"
{
if (parser->query_string != NULL) {
parser->query_string(parser->data, PTR_TO(query_start), LEN(query_start, p));
}
}
#line 41 "parser.rl"
{
if (parser->request_uri != NULL) {
parser->request_uri(parser->data, PTR_TO(mark), LEN(mark, p));
}
}
goto st20;
tr50:
#line 53 "parser.rl"
{
if (parser->query_string != NULL) {
parser->query_string(parser->data, PTR_TO(query_start), LEN(query_start, p));
}
}
#line 41 "parser.rl"
{
if (parser->request_uri != NULL) {
parser->request_uri(parser->data, PTR_TO(mark), LEN(mark, p));
}
}
goto st20;
st20:
if ( ++p == pe )
goto _test_eof20;
case 20:
#line 502 "parser.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 22 "parser.rl"
{MARK(mark, p); }
goto st21;
st21:
if ( ++p == pe )
goto _test_eof21;
case 21:
#line 520 "parser.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 22 "parser.rl"
{MARK(mark, p); }
goto st22;
st22:
if ( ++p == pe )
goto _test_eof22;
case 22:
#line 538 "parser.c"
if ( (*p) == 117 )
goto st24;
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;
st24:
if ( ++p == pe )
goto _test_eof24;
case 24:
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;
tr5:
#line 22 "parser.rl"
{MARK(mark, p); }
goto st25;
st25:
if ( ++p == pe )
goto _test_eof25;
case 25:
#line 584 "parser.c"
switch( (*p) ) {
case 32: goto tr38;
case 35: goto tr39;
case 37: goto st26;
case 63: goto tr41;
case 127: goto st0;
}
if ( 0 <= (*p) && (*p) <= 31 )
goto st0;
goto st25;
st26:
if ( ++p == pe )
goto _test_eof26;
case 26:
if ( (*p) == 117 )
goto st28;
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;
st27:
if ( ++p == pe )
goto _test_eof27;
case 27:
if ( (*p) < 65 ) {
if ( 48 <= (*p) && (*p) <= 57 )
goto st25;
} else if ( (*p) > 70 ) {
if ( 97 <= (*p) && (*p) <= 102 )
goto st25;
} else
goto st25;
goto st0;
st28:
if ( ++p == pe )
goto _test_eof28;
case 28:
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 65 "parser.rl"
{
if (parser->request_path != NULL) {
parser->request_path(parser->data, PTR_TO(mark), LEN(mark,p));
}
}
goto st29;
st29:
if ( ++p == pe )
goto _test_eof29;
case 29:
#line 648 "parser.c"
switch( (*p) ) {
case 32: goto tr45;
case 35: goto tr46;
case 37: goto tr47;
case 127: goto st0;
}
if ( 0 <= (*p) && (*p) <= 31 )
goto st0;
goto tr44;
tr44:
#line 52 "parser.rl"
{MARK(query_start, p); }
goto st30;
st30:
if ( ++p == pe )
goto _test_eof30;
case 30:
#line 666 "parser.c"
switch( (*p) ) {
case 32: goto tr49;
case 35: goto tr50;
case 37: goto st31;
case 127: goto st0;
}
if ( 0 <= (*p) && (*p) <= 31 )
goto st0;
goto st30;
tr47:
#line 52 "parser.rl"
{MARK(query_start, p); }
goto st31;
st31:
if ( ++p == pe )
goto _test_eof31;
case 31:
#line 684 "parser.c"
if ( (*p) == 117 )
goto st33;
if ( (*p) < 65 ) {
if ( 48 <= (*p) && (*p) <= 57 )
goto st32;
} else if ( (*p) > 70 ) {
if ( 97 <= (*p) && (*p) <= 102 )
goto st32;
} else
goto st32;
goto st0;
st32:
if ( ++p == pe )
goto _test_eof32;
case 32:
if ( (*p) < 65 ) {
if ( 48 <= (*p) && (*p) <= 57 )
goto st30;
} else if ( (*p) > 70 ) {
if ( 97 <= (*p) && (*p) <= 102 )
goto st30;
} else
goto st30;
goto st0;
st33:
if ( ++p == pe )
goto _test_eof33;
case 33:
if ( (*p) < 65 ) {
if ( 48 <= (*p) && (*p) <= 57 )
goto st32;
} else if ( (*p) > 70 ) {
if ( 97 <= (*p) && (*p) <= 102 )
goto st32;
} else
goto st32;
goto st0;
st34:
if ( ++p == pe )
goto _test_eof34;
case 34:
switch( (*p) ) {
case 84: goto st35;
case 116: goto st35;
}
goto st0;
st35:
if ( ++p == pe )
goto _test_eof35;
case 35:
switch( (*p) ) {
case 84: goto st36;
case 116: goto st36;
}
goto st0;
st36:
if ( ++p == pe )
goto _test_eof36;
case 36:
switch( (*p) ) {
case 80: goto st37;
case 112: goto st37;
}
goto st0;
st37:
if ( ++p == pe )
goto _test_eof37;
case 37:
switch( (*p) ) {
case 58: goto st38;
case 83: goto st50;
case 115: goto st50;
}
goto st0;
st38:
if ( ++p == pe )
goto _test_eof38;
case 38:
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:
switch( (*p) ) {
case 37: goto st42;
case 47: goto st0;
case 60: goto st0;
case 91: goto st47;
case 95: goto st45;
case 127: goto st0;
}
if ( (*p) < 45 ) {
if ( (*p) > 32 ) {
if ( 34 <= (*p) && (*p) <= 35 )
goto st0;
} else if ( (*p) >= 0 )
goto st0;
} else if ( (*p) > 57 ) {
if ( (*p) < 65 ) {
if ( 62 <= (*p) && (*p) <= 64 )
goto st0;
} else if ( (*p) > 90 ) {
if ( 97 <= (*p) && (*p) <= 122 )
goto st45;
} else
goto st45;
} else
goto st45;
goto st41;
st41:
if ( ++p == pe )
goto _test_eof41;
case 41:
switch( (*p) ) {
case 37: goto st42;
case 47: goto st0;
case 60: goto st0;
case 64: goto st40;
case 127: goto st0;
}
if ( (*p) < 34 ) {
if ( 0 <= (*p) && (*p) <= 32 )
goto st0;
} else if ( (*p) > 35 ) {
if ( 62 <= (*p) && (*p) <= 63 )
goto st0;
} else
goto st0;
goto st41;
st42:
if ( ++p == pe )
goto _test_eof42;
case 42:
if ( (*p) == 117 )
goto st44;
if ( (*p) < 65 ) {
if ( 48 <= (*p) && (*p) <= 57 )
goto st43;
} else if ( (*p) > 70 ) {
if ( 97 <= (*p) && (*p) <= 102 )
goto st43;
} else
goto st43;
goto st0;
st43:
if ( ++p == pe )
goto _test_eof43;
case 43:
if ( (*p) < 65 ) {
if ( 48 <= (*p) && (*p) <= 57 )
goto st41;
} else if ( (*p) > 70 ) {
if ( 97 <= (*p) && (*p) <= 102 )
goto st41;
} else
goto st41;
goto st0;
st44:
if ( ++p == pe )
goto _test_eof44;
case 44:
if ( (*p) < 65 ) {
if ( 48 <= (*p) && (*p) <= 57 )
goto st43;
} else if ( (*p) > 70 ) {
if ( 97 <= (*p) && (*p) <= 102 )
goto st43;
} else
goto st43;
goto st0;
st45:
if ( ++p == pe )
goto _test_eof45;
case 45:
switch( (*p) ) {
case 37: goto st42;
case 47: goto tr5;
case 58: goto st46;
case 60: goto st0;
case 64: goto st40;
case 95: goto st45;
case 127: goto st0;
}
if ( (*p) < 45 ) {
if ( (*p) > 32 ) {
if ( 34 <= (*p) && (*p) <= 35 )
goto st0;
} else if ( (*p) >= 0 )
goto st0;
} else if ( (*p) > 57 ) {
if ( (*p) < 65 ) {
if ( 62 <= (*p) && (*p) <= 63 )
goto st0;
} else if ( (*p) > 90 ) {
if ( 97 <= (*p) && (*p) <= 122 )
goto st45;
} else
goto st45;
} else
goto st45;
goto st41;
st46:
if ( ++p == pe )
goto _test_eof46;
case 46:
switch( (*p) ) {
case 37: goto st42;
case 47: goto tr5;
case 60: goto st0;
case 64: goto st40;
case 127: goto st0;
}
if ( (*p) < 34 ) {
if ( 0 <= (*p) && (*p) <= 32 )
goto st0;
} else if ( (*p) > 35 ) {
if ( (*p) > 57 ) {
if ( 62 <= (*p) && (*p) <= 63 )
goto st0;
} else if ( (*p) >= 48 )
goto st46;
} else
goto st0;
goto st41;
st47:
if ( ++p == pe )
goto _test_eof47;
case 47:
switch( (*p) ) {
case 37: goto st42;
case 47: goto st0;
case 60: goto st0;
case 64: goto st40;
case 127: goto st0;
}
if ( (*p) < 48 ) {
if ( (*p) > 32 ) {
if ( 34 <= (*p) && (*p) <= 35 )
goto st0;
} else if ( (*p) >= 0 )
goto st0;
} else if ( (*p) > 58 ) {
if ( (*p) < 65 ) {
if ( 62 <= (*p) && (*p) <= 63 )
goto st0;
} else if ( (*p) > 70 ) {
if ( 97 <= (*p) && (*p) <= 102 )
goto st48;
} else
goto st48;
} else
goto st48;
goto st41;
st48:
if ( ++p == pe )
goto _test_eof48;
case 48:
switch( (*p) ) {
case 37: goto st42;
case 47: goto st0;
case 60: goto st0;
case 64: goto st40;
case 93: goto st49;
case 127: goto st0;
}
if ( (*p) < 48 ) {
if ( (*p) > 32 ) {
if ( 34 <= (*p) && (*p) <= 35 )
goto st0;
} else if ( (*p) >= 0 )
goto st0;
} else if ( (*p) > 58 ) {
if ( (*p) < 65 ) {
if ( 62 <= (*p) && (*p) <= 63 )
goto st0;
} else if ( (*p) > 70 ) {
if ( 97 <= (*p) && (*p) <= 102 )
goto st48;
} else
goto st48;
} else
goto st48;
goto st41;
st49:
if ( ++p == pe )
goto _test_eof49;
case 49:
switch( (*p) ) {
case 37: goto st42;
case 47: goto tr5;
case 58: goto st46;
case 60: goto st0;
case 64: goto st40;
case 127: goto st0;
}
if ( (*p) < 34 ) {
if ( 0 <= (*p) && (*p) <= 32 )
goto st0;
} else if ( (*p) > 35 ) {
if ( 62 <= (*p) && (*p) <= 63 )
goto st0;
} else
goto st0;
goto st41;
st50:
if ( ++p == pe )
goto _test_eof50;
case 50:
if ( (*p) == 58 )
goto st38;
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:
switch( (*p) ) {
case 32: goto tr2;
case 36: goto st63;
case 95: goto st63;
}
if ( (*p) < 48 ) {
if ( 45 <= (*p) && (*p) <= 46 )
goto st63;
} else if ( (*p) > 57 ) {
if ( 65 <= (*p) && (*p) <= 90 )
goto st63;
} else
goto st63;
goto st0;
st63:
if ( ++p == pe )
goto _test_eof63;
case 63:
switch( (*p) ) {
case 32: goto tr2;
case 36: goto st64;
case 95: goto st64;
}
if ( (*p) < 48 ) {
if ( 45 <= (*p) && (*p) <= 46 )
goto st64;
} else if ( (*p) > 57 ) {
if ( 65 <= (*p) && (*p) <= 90 )
goto st64;
} else
goto st64;
goto st0;
st64:
if ( ++p == pe )
goto _test_eof64;
case 64:
switch( (*p) ) {
case 32: goto tr2;
case 36: goto st65;
case 95: goto st65;
}
if ( (*p) < 48 ) {
if ( 45 <= (*p) && (*p) <= 46 )
goto st65;
} else if ( (*p) > 57 ) {
if ( 65 <= (*p) && (*p) <= 90 )
goto st65;
} else
goto st65;
goto st0;
st65:
if ( ++p == pe )
goto _test_eof65;
case 65:
switch( (*p) ) {
case 32: goto tr2;
case 36: goto st66;
case 95: goto st66;
}
if ( (*p) < 48 ) {
if ( 45 <= (*p) && (*p) <= 46 )
goto st66;
} else if ( (*p) > 57 ) {
if ( 65 <= (*p) && (*p) <= 90 )
goto st66;
} else
goto st66;
goto st0;
st66:
if ( ++p == pe )
goto _test_eof66;
case 66:
switch( (*p) ) {
case 32: goto tr2;
case 36: goto st67;
case 95: goto st67;
}
if ( (*p) < 48 ) {
if ( 45 <= (*p) && (*p) <= 46 )
goto st67;
} else if ( (*p) > 57 ) {
if ( 65 <= (*p) && (*p) <= 90 )
goto st67;
} else
goto st67;
goto st0;
st67:
if ( ++p == pe )
goto _test_eof67;
case 67:
switch( (*p) ) {
case 32: goto tr2;
case 36: goto st68;
case 95: goto st68;
}
if ( (*p) < 48 ) {
if ( 45 <= (*p) && (*p) <= 46 )
goto st68;
} else if ( (*p) > 57 ) {
if ( 65 <= (*p) && (*p) <= 90 )
goto st68;
} else
goto st68;
goto st0;
st68:
if ( ++p == pe )
goto _test_eof68;
case 68:
switch( (*p) ) {
case 32: goto tr2;
case 36: goto st69;
case 95: goto st69;
}
if ( (*p) < 48 ) {
if ( 45 <= (*p) && (*p) <= 46 )
goto st69;
} else if ( (*p) > 57 ) {
if ( 65 <= (*p) && (*p) <= 90 )
goto st69;
} else
goto st69;
goto st0;
st69:
if ( ++p == pe )
goto _test_eof69;
case 69:
if ( (*p) == 32 )
goto tr2;
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_eof70: cs = 70; 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_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_eof: {}
_out: {}
}
#line 116 "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");
if(parser->body_start) {
/* final \r\n combo encountered so stop right here */
parser->nread++;
}
return(parser->nread);
}
int thin_http_parser_has_error(http_parser *parser) {
return parser->cs == http_parser_error;
}
int thin_http_parser_is_finished(http_parser *parser) {
return parser->cs == http_parser_first_final;
}
int thin_http_parser_finish(http_parser *parser)
{
int cs = parser->cs;
parser->cs = cs;
if (thin_http_parser_has_error(parser) ) {
return -1;
} else if (thin_http_parser_is_finished(parser) ) {
return 1;
} else {
return 0;
}
}
thin-1.6.3/ext/thin_parser/extconf.rb 0000644 0000041 0000041 00000000144 12432275201 017621 0 ustar www-data www-data require 'mkmf'
dir_config("thin_parser")
have_library("c", "main")
create_makefile("thin_parser")
thin-1.6.3/ext/thin_parser/thin.c 0000644 0000041 0000041 00000030542 12432275201 016741 0 ustar www-data www-data /**
* Mongrel Parser adpated to Thin and to play more nicely with Rack specs.
*
* Orignal version Copyright (c) 2005 Zed A. Shaw
* You can redistribute it and/or modify it under the same terms as Ruby.
*/
#include "ruby.h"
#include "ext_help.h"
#include
#include
#include "parser.h"
#include
static VALUE mThin;
static VALUE cHttpParser;
static VALUE eHttpParserError;
static VALUE global_empty;
static VALUE global_http_prefix;
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_content_length;
static VALUE global_http_content_length;
static VALUE global_request_path;
static VALUE global_content_type;
static VALUE global_http_content_type;
static VALUE global_gateway_interface;
static VALUE global_gateway_interface_value;
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_port_80;
static VALUE global_http_body;
static VALUE global_url_scheme;
static VALUE global_url_scheme_value;
static VALUE global_script_name;
static VALUE global_path_info;
#define TRIE_INCREASE 30
/** Defines common length and error messages for input length validation. */
#define DEF_MAX_LENGTH(N,length) const size_t MAX_##N##_LENGTH = length; const char *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) if(len > MAX_##N##_LENGTH) { rb_raise(eHttpParserError, "%s", MAX_##N##_LENGTH_ERR); }
/** Defines global strings in the init method. */
#define DEF_GLOBAL(N, val) global_##N = rb_obj_freeze(rb_str_new2(val)); rb_global_variable(&global_##N)
/* for compatibility with Ruby 1.8.5, which doesn't declare RSTRING_PTR */
#ifndef RSTRING_PTR
#define RSTRING_PTR(s) (RSTRING(s)->ptr)
#endif
/* for compatibility with Ruby 1.8.5, which doesn't declare RSTRING_LEN */
#ifndef RSTRING_LEN
#define RSTRING_LEN(s) (RSTRING(s)->len)
#endif
/* 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)));
static void http_field(void *data, const char *field, size_t flen, const char *value, size_t vlen)
{
char *ch, *end;
VALUE req = (VALUE)data;
VALUE v = Qnil;
VALUE f = Qnil;
VALIDATE_MAX_LENGTH(flen, FIELD_NAME);
VALIDATE_MAX_LENGTH(vlen, FIELD_VALUE);
v = rb_str_new(value, vlen);
f = rb_str_dup(global_http_prefix);
f = rb_str_buf_cat(f, field, flen);
for(ch = RSTRING_PTR(f) + RSTRING_LEN(global_http_prefix), end = RSTRING_PTR(f) + RSTRING_LEN(f); ch < end; ch++) {
if (*ch >= 'a' && *ch <= 'z') {
*ch &= ~0x20; // upcase
} else if (*ch == '-') {
*ch = '_';
}
}
rb_hash_aset(req, f, v);
}
static void request_method(void *data, const char *at, size_t length)
{
VALUE req = (VALUE)data;
VALUE val = Qnil;
val = rb_str_new(at, length);
rb_hash_aset(req, global_request_method, val);
}
static void request_uri(void *data, const char *at, size_t length)
{
VALUE req = (VALUE)data;
VALUE val = Qnil;
VALIDATE_MAX_LENGTH(length, REQUEST_URI);
val = rb_str_new(at, length);
rb_hash_aset(req, global_request_uri, val);
}
static void fragment(void *data, const char *at, size_t length)
{
VALUE req = (VALUE)data;
VALUE val = Qnil;
VALIDATE_MAX_LENGTH(length, FRAGMENT);
val = rb_str_new(at, length);
rb_hash_aset(req, global_fragment, val);
}
static void request_path(void *data, const char *at, size_t length)
{
VALUE req = (VALUE)data;
VALUE val = Qnil;
VALIDATE_MAX_LENGTH(length, REQUEST_PATH);
val = rb_str_new(at, length);
rb_hash_aset(req, global_request_path, val);
rb_hash_aset(req, global_path_info, val);
}
static void query_string(void *data, const char *at, size_t length)
{
VALUE req = (VALUE)data;
VALUE val = Qnil;
VALIDATE_MAX_LENGTH(length, QUERY_STRING);
val = rb_str_new(at, length);
rb_hash_aset(req, global_query_string, val);
}
static void http_version(void *data, const char *at, size_t length)
{
VALUE req = (VALUE)data;
VALUE val = rb_str_new(at, length);
rb_hash_aset(req, global_http_version, val);
}
/** 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)
{
VALUE req = (VALUE)data;
VALUE temp = Qnil;
VALUE ctype = Qnil;
VALUE clen = Qnil;
VALUE body = Qnil;
char *colon = NULL;
clen = rb_hash_aref(req, global_http_content_length);
if(clen != Qnil) {
rb_hash_aset(req, global_content_length, clen);
rb_hash_delete(req, global_http_content_length);
}
ctype = rb_hash_aref(req, global_http_content_type);
if(ctype != Qnil) {
rb_hash_aset(req, global_content_type, ctype);
rb_hash_delete(req, global_http_content_type);
}
rb_hash_aset(req, global_gateway_interface, global_gateway_interface_value);
if((temp = rb_hash_aref(req, global_http_host)) != Qnil) {
/* ruby better close strings off with a '\0' dammit */
colon = strchr(RSTRING_PTR(temp), ':');
if(colon != NULL) {
rb_hash_aset(req, global_server_name, rb_str_substr(temp, 0, colon - RSTRING_PTR(temp)));
rb_hash_aset(req, global_server_port,
rb_str_substr(temp, colon - RSTRING_PTR(temp)+1,
RSTRING_LEN(temp)));
} else {
rb_hash_aset(req, global_server_name, temp);
rb_hash_aset(req, global_server_port, global_port_80);
}
}
/* grab the initial body and stuff it into the hash */
if(length > 0) {
body = rb_hash_aref(req, global_http_body);
rb_io_write(body, rb_str_new(at, length));
}
/* according to Rack specs, query string must be empty string if none */
if (rb_hash_aref(req, global_query_string) == Qnil) {
rb_hash_aset(req, global_query_string, global_empty);
}
if (rb_hash_aref(req, global_path_info) == Qnil) {
rb_hash_aset(req, global_path_info, global_empty);
}
/* set some constants */
rb_hash_aset(req, global_server_protocol, global_server_protocol_value);
rb_hash_aset(req, global_url_scheme, global_url_scheme_value);
rb_hash_aset(req, global_script_name, global_empty);
}
void Thin_HttpParser_free(void *data) {
TRACE();
if(data) {
free(data);
}
}
VALUE Thin_HttpParser_alloc(VALUE klass)
{
VALUE obj;
http_parser *hp = ALLOC_N(http_parser, 1);
TRACE();
hp->http_field = http_field;
hp->request_method = request_method;
hp->request_uri = request_uri;
hp->fragment = fragment;
hp->request_path = request_path;
hp->query_string = query_string;
hp->http_version = http_version;
hp->header_done = header_done;
thin_http_parser_init(hp);
obj = Data_Wrap_Struct(klass, NULL, Thin_HttpParser_free, hp);
return obj;
}
/**
* call-seq:
* parser.new -> parser
*
* Creates a new parser.
*/
VALUE Thin_HttpParser_init(VALUE self)
{
http_parser *http = NULL;
DATA_GET(self, http_parser, http);
thin_http_parser_init(http);
return self;
}
/**
* call-seq:
* parser.reset -> nil
*
* Resets the parser to it's initial state so that you can reuse it
* rather than making new ones.
*/
VALUE Thin_HttpParser_reset(VALUE self)
{
http_parser *http = NULL;
DATA_GET(self, http_parser, http);
thin_http_parser_init(http);
return Qnil;
}
/**
* call-seq:
* parser.finish -> true/false
*
* Finishes a parser early which could put in a "good" or bad state.
* You should call reset after finish it or bad things will happen.
*/
VALUE Thin_HttpParser_finish(VALUE self)
{
http_parser *http = NULL;
DATA_GET(self, http_parser, http);
thin_http_parser_finish(http);
return thin_http_parser_is_finished(http) ? Qtrue : Qfalse;
}
/**
* call-seq:
* parser.execute(req_hash, data, start) -> Integer
*
* Takes a Hash and a String of data, parses the String of data filling in the Hash
* returning an Integer to indicate how much of the data has been read. No matter
* what the return value, you should call HttpParser#finished? and HttpParser#error?
* to figure out if it's done parsing or there was an error.
*
* This function now throws an exception when there is a parsing error. This makes
* the logic for working with the parser much easier. You can still test for an
* error, but now you need to wrap the parser with an exception handling block.
*
* The third argument allows for parsing a partial request and then continuing
* the parsing from that position. It needs all of the original data as well
* so you have to append to the data buffer as you read.
*/
VALUE Thin_HttpParser_execute(VALUE self, VALUE req_hash, VALUE data, VALUE start)
{
http_parser *http = NULL;
int from = 0;
char *dptr = NULL;
long dlen = 0;
DATA_GET(self, http_parser, http);
from = FIX2INT(start);
dptr = RSTRING_PTR(data);
dlen = RSTRING_LEN(data);
if(from >= dlen) {
rb_raise(eHttpParserError, "%s", "Requested start is after data buffer end.");
} else {
http->data = (void *)req_hash;
thin_http_parser_execute(http, dptr, dlen, from);
VALIDATE_MAX_LENGTH(http_parser_nread(http), HEADER);
if(thin_http_parser_has_error(http)) {
rb_raise(eHttpParserError, "%s", "Invalid HTTP format, parsing fails.");
} else {
return INT2FIX(http_parser_nread(http));
}
}
}
/**
* call-seq:
* parser.error? -> true/false
*
* Tells you whether the parser is in an error state.
*/
VALUE Thin_HttpParser_has_error(VALUE self)
{
http_parser *http = NULL;
DATA_GET(self, http_parser, http);
return thin_http_parser_has_error(http) ? Qtrue : Qfalse;
}
/**
* call-seq:
* parser.finished? -> true/false
*
* Tells you whether the parser is finished or not and in a good state.
*/
VALUE Thin_HttpParser_is_finished(VALUE self)
{
http_parser *http = NULL;
DATA_GET(self, http_parser, http);
return thin_http_parser_is_finished(http) ? Qtrue : Qfalse;
}
/**
* call-seq:
* parser.nread -> Integer
*
* Returns the amount of data processed so far during this processing cycle. It is
* set to 0 on initialize or reset calls and is incremented each time execute is called.
*/
VALUE Thin_HttpParser_nread(VALUE self)
{
http_parser *http = NULL;
DATA_GET(self, http_parser, http);
return INT2FIX(http->nread);
}
void Init_thin_parser()
{
mThin = rb_define_module("Thin");
DEF_GLOBAL(empty, "");
DEF_GLOBAL(http_prefix, "HTTP_");
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(content_length, "CONTENT_LENGTH");
DEF_GLOBAL(http_content_length, "HTTP_CONTENT_LENGTH");
DEF_GLOBAL(content_type, "CONTENT_TYPE");
DEF_GLOBAL(http_content_type, "HTTP_CONTENT_TYPE");
DEF_GLOBAL(gateway_interface, "GATEWAY_INTERFACE");
DEF_GLOBAL(gateway_interface_value, "CGI/1.2");
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_host, "HTTP_HOST");
DEF_GLOBAL(port_80, "80");
DEF_GLOBAL(http_body, "rack.input");
DEF_GLOBAL(url_scheme, "rack.url_scheme");
DEF_GLOBAL(url_scheme_value, "http");
DEF_GLOBAL(script_name, "SCRIPT_NAME");
DEF_GLOBAL(path_info, "PATH_INFO");
eHttpParserError = rb_define_class_under(mThin, "InvalidRequest", rb_eIOError);
cHttpParser = rb_define_class_under(mThin, "HttpParser", rb_cObject);
rb_define_alloc_func(cHttpParser, Thin_HttpParser_alloc);
rb_define_method(cHttpParser, "initialize", Thin_HttpParser_init,0);
rb_define_method(cHttpParser, "reset", Thin_HttpParser_reset,0);
rb_define_method(cHttpParser, "finish", Thin_HttpParser_finish,0);
rb_define_method(cHttpParser, "execute", Thin_HttpParser_execute,3);
rb_define_method(cHttpParser, "error?", Thin_HttpParser_has_error,0);
rb_define_method(cHttpParser, "finished?", Thin_HttpParser_is_finished,0);
rb_define_method(cHttpParser, "nread", Thin_HttpParser_nread,0);
}
thin-1.6.3/ext/thin_parser/ext_help.h 0000644 0000041 0000041 00000000751 12432275201 017613 0 ustar www-data www-data #ifndef ext_help_h
#define ext_help_h
#define RAISE_NOT_NULL(T) if(T == NULL) rb_raise(rb_eArgError, "NULL found for " # T " when shouldn't be.");
#define DATA_GET(from,type,name) Data_Get_Struct(from,type,name); RAISE_NOT_NULL(name);
#define REQUIRE_TYPE(V, T) if(TYPE(V) != T) rb_raise(rb_eTypeError, "Wrong argument type for " # V " required " # T);
#ifdef DEBUG
#define TRACE() fprintf(stderr, "> %s:%d:%s\n", __FILE__, __LINE__, __FUNCTION__)
#else
#define TRACE()
#endif
#endif
thin-1.6.3/ext/thin_parser/parser.h 0000644 0000041 0000041 00000002217 12432275201 017276 0 ustar www-data www-data /**
* Copyright (c) 2005 Zed A. Shaw
* You can redistribute it and/or modify it under the same terms as Ruby.
*/
#ifndef http11_parser_h
#define http11_parser_h
#include
#if defined(_WIN32)
#include
#endif
typedef void (*element_cb)(void *data, const char *at, size_t length);
typedef void (*field_cb)(void *data, const char *field, size_t flen, const char *value, size_t vlen);
typedef struct http_parser {
int cs;
size_t body_start;
int content_len;
size_t nread;
size_t mark;
size_t field_start;
size_t field_len;
size_t query_start;
void *data;
field_cb http_field;
element_cb request_method;
element_cb request_uri;
element_cb fragment;
element_cb request_path;
element_cb query_string;
element_cb http_version;
element_cb header_done;
} http_parser;
int http_parser_init(http_parser *parser);
int http_parser_finish(http_parser *parser);
size_t http_parser_execute(http_parser *parser, const char *data, size_t len, size_t off);
int http_parser_has_error(http_parser *parser);
int http_parser_is_finished(http_parser *parser);
#define http_parser_nread(parser) (parser)->nread
#endif
thin-1.6.3/ext/thin_parser/common.rl 0000644 0000041 0000041 00000004052 12432275201 017457 0 ustar www-data www-data %%{
machine http_parser_common;
#### HTTP PROTOCOL GRAMMAR
# line endings
CRLF = "\r\n";
# character types
CTL = (cntrl | 127);
safe = ("$" | "-" | "_" | ".");
extra = ("!" | "*" | "'" | "(" | ")" | ",");
reserved = (";" | "/" | "?" | ":" | "@" | "&" | "=" | "+");
sorta_safe = ("\"" | "<" | ">");
unsafe = (CTL | " " | "#" | "%" | sorta_safe);
national = any -- (alpha | digit | reserved | extra | safe | unsafe);
unreserved = (alpha | digit | safe | extra | national);
escape = ("%" "u"? xdigit xdigit);
uchar = (unreserved | escape | sorta_safe);
pchar = (uchar | ":" | "@" | "&" | "=" | "+");
tspecials = ("(" | ")" | "<" | ">" | "@" | "," | ";" | ":" | "\\" | "\"" | "/" | "[" | "]" | "?" | "=" | "{" | "}" | " " | "\t");
# elements
token = (ascii -- (CTL | tspecials));
# URI schemes and absolute paths
scheme = ( "http"i ("s"i)? );
hostname = ((alnum | "-" | "." | "_")+ | ("[" (":" | xdigit)+ "]"));
host_with_port = (hostname (":" digit*)?);
userinfo = ((unreserved | escape | ";" | ":" | "&" | "=" | "+")+ "@")*;
path = ( pchar+ ( "/" pchar* )* ) ;
query = ( uchar | reserved )* %query_string ;
param = ( pchar | "/" )* ;
params = ( param ( ";" param )* ) ;
rel_path = (path? (";" params)? %request_path) ("?" %start_query query)?;
absolute_path = ( "/"+ rel_path );
path_uri = absolute_path > mark %request_uri;
Absolute_URI = (scheme "://" userinfo host_with_port path_uri);
Request_URI = ((absolute_path | "*") >mark %request_uri) | Absolute_URI;
Fragment = ( uchar | reserved )* >mark %fragment;
Method = ( upper | digit | safe ){1,20} >mark %request_method;
http_number = ( digit+ "." digit+ ) ;
HTTP_Version = ( "HTTP/" http_number ) >mark %http_version ;
Request_Line = ( Method " " Request_URI ("#" Fragment){0,1} " " HTTP_Version CRLF ) ;
field_name = ( token -- ":" )+ >start_field %write_field;
field_value = any* >start_value %write_value;
message_header = field_name ":" " "* field_value :> CRLF;
Request = Request_Line ( message_header )* ( CRLF @done );
main := Request;
}%%
thin-1.6.3/ext/thin_parser/parser.rl 0000644 0000041 0000041 00000007241 12432275201 017466 0 ustar www-data www-data /**
* Copyright (c) 2005 Zed A. Shaw
* You can redistribute it and/or modify it under the same terms as Ruby.
*/
#include "parser.h"
#include
#include
#include
#include
#include
#define LEN(AT, FPC) (FPC - buffer - parser->AT)
#define MARK(M,FPC) (parser->M = (FPC) - buffer)
#define PTR_TO(F) (buffer + parser->F)
/** Machine **/
%%{
machine http_parser;
action mark {MARK(mark, fpc); }
action start_field { MARK(field_start, fpc); }
action write_field {
parser->field_len = LEN(field_start, fpc);
}
action start_value { MARK(mark, fpc); }
action write_value {
if (parser->http_field != NULL) {
parser->http_field(parser->data, PTR_TO(field_start), parser->field_len, PTR_TO(mark), LEN(mark, fpc));
}
}
action request_method {
if (parser->request_method != NULL) {
parser->request_method(parser->data, PTR_TO(mark), LEN(mark, fpc));
}
}
action request_uri {
if (parser->request_uri != NULL) {
parser->request_uri(parser->data, PTR_TO(mark), LEN(mark, fpc));
}
}
action fragment {
if (parser->fragment != NULL) {
parser->fragment(parser->data, PTR_TO(mark), LEN(mark, fpc));
}
}
action start_query {MARK(query_start, fpc); }
action query_string {
if (parser->query_string != NULL) {
parser->query_string(parser->data, PTR_TO(query_start), LEN(query_start, fpc));
}
}
action http_version {
if (parser->http_version != NULL) {
parser->http_version(parser->data, PTR_TO(mark), LEN(mark, fpc));
}
}
action request_path {
if (parser->request_path != NULL) {
parser->request_path(parser->data, PTR_TO(mark), LEN(mark,fpc));
}
}
action done {
parser->body_start = fpc - buffer + 1;
if (parser->header_done != NULL) {
parser->header_done(parser->data, fpc + 1, pe - fpc - 1);
}
fbreak;
}
include http_parser_common "common.rl";
}%%
/** Data **/
%% write data;
int thin_http_parser_init(http_parser *parser) {
int cs = 0;
%% write init;
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 thin_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 == (long)(len - off) && "pointers aren't same distance");
%% write exec;
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");
if(parser->body_start) {
/* final \r\n combo encountered so stop right here */
parser->nread++;
}
return(parser->nread);
}
int thin_http_parser_has_error(http_parser *parser) {
return parser->cs == http_parser_error;
}
int thin_http_parser_is_finished(http_parser *parser) {
return parser->cs == http_parser_first_final;
}
int thin_http_parser_finish(http_parser *parser)
{
int cs = parser->cs;
parser->cs = cs;
if (thin_http_parser_has_error(parser) ) {
return -1;
} else if (thin_http_parser_is_finished(parser) ) {
return 1;
} else {
return 0;
}
}
thin-1.6.3/README.md 0000644 0000041 0000041 00000013602 12432275201 013772 0 ustar www-data www-data Thin
====
Tiny, fast & funny HTTP server
Thin is a Ruby web server that glues together 3 of the best Ruby libraries in web history:
* The Mongrel parser: the root of Mongrel speed and security
* Event Machine: a network I/O library with extremely high scalability, performance and stability
* Rack: a minimal interface between webservers and Ruby frameworks
Which makes it, with all humility, the most secure, stable, fast and extensible Ruby web server
bundled in an easy to use gem for your own pleasure.
Site: http://code.macournoyer.com/thin/
Group: http://groups.google.com/group/thin-ruby/topics
Bugs: http://github.com/macournoyer/thin/issues
Code: http://github.com/macournoyer/thin
IRC: #thin on freenode
## Installation
For the latest stable version:
`gem install thin`
Or from source:
```
git clone git://github.com/macournoyer/thin.git
cd thin
rake install
```
## Usage
A +thin+ script offers an easy way to start your Rack application:
```
cd to/your/app
thin start
```
When using with Rails and Bundler, make sure to add `gem 'thin'`
to your Gemfile.
See example directory for samples.
### Command Line Examples
Use a rackup file and bind to localhost port 8080:
```
thin -R config.ru -a 127.0.0.1 -p 8080 start
```
Store the server process ID, log to a file and daemonize:
```
thin -p 9292 -P tmp/pids/thin.pid -l logs/thin.log -d start
```
Thin is quite flexible in that many options can be specified at the command line (see below for usage).
### Configuration files
You can create configuration files in yaml format and feed them to thin using `thin -C config.yml`. Here is an example config file:
```yaml
---
user: www-data
group: www-data
pid: tmp/pids/thin.pid
timeout: 30
wait: 30
log: log/thin.log
max_conns: 1024
require: []
environment: production
max_persistent_conns: 512
servers: 1
threaded: true
no-epoll: true
daemonize: true
socket: tmp/sockets/thin.sock
chdir: /path/to/your/apps/root
tag: a-name-to-show-up-in-ps aux
```
### Command Line Options
This is the usage for the thin command which can be obtained by running `thin -h` at the command line.
```sh
Usage: thin [options] start|stop|restart|config|install
Server options:
-a, --address HOST bind to HOST address (default: 0.0.0.0)
-p, --port PORT use PORT (default: 3000)
-S, --socket FILE bind to unix domain socket
-y, --swiftiply [KEY] Run using swiftiply
-A, --adapter NAME Rack adapter to use (default: autodetect)
(rack, rails, ramaze, merb, file)
-R, --rackup FILE Load a Rack config file instead of Rack adapter
-c, --chdir DIR Change to dir before starting
--stats PATH Mount the Stats adapter under PATH
SSL options:
--ssl Enables SSL
--ssl-key-file PATH Path to private key
--ssl-cert-file PATH Path to certificate
--ssl-disable-verify Disables (optional) client cert requests
Adapter options:
-e, --environment ENV Framework environment (default: development)
--prefix PATH Mount the app under PATH (start with /)
Daemon options:
-d, --daemonize Run daemonized in the background
-l, --log FILE File to redirect output (default: /home/robert/log/thin.log)
-P, --pid FILE File to store PID (default: tmp/pids/thin.pid)
-u, --user NAME User to run daemon as (use with -g)
-g, --group NAME Group to run daemon as (use with -u)
--tag NAME Additional text to display in process listing
Cluster options:
-s, --servers NUM Number of servers to start
-o, --only NUM Send command to only one server of the cluster
-C, --config FILE Load options from config file
--all [DIR] Send command to each config files in DIR
-O, --onebyone Restart the cluster one by one (only works with restart command)
-w, --wait NUM Maximum wait time for server to be started in seconds (use with -O)
Tuning options:
-b, --backend CLASS Backend to use, full classname
-t, --timeout SEC Request or command timeout in sec (default: 30)
-f, --force Force the execution of the command
--max-conns NUM Maximum number of open file descriptors (default: 1024)
Might require sudo to set higher than 1024
--max-persistent-conns NUM Maximum number of persistent connections
(default: 100)
--threaded Call the Rack application in threads [experimental]
--threadpool-size NUM Sets the size of the EventMachine threadpool.
(default: 20)
--no-epoll Disable the use of epoll
Common options:
-r, --require FILE require the library
-q, --quiet Silence all logging
-D, --debug Enable debug logging
-V, --trace Set tracing on (log raw request/response)
-h, --help Show this message
-v, --version Show version
```
## License
Ruby License, http://www.ruby-lang.org/en/LICENSE.txt.
## Credits
The parser was stolen from Mongrel http://mongrel.rubyforge.org by Zed Shaw.
Mongrel is copyright 2007 Zed A. Shaw and contributors. It is licensed under
the Ruby license and the GPL2.
Thin is copyright Marc-Andre Cournoyer
Get help at http://groups.google.com/group/thin-ruby/
Report bugs at https://github.com/macournoyer/thin/issues
and major security issues directly to me macournoyer@gmail.com.