32 lines
988 B
Plaintext
32 lines
988 B
Plaintext
note
|
|
|
|
description: "[
|
|
Default factory for policy-driven method helpers.
|
|
Extension methods can be implemented here.
|
|
]"
|
|
date: "$Date$"
|
|
revision: "$Revision$"
|
|
|
|
class WSF_METHOD_HELPER_FACTORY
|
|
|
|
feature -- Factory
|
|
|
|
new_method_helper (a_method: READABLE_STRING_8): detachable WSF_METHOD_HELPER
|
|
-- New object for processing `a_method'
|
|
require
|
|
a_method_attached: a_method /= Void
|
|
do
|
|
if a_method.is_case_insensitive_equal ({HTTP_REQUEST_METHODS}.method_get) or
|
|
a_method.is_case_insensitive_equal ({HTTP_REQUEST_METHODS}.method_head) then
|
|
create Result
|
|
elseif a_method.is_case_insensitive_equal ({HTTP_REQUEST_METHODS}.method_put) then
|
|
create {WSF_PUT_HELPER} Result
|
|
elseif a_method.is_case_insensitive_equal ({HTTP_REQUEST_METHODS}.method_post) then
|
|
create {WSF_POST_HELPER} Result
|
|
elseif a_method.is_case_insensitive_equal ({HTTP_REQUEST_METHODS}.method_delete) then
|
|
create {WSF_DELETE_HELPER} Result
|
|
end
|
|
end
|
|
|
|
end
|