Thanks to visit codestin.com
Credit goes to github.com

Skip to content

Commit 1470e1e

Browse files
rloverlove
authored
Merge pull request #113 from Pazus/feature/runner
Implemented the runner to execute suites/tests by path
2 parents 301f336 + 829833b commit 1470e1e

32 files changed

Lines changed: 912 additions & 96 deletions

File tree

‎examples/RunExampleComplexSuiteWithCustomDBMSOutputReporter.sql‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -19,25 +19,25 @@ declare
1919
testtoexecute ut_test;
2020
reporter ut_reporter;
2121
begin
22-
suite1 := ut_test_suite(a_suite_name => 'Test Suite 1' /*,a_items => ut_test_objects_list()*/);
22+
suite1 := ut_test_suite(a_suite_name => 'Test Suite 1', a_object_name => null /*,a_items => ut_test_objects_list()*/);
2323

2424
testtoexecute := ut_test(a_object_name => 'ut_exampletest'
2525
,a_test_procedure => 'ut_exAmpletest'
26-
,a_test_name => 'Example test1'
26+
,a_test_name => 'Example test1'
2727
,a_setup_procedure => 'Setup'
2828
,a_teardown_procedure => 'tEardown');
2929

3030
suite1.add_item(testtoexecute);
3131

32-
suite2 := ut_test_suite(a_suite_name => 'Test Suite 2' /*,a_items => ut_test_objects_list()*/);
32+
suite2 := ut_test_suite(a_suite_name => 'Test Suite 2', a_object_name => null /*,a_items => ut_test_objects_list()*/);
3333
testtoexecute := ut_test(a_object_name => 'UT_EXAMPLETEST2'
3434
,a_test_procedure => 'UT_EXAMPLETEST'
3535
,a_setup_procedure => 'SETUP'
3636
,a_teardown_procedure => 'TEARDOWN');
3737

3838
suite2.add_item(testtoexecute);
3939

40-
suite_complex := ut_test_suite(a_suite_name => 'Complex Test Suite', a_items => ut_objects_list(suite1, suite2));
40+
suite_complex := ut_test_suite(a_suite_name => 'Complex Test Suite', a_object_name => null, a_items => ut_objects_list(suite1, suite2));
4141

4242
-- provide a reporter to process results
4343
reporter := ut_custom_reporter(a_tab_size => 2);

‎examples/RunExampleTestSuite.sql‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -16,7 +16,7 @@ declare
1616
test_item ut_test;
1717
assert ut_assert_result;
1818
begin
19-
suite := ut_test_suite(a_suite_name => 'Test Suite Name' /*,a_items => ut_test_objects_list()*/);
19+
suite := ut_test_suite(a_suite_name => 'Test Suite Name', a_object_name => 'ut_exampletest' /*,a_items => ut_test_objects_list()*/);
2020

2121
testtoexecute := ut_test(a_object_name => 'ut_exampletest'
2222
,a_test_procedure => 'ut_exAmpletest'

‎examples/RunExampleTestSuiteWithCompositeReporter.sql‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -16,7 +16,7 @@ declare
1616
testtoexecute ut_test;
1717
reporter ut_reporter;
1818
begin
19-
suite := ut_test_suite(a_suite_name => 'Test Suite Name' /*,a_items => ut_test_objects_list()*/);
19+
suite := ut_test_suite(a_suite_name => 'Test Suite Name', a_object_name => 'ut_exampletest' /*,a_items => ut_test_objects_list()*/);
2020

2121
testtoexecute := ut_test(a_object_name => 'ut_exampletest'
2222
,a_test_procedure => 'ut_exAmpletest'

‎examples/RunExampleTestSuiteWithCustomDBMSOutputReporter.sql‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -20,7 +20,7 @@ declare
2020
begin
2121
-- Install ut_custom_reporter first from example folder
2222

23-
suite := ut_test_suite(a_suite_name => 'Test Suite Name' /*,a_items => ut_test_objects_list()*/);
23+
suite := ut_test_suite(a_suite_name => 'Test Suite Name', a_object_name => 'ut_exampletest' /*,a_items => ut_test_objects_list()*/);
2424

2525
testtoexecute := ut_test(a_object_name => 'ut_exampletest'
2626
,a_test_procedure => 'ut_exAmpletest'

‎examples/RunExampleTestSuiteWithDBMSOutputReporter.sql‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -15,7 +15,7 @@ declare
1515
testtoexecute ut_test;
1616
reporter ut_reporter;
1717
begin
18-
suite := ut_test_suite(a_suite_name => 'Test Suite Name' /*,a_items => ut_test_objects_list()*/);
18+
suite := ut_test_suite(a_suite_name => 'Test Suite Name', a_object_name => 'ut_exampletest' /*,a_items => ut_test_objects_list()*/);
1919

2020
testtoexecute := ut_test(a_object_name => 'ut_exampletest'
2121
,a_test_procedure => 'ut_exAmpletest'

‎examples/test_pkg1.pck‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -65,13 +65,13 @@ create or replace package body test_pkg1 is
6565

6666
procedure test1 is
6767
begin
68+
ut.expect(g_val1,'1 equals 1 check').to_equal(1);
6869
ut_assert.are_equal(a_msg => '1 equals 1 check', a_expected => 1, a_actual => g_val1);
6970
end;
7071

7172
procedure test2 is
7273
begin
73-
--ut_assert.are_equal(a_msg => 'null equals null check', a_expected => to_number(null), a_actual => g_val1);
74-
ut_assert.are_equal(a_msg => '2 equals 2 check', a_expected => 2, a_actual => g_val2);
74+
ut.expect(g_val2,'2 equals 2 check').to_equal(2);
7575
end;
7676

7777
procedure global_setup is

‎examples/test_pkg2.pck‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -18,12 +18,12 @@ create or replace package body test_pkg2 is
1818

1919
procedure test1 is
2020
begin
21-
ut_assert.are_equal(a_msg => '1 equals 1 check', a_expected => 1, a_actual => 1);
21+
ut.expect(1,'1 equals 1 check').to_equal(1);
2222
end;
2323

2424
procedure test2 is
2525
begin
26-
ut_assert.are_equal(a_msg => '2 equals 2 check', a_expected => 2, a_actual => 2);
26+
ut.expect(2,'2 equals 2 check').to_equal(2);
2727
end;
2828

2929
end test_pkg2;

‎source/core/types/ut_test.tpb‎

Lines changed: 8 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -1,11 +1,16 @@
11
create or replace type body ut_test is
22

3-
constructor function ut_test(self in out nocopy ut_test,a_object_name varchar2, a_test_procedure varchar2, a_test_name in varchar2 default null, a_owner_name varchar2 default null, a_setup_procedure varchar2 default null, a_teardown_procedure varchar2 default null, a_rollback_type integer default null)
3+
constructor function ut_test(self in out nocopy ut_test,a_object_name varchar2,a_object_path varchar2 default null, a_test_procedure varchar2, a_test_name in varchar2 default null, a_owner_name varchar2 default null, a_setup_procedure varchar2 default null, a_teardown_procedure varchar2 default null, a_rollback_type integer default null)
44
return self as result is
55
begin
6-
self.name := a_test_name;
6+
7+
self.init(a_desc_name => a_test_name
8+
,a_object_name => a_test_procedure
9+
,a_object_type => 1
10+
,a_object_path => a_object_path
11+
,a_rollback_type => a_rollback_type);
12+
713
self.object_type := 1;
8-
self.object_name := lower(trim(a_test_procedure));
914
self.test := ut_executable(object_name => trim(a_object_name)
1015
,procedure_name => trim(a_test_procedure)
1116
,owner_name => trim(a_owner_name));
@@ -22,12 +27,6 @@ create or replace type body ut_test is
2227
,owner_name => trim(a_owner_name));
2328
end if;
2429

25-
if a_rollback_type is not null then
26-
ut_utils.validate_rollback_type(a_rollback_type);
27-
self.rollback_type := a_rollback_type;
28-
else
29-
self.rollback_type := ut_utils.gc_rollback_auto;
30-
end if;
3130
return;
3231
end ut_test;
3332

‎source/core/types/ut_test.tps‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -4,7 +4,7 @@ create or replace type ut_test force under ut_test_object
44
test ut_executable,
55
teardown ut_executable,
66

7-
constructor function ut_test(self in out nocopy ut_test,a_object_name varchar2, a_test_procedure varchar2, a_test_name in varchar2 default null, a_owner_name varchar2 default null, a_setup_procedure varchar2 default null, a_teardown_procedure varchar2 default null, a_rollback_type integer default null)
7+
constructor function ut_test(self in out nocopy ut_test,a_object_name varchar2,a_object_path varchar2 default null, a_test_procedure varchar2, a_test_name in varchar2 default null, a_owner_name varchar2 default null, a_setup_procedure varchar2 default null, a_teardown_procedure varchar2 default null, a_rollback_type integer default null)
88
return self as result,
99

1010
member function is_valid return boolean,

‎source/core/types/ut_test_object.tpb‎

Lines changed: 16 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,20 @@
11
create or replace type body ut_test_object is
2+
3+
member procedure init(self in out nocopy ut_test_object, a_desc_name varchar2, a_object_name varchar2, a_object_type integer, a_object_path varchar2 default null, a_rollback_type integer default null) is
4+
begin
5+
self.name := a_desc_name;
6+
self.object_type := a_object_type;
7+
self.object_name := lower(trim(a_object_name));
8+
self.object_path := nvl(lower(trim(a_object_path)), self.object_name);
9+
10+
if a_rollback_type is not null then
11+
ut_utils.validate_rollback_type(a_rollback_type);
12+
self.rollback_type := a_rollback_type;
13+
else
14+
self.rollback_type := ut_utils.gc_rollback_auto;
15+
end if;
16+
return;
17+
end;
218

319
member procedure set_ignore_flag(self in out nocopy ut_test_object, a_ignore_flag boolean) is
420
begin

0 commit comments

Comments
 (0)