PageRenderTime 252ms CodeModel.GetById 249ms app.highlight 1ms RepoModel.GetById 1ms app.codeStats 0ms

/examples/rest_server/src/rest_server_authentication.e

http://github.com/jocelyn/EiffelWebReloaded
Specman e | 31 lines | 25 code | 5 blank | 1 comment | 1 complexity | bafde24781409b64f8a5b069fd1f0e84 MD5 | raw file
 1note
 2	description: "Summary description for {REST_SERVER_AUTHENTICATION}."
 3	author: ""
 4	date: "$Date$"
 5	revision: "$Revision$"
 6
 7class
 8	REST_SERVER_AUTHENTICATION
 9
10inherit
11	HTTPD_AUTHORIZATION_AUTHENTICATION
12
13feature -- Status report
14
15	is_valid_login_password (a_login, a_password: STRING): BOOLEAN
16		do
17				--| This is just to test ... !!!
18			Result := a_login ~ a_password
19		end
20
21note
22	copyright: "Copyright (c) 1984-2011, Eiffel Software and others"
23	license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
24	source: "[
25			Eiffel Software
26			5949 Hollister Ave., Goleta, CA 93117 USA
27			Telephone 805-685-1006, Fax 805-685-6869
28			Website http://www.eiffel.com
29			Customer support http://support.eiffel.com
30		]"
31end