/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 

    

  1. note
    2. 

  2. 	description: "Summary description for {REST_SERVER_AUTHENTICATION}."
    3. 

  3. 	author: ""
    4. 

  4. 	date: "$Date$"
    5. 

  5. 	revision: "$Revision$"
    6. 

  6. 

  7. class
    8. 

  8. 	REST_SERVER_AUTHENTICATION
    9. 

  9. 

  10. inherit
    11. 

  11. 	HTTPD_AUTHORIZATION_AUTHENTICATION
    12. 

  12. 

  13. feature -- Status report
    14. 

  14. 

  15. 	is_valid_login_password (a_login, a_password: STRING): BOOLEAN
    16. 

  16. 		do
    17. 

  17. 				--| This is just to test ... !!!
    18. 

  18. 			Result := a_login ~ a_password
    19. 

  19. 		end
    20. 

  20. 

  21. note
    22. 

  22. 	copyright: "Copyright (c) 1984-2011, Eiffel Software and others"
    23. 

  23. 	license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
    24. 

  24. 	source: "[
    25. 

  25. 			Eiffel Software
    26. 

  26. 			5949 Hollister Ave., Goleta, CA 93117 USA
    27. 

  27. 			Telephone 805-685-1006, Fax 805-685-6869
    28. 

  28. 			Website http://www.eiffel.com
    29. 

  29. 			Customer support http://support.eiffel.com
    30. 

  30. 		]"
    31. 

  31. end
    32.