?HAMA

Edit File Size: 3.84 KB

/proc/thread-self/root/opt/alt/ruby19/lib64/ruby/1.9.1/xmlrpc/httpserver.rb

Text Base64

#
# Implements a simple HTTP-server by using John W. Small's (jsmall@laser.net)
# ruby-generic-server.
#
# Copyright (C) 2001, 2002, 2003 by Michael Neumann (mneumann@ntecs.de)
#
# $Id: httpserver.rb 29726 2010-11-08 20:59:01Z marcandre $
#

require "gserver"

class HttpServer < GServer

##
  # handle_obj specifies the object, that receives calls to request_handler
  # and ip_auth_handler
  def initialize(handle_obj, port = 8080, host = DEFAULT_HOST, maxConnections = 4,
                 stdlog = $stdout, audit = true, debug = true)
    @handler = handle_obj
    super(port, host, maxConnections, stdlog, audit, debug)
  end

private

# Constants -----------------------------------------------

CRLF        = "\r\n"
  HTTP_PROTO  = "HTTP/1.0"
  SERVER_NAME = "HttpServer (Ruby #{RUBY_VERSION})"

DEFAULT_HEADER = {
    "Server" => SERVER_NAME
  }

##
  # Mapping of status code and error message
  #
  StatusCodeMapping = {
    200 => "OK",
    400 => "Bad Request",
    403 => "Forbidden",
    405 => "Method Not Allowed",
    411 => "Length Required",
    500 => "Internal Server Error"
  }

# Classes -------------------------------------------------

class Request
    attr_reader :data, :header, :method, :path, :proto

def initialize(data, method=nil, path=nil, proto=nil)
      @header, @data = Table.new, data
      @method, @path, @proto = method, path, proto
    end

def content_length
      len = @header['Content-Length']
      return nil if len.nil?
      return len.to_i
    end

end

class Response
    attr_reader   :header
    attr_accessor :body, :status, :status_message

def initialize(status=200)
      @status = status
      @status_message = nil
      @header = Table.new
    end
  end

##
  # a case-insensitive Hash class for HTTP header
  #
  class Table
    include Enumerable

def initialize(hash={})
      @hash = hash
      update(hash)
    end

def [](key)
      @hash[key.to_s.capitalize]
    end

def []=(key, value)
      @hash[key.to_s.capitalize] = value
    end

def update(hash)
      hash.each {|k,v| self[k] = v}
      self
    end

def each
      @hash.each {|k,v| yield k.capitalize, v }
    end

def writeTo(port)
      each { |k,v| port << "#{k}: #{v}" << CRLF }
    end
  end # class Table

# Helper Methods ------------------------------------------

def http_header(header=nil)
    new_header = Table.new(DEFAULT_HEADER)
    new_header.update(header) unless header.nil?

new_header["Connection"] = "close"
    new_header["Date"]       = http_date(Time.now)

new_header
  end

def http_date( aTime )
    aTime.gmtime.strftime( "%a, %d %b %Y %H:%M:%S GMT" )
  end

def http_resp(status_code, status_message=nil, header=nil, body=nil)
    status_message ||= StatusCodeMapping[status_code]

str = ""
    str << "#{HTTP_PROTO} #{status_code} #{status_message}" << CRLF
    http_header(header).writeTo(str)
    str << CRLF
    str << body unless body.nil?
    str
  end

# Main Serve Loop -----------------------------------------

def serve(io)
    # perform IP authentification
    unless @handler.ip_auth_handler(io)
      io << http_resp(403, "Forbidden")
      return
    end

# parse first line
    if io.gets =~ /^(\S+)\s+(\S+)\s+(\S+)/
      request = Request.new(io, $1, $2, $3)
    else
      io << http_resp(400, "Bad Request")
      return
    end

# parse HTTP headers
    while (line=io.gets) !~ /^(\n|\r)/
      if line =~ /^([\w-]+):\s*(.*)$/
        request.header[$1] = $2.strip
      end
    end

io.binmode
    response = Response.new

# execute request handler
    @handler.request_handler(request, response)

# write response back to the client
    io << http_resp(response.status, response.status_message,
                    response.header, response.body)

rescue Exception
    io << http_resp(500, "Internal Server Error")
  end

end # class HttpServer

Exit & Reset Text mode: syntax highlighting auto-detects file type.

Name	Size	Perms	Modified	Actions
base64.rb	1.71 KB	lrw-r--r--	2009-10-02 12:04:37	Edit Download recursive recursive
client.rb	18.63 KB	lrw-r--r--	2011-08-12 08:06:49	Edit Download recursive recursive
config.rb	972 B	lrw-r--r--	2009-10-02 12:04:37	Edit Download recursive recursive
create.rb	6.57 KB	lrw-r--r--	2011-04-22 13:35:43	Edit Download recursive recursive
datetime.rb	3.61 KB	lrw-r--r--	2009-10-02 12:04:37	Edit Download recursive recursive
httpserver.rb	3.84 KB	lrw-r--r--	2010-11-08 20:59:01	Edit Download recursive recursive
marshal.rb	1.55 KB	lrw-r--r--	2009-10-02 12:04:37	Edit Download recursive recursive
parser.rb	19.24 KB	lrw-r--r--	2011-05-26 06:44:48	Edit Download recursive recursive
server.rb	21.65 KB	lrw-r--r--	2011-08-12 08:06:49	Edit Download recursive recursive
utils.rb	3.46 KB	lrw-r--r--	2010-04-28 18:51:35	Edit Download recursive recursive

Directory Contents