Simplified schema to focus on user and node. Now possible to have sqlite via ODBC and/or mysql support, and select using configuration file. Updated demo example.
73 lines
1.5 KiB
Plaintext
73 lines
1.5 KiB
Plaintext
note
|
|
description: "[
|
|
Eiffel tests that can be executed by testing tool.
|
|
]"
|
|
author: "EiffelStudio test wizard"
|
|
date: "$Date: 2015-01-27 19:15:02 +0100 (mar., 27 janv. 2015) $"
|
|
revision: "$Revision: 96542 $"
|
|
testing: "type/manual"
|
|
|
|
class
|
|
USER_TEST_SET
|
|
|
|
inherit
|
|
EQA_TEST_SET
|
|
redefine
|
|
on_prepare,
|
|
on_clean
|
|
select
|
|
default_create
|
|
end
|
|
ABSTRACT_DB_TEST
|
|
rename
|
|
default_create as default_db_test
|
|
end
|
|
|
|
|
|
feature {NONE} -- Events
|
|
|
|
on_prepare
|
|
-- <Precursor>
|
|
do
|
|
(create {CLEAN_DB}).clean_db(connection)
|
|
storage.new_user (custom_user ("admin", "admin","admin@admin.com"))
|
|
end
|
|
|
|
on_clean
|
|
-- <Precursor>
|
|
do
|
|
end
|
|
|
|
feature -- Test routines
|
|
|
|
test_user_exist
|
|
-- User admin exist
|
|
do
|
|
assert ("Not void", attached storage.user_by_email ("admin@admin.com"))
|
|
assert ("Not void", attached storage.user_by_id (1))
|
|
assert ("Not void", attached storage.user_by_name ("admin"))
|
|
end
|
|
|
|
test_user_not_exist
|
|
-- Uset test does not exist.
|
|
do
|
|
assert ("Void", storage.user_by_email ("test@admin.com") = Void)
|
|
assert ("Void", storage.user_by_id (2) = Void )
|
|
assert ("Void", storage.user_by_name ("test") = Void)
|
|
end
|
|
|
|
test_new_user
|
|
do
|
|
storage.new_user (custom_user ("test", "test","test@admin.com"))
|
|
assert ("Not void", attached storage.user_by_email ("test@admin.com"))
|
|
assert ("Not void", attached storage.user_by_id (2))
|
|
assert ("Not void", attached storage.user_by_id (2) as l_user and then l_user.id = 2 and then l_user.name ~ "test")
|
|
assert ("Not void", attached storage.user_by_name ("test"))
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
|