c553bd1e1e
to let the user integrate at the level of its choice (either very early so handle itself the header handling, or later to reuse existing code)
58 lines
1.8 KiB
Plaintext
58 lines
1.8 KiB
Plaintext
note
|
|
description: "Summary description for {HTTP_CONNECTION_HANDLER}."
|
|
author: ""
|
|
date: "$Date$"
|
|
revision: "$Revision$"
|
|
|
|
class
|
|
APPLICATION_CONNECTION_HANDLER
|
|
|
|
inherit
|
|
HTTP_CONNECTION_HANDLER
|
|
|
|
create
|
|
make
|
|
|
|
feature -- Request processing
|
|
|
|
process_request (a_uri: STRING; a_method: STRING; a_headers_map: HASH_TABLE [STRING, STRING]; a_headers_text: STRING; a_input: HTTP_INPUT_STREAM; a_output: HTTP_OUTPUT_STREAM)
|
|
-- Process request ...
|
|
do
|
|
if a_method.is_equal (Get) then
|
|
execute_get_request (a_uri, a_headers_map, a_headers_text, a_input, a_output)
|
|
elseif a_method.is_equal (Post) then
|
|
execute_post_request (a_uri, a_headers_map, a_headers_text, a_input, a_output)
|
|
elseif a_method.is_equal (Put) then
|
|
elseif a_method.is_equal (Options) then
|
|
elseif a_method.is_equal (Head) then
|
|
elseif a_method.is_equal (Delete) then
|
|
elseif a_method.is_equal (Trace) then
|
|
elseif a_method.is_equal (Connect) then
|
|
else
|
|
debug
|
|
print ("Method [" + a_method + "] not supported")
|
|
end
|
|
end
|
|
end
|
|
|
|
execute_get_request (a_uri: STRING; a_headers_map: HASH_TABLE [STRING, STRING]; a_headers_text: STRING; a_input: HTTP_INPUT_STREAM; a_output: HTTP_OUTPUT_STREAM)
|
|
local
|
|
l_http_request : HTTP_REQUEST_HANDLER
|
|
do
|
|
create {GET_REQUEST_HANDLER} l_http_request.make (a_input, a_output)
|
|
l_http_request.set_uri (a_uri)
|
|
l_http_request.process
|
|
end
|
|
|
|
execute_post_request (a_uri: STRING; a_headers_map: HASH_TABLE [STRING, STRING]; a_headers_text: STRING; a_input: HTTP_INPUT_STREAM; a_output: HTTP_OUTPUT_STREAM)
|
|
local
|
|
l_http_request : HTTP_REQUEST_HANDLER
|
|
do
|
|
check not_yet_implemented: False end
|
|
create {POST_REQUEST_HANDLER} l_http_request.make (a_input, a_output)
|
|
l_http_request.set_uri (a_uri)
|
|
l_http_request.process
|
|
end
|
|
|
|
end
|