Added missing "context" classes for uri and starts_with mapping+handler (and helper classes).

So that it is address more needs.
Factorized code between "context" and non context classes.

library/server/wsf/router/support/uri/context_helpers/wsf_uri_agent_context_handler.e

@@ -0,0 +1,31 @@
+note
+	description: "Summary description for {WSF_URI_AGENT_CONTEXT_HANDLER}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	WSF_URI_AGENT_CONTEXT_HANDLER [C -> WSF_HANDLER_CONTEXT create make end]
+
+inherit
+	WSF_URI_CONTEXT_HANDLER [C]
+
+	WSF_AGENT_CONTEXT_HANDLER [C]
+		rename
+			set_action as make
+		end
+
+create
+	make
+
+note
+	copyright: "2011-2012, Jocelyn Fiat, Javier Velilla, Olivier Ligot, Eiffel Software and others"
+	license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
+	source: "[
+			Eiffel Software
+			5949 Hollister Ave., Goleta, CA 93117 USA
+			Telephone 805-685-1006, Fax 805-685-6869
+			Website http://www.eiffel.com
+			Customer support http://support.eiffel.com
+		]"
+end

library/server/wsf/router/support/uri/context_helpers/wsf_uri_context_routed_service.e

@@ -0,0 +1,47 @@
+note
+	description: "Summary description for {WSF_URI_CONTEXT_ROUTED_SERVICE}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+deferred class
+	WSF_URI_CONTEXT_ROUTED_SERVICE [C -> WSF_HANDLER_CONTEXT create make end]
+
+inherit
+	WSF_ROUTED_SERVICE
+
+feature -- Mapping helper: uri
+
+	map_uri (a_uri: READABLE_STRING_8; h: WSF_URI_CONTEXT_HANDLER [C])
+		do
+			map_uri_with_request_methods (a_uri, h, Void)
+		end
+
+	map_uri_with_request_methods (a_uri: READABLE_STRING_8; h: WSF_URI_CONTEXT_HANDLER [C]; rqst_methods: detachable WSF_ROUTER_METHODS)
+		do
+			router.map_with_request_methods (create {WSF_URI_CONTEXT_MAPPING [C]}.make (a_uri, h), rqst_methods)
+		end
+
+feature -- Mapping helper: uri agent		
+
+	map_uri_agent (a_uri: READABLE_STRING_8; proc: PROCEDURE [ANY, TUPLE [ctx: C; req: WSF_REQUEST; res: WSF_RESPONSE]])
+		do
+			map_uri_agent_with_request_methods (a_uri, proc, Void)
+		end
+
+	map_uri_agent_with_request_methods (a_uri: READABLE_STRING_8; proc: PROCEDURE [ANY, TUPLE [ctx: C; req: WSF_REQUEST; res: WSF_RESPONSE]]; rqst_methods: detachable WSF_ROUTER_METHODS)
+		do
+			map_uri_with_request_methods (a_uri, create {WSF_URI_AGENT_CONTEXT_HANDLER [C] }.make (proc), rqst_methods)
+		end
+
+note
+	copyright: "2011-2012, Jocelyn Fiat, Javier Velilla, Olivier Ligot, Eiffel Software and others"
+	license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
+	source: "[
+			Eiffel Software
+			5949 Hollister Ave., Goleta, CA 93117 USA
+			Telephone 805-685-1006, Fax 805-685-6869
+			Website http://www.eiffel.com
+			Customer support http://support.eiffel.com
+		]"
+end

library/server/wsf/router/support/uri/context_helpers/wsf_uri_routing_context_handler.e

@@ -0,0 +1,43 @@
+note
+	description: "Summary description for {WSF_URI_ROUTING_CONTEXT_HANDLER}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	WSF_URI_ROUTING_CONTEXT_HANDLER [C -> WSF_HANDLER_CONTEXT create make end]
+
+inherit
+	WSF_ROUTING_CONTEXT_HANDLER [C]
+
+	WSF_URI_CONTEXT_HANDLER [C]
+		rename
+			execute as uri_execute
+		select
+			uri_execute
+		end
+
+create
+	make,
+	make_with_router
+
+feature	-- Execution
+
+	uri_execute (ctx: C; req: WSF_REQUEST; res: WSF_RESPONSE)
+			-- <Precursor>
+			--| For such routing handler, the previous context is lost
+		do
+			execute_with_context (ctx, req, res)
+		end
+
+note
+	copyright: "2011-2012, Jocelyn Fiat, Javier Velilla, Olivier Ligot, Eiffel Software and others"
+	license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
+	source: "[
+			Eiffel Software
+			5949 Hollister Ave., Goleta, CA 93117 USA
+			Telephone 805-685-1006, Fax 805-685-6869
+			Website http://www.eiffel.com
+			Customer support http://support.eiffel.com
+		]"
+end

library/server/wsf/router/support/uri/wsf_uri_context_handler.e

@@ -0,0 +1,32 @@
+note
+	description: "Summary description for {WSF_URI_CONTEXT_HANDLER}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+deferred class
+	WSF_URI_CONTEXT_HANDLER [C -> WSF_HANDLER_CONTEXT create make end]
+
+inherit
+	WSF_CONTEXT_HANDLER [C]
+
+	WSF_ROUTER_MAPPING_FACTORY
+
+feature {WSF_ROUTER} -- Mapping
+
+	new_mapping (a_uri: READABLE_STRING_8): WSF_ROUTER_MAPPING
+		do
+			create {WSF_URI_CONTEXT_MAPPING [C]} Result.make (a_uri, Current)
+		end
+
+note
+	copyright: "2011-2012, Jocelyn Fiat, Javier Velilla, Olivier Ligot, Eiffel Software and others"
+	license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
+	source: "[
+			Eiffel Software
+			5949 Hollister Ave., Goleta, CA 93117 USA
+			Telephone 805-685-1006, Fax 805-685-6869
+			Website http://www.eiffel.com
+			Customer support http://support.eiffel.com
+		]"
+end

library/server/wsf/router/support/uri/wsf_uri_context_mapping.e

@@ -0,0 +1,53 @@
+note
+	description: "Summary description for WSF_URI_CONTEXT_MAPPING."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	WSF_URI_CONTEXT_MAPPING [C -> WSF_HANDLER_CONTEXT create make end]
+
+inherit
+	WSF_URI_MAPPING_I
+		undefine
+			debug_output
+		end
+
+	WSF_ROUTER_CONTEXT_MAPPING [C]
+
+create
+	make,
+	make_trailing_slash_ignored
+
+feature -- Access
+
+	handler: WSF_URI_CONTEXT_HANDLER [C]
+
+feature -- Change
+
+	set_handler	(h: like handler)
+		do
+			handler := h
+		end
+
+feature {NONE} -- Execution
+
+	execute_handler (h: like handler; req: WSF_REQUEST; res: WSF_RESPONSE)
+		local
+			ctx: C
+		do
+			create ctx.make (req, Current)
+			h.execute (ctx, req, res)
+		end
+
+note
+	copyright: "2011-2012, Jocelyn Fiat, Javier Velilla, Olivier Ligot, Eiffel Software and others"
+	license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
+	source: "[
+			Eiffel Software
+			5949 Hollister Ave., Goleta, CA 93117 USA
+			Telephone 805-685-1006, Fax 805-685-6869
+			Website http://www.eiffel.com
+			Customer support http://support.eiffel.com
+		]"
+end

library/server/wsf/router/support/uri/wsf_uri_handler.e

@@ -1,5 +1,5 @@
 note
-	description: "Summary description for {EWF_ROUTER_URI_PATH_HANDLER}."
+	description: "Summary description for {WSF_URI_HANDLER}."
 	author: ""
 	date: "$Date$"
 	revision: "$Revision$"

library/server/wsf/router/support/uri/wsf_uri_mapping.e

@@ -1,5 +1,5 @@
 note
-	description: "Summary description for EWF_URI_PATH."
+	description: "Summary description for WSF_URI_MAPPING."
 	author: ""
 	date: "$Date$"
 	revision: "$Revision$"
@@ -8,85 +8,28 @@ class
 	WSF_URI_MAPPING
 
 inherit
-	WSF_ROUTER_MAPPING
-
-	WSF_SELF_DOCUMENTED_ROUTER_MAPPING
+	WSF_URI_MAPPING_I
 
 create
 	make,
 	make_trailing_slash_ignored
 
-feature {NONE} -- Initialization
-
-	make (a_uri: READABLE_STRING_8; h: like handler)
-		do
-			handler := h
-			uri := a_uri
-		end
-
-	make_trailing_slash_ignored (a_uri: READABLE_STRING_8; h: like handler)
-		do
-			make (a_uri, h)
-			trailing_slash_ignored := True
-		end
-
 feature -- Access
 
-	associated_resource: READABLE_STRING_8
-			-- Associated resource
-		do
-			Result := uri
-		end
-
 	handler: WSF_URI_HANDLER
 
-	uri: READABLE_STRING_8
+feature -- Change
 
-	trailing_slash_ignored: BOOLEAN
-
-feature -- Documentation
-
-	description: STRING_32 = "Is-URI"
-
-feature -- Status
-
-	routed_handler (req: WSF_REQUEST; res: WSF_RESPONSE; a_router: WSF_ROUTER): detachable WSF_HANDLER
-		local
-			p: READABLE_STRING_8
-			l_uri: like uri
+	set_handler	(h: like handler)
 		do
-			p := path_from_request (req)
-			l_uri := based_uri (uri, a_router)
-			if l_uri.ends_with ("/") then
-				if not p.ends_with ("/") then
-					p := p + "/"
-				end
-			else
-				if p.ends_with ("/") then
-					p := p.substring (1, p.count - 1)
-				end
-			end
-			if p.same_string (l_uri) then
-				Result := handler
-				a_router.execute_before (Current)
-				handler.execute (req, res)
-				a_router.execute_after (Current)
-			end
+			handler := h
 		end
 
-feature {NONE} -- Implementation
+feature {NONE} -- Execution
 
-	based_uri (a_uri: like uri; a_router: WSF_ROUTER): like uri
-		local
-			s: STRING_8
+	execute_handler (h: like handler; req: WSF_REQUEST; res: WSF_RESPONSE)
 		do
-			if attached a_router.base_url as l_base_url then
-				create s.make_from_string (l_base_url)
-				s.append_string (a_uri)
-				Result := s
-			else
-				Result := a_uri
-			end
+			h.execute (req, res)
 		end
 
 note

library/server/wsf/router/support/uri/wsf_uri_mapping_i.e

@@ -0,0 +1,117 @@
+note
+	description: "Summary description for {WSF_URI_MAPPING_I}."
+	author: ""
+	date: "$Date$"
+	revision: "$Revision$"
+
+deferred class
+	WSF_URI_MAPPING_I
+
+inherit
+	WSF_ROUTER_MAPPING
+
+	WSF_SELF_DOCUMENTED_ROUTER_MAPPING
+
+feature {NONE} -- Initialization
+
+	make (a_uri: READABLE_STRING_8; h: like handler)
+		do
+			set_handler (h)
+			uri := a_uri
+		end
+
+	make_trailing_slash_ignored (a_uri: READABLE_STRING_8; h: like handler)
+		do
+			make (a_uri, h)
+			trailing_slash_ignored := True
+		end
+
+feature -- Access
+
+	associated_resource: READABLE_STRING_8
+			-- Associated resource
+		do
+			Result := uri
+		end
+
+	uri: READABLE_STRING_8
+
+	trailing_slash_ignored: BOOLEAN
+
+feature -- Change
+
+	set_handler	(h: like handler)
+		deferred
+		end
+
+feature -- Documentation
+
+	description: STRING_32 = "Is-URI"
+
+feature -- Status
+
+	is_mapping (req: WSF_REQUEST; a_router: WSF_ROUTER): BOOLEAN
+			-- <Precursor>
+		local
+			p: READABLE_STRING_8
+			l_uri: like uri
+		do
+			p := path_from_request (req)
+			l_uri := based_uri (uri, a_router)
+			if l_uri.ends_with ("/") then
+				if not p.ends_with ("/") then
+					p := p + "/"
+				end
+			else
+				if p.ends_with ("/") then
+					p := p.substring (1, p.count - 1)
+				end
+			end
+			if p.same_string (l_uri) then
+				Result := True
+			end
+		end
+
+	routed_handler (req: WSF_REQUEST; res: WSF_RESPONSE; a_router: WSF_ROUTER): detachable WSF_HANDLER
+		do
+			if is_mapping (req, a_router) then
+				Result := handler
+				a_router.execute_before (Current)
+				execute_handler (handler, req, res)
+				a_router.execute_after (Current)
+			end
+		end
+
+feature {NONE} -- Execution
+
+	execute_handler (h: like handler; req: WSF_REQUEST; res: WSF_RESPONSE)
+			-- Execute handler `h' with `req' and `res' for Current mapping
+		deferred
+		end
+
+feature {NONE} -- Implementation
+
+	based_uri (a_uri: like uri; a_router: WSF_ROUTER): like uri
+		local
+			s: STRING_8
+		do
+			if attached a_router.base_url as l_base_url then
+				create s.make_from_string (l_base_url)
+				s.append_string (a_uri)
+				Result := s
+			else
+				Result := a_uri
+			end
+		end
+
+note
+	copyright: "2011-2012, Jocelyn Fiat, Javier Velilla, Olivier Ligot, Eiffel Software and others"
+	license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
+	source: "[
+			Eiffel Software
+			5949 Hollister Ave., Goleta, CA 93117 USA
+			Telephone 805-685-1006, Fax 805-685-6869
+			Website http://www.eiffel.com
+			Customer support http://support.eiffel.com
+		]"
+end