Exclude Unit Test packages from coverage

jgebal · jgebal · commit 8ac32d7b2fae · 2022-10-16T22:08:41.000+03:00
diff --git a/source/core/coverage/ut_coverage.pkb b/source/core/coverage/ut_coverage.pkb
@@ -167,7 +167,7 @@ create or replace package body ut_coverage is
   begin
     if not is_develop_mode() then
       --skip all the utplsql framework objects and all the unit test packages that could potentially be reported by coverage.
-      l_skip_objects := coalesce( ut_utils.get_utplsql_objects_list() multiset union all ut_suite_manager.get_schema_ut_packages(a_coverage_options.schema_names) , ut_object_names() );
+      l_skip_objects := coalesce( ut_utils.get_utplsql_objects_list() multiset union all ut_suite_manager.get_schema_ut_packages(a_coverage_options.schema_names, a_coverage_options.include_schema_expr) , ut_object_names() );
     end if;
 
     --Regex exclusion override the standard exclusion objects.
diff --git a/source/core/ut_suite_manager.pkb b/source/core/ut_suite_manager.pkb
@@ -493,13 +493,21 @@ create or replace package body ut_suite_manager is
     return l_suites;
   end;
 
-  function get_schema_ut_packages(a_schema_names ut_varchar2_rows) return ut_object_names is
+  function get_schema_ut_packages(a_schema_names ut_varchar2_rows, a_schema_name_expr varchar2) return ut_object_names is
+    l_schema_names ut_varchar2_rows := a_schema_names;
   begin
-    for i in 1 .. a_schema_names.count loop
-      refresh_cache(a_schema_names(i));
+    if a_schema_name_expr is not null then
+      select username
+        bulk collect into l_schema_names
+        from all_users
+       where regexp_like(username,a_schema_name_expr,'i');
+    end if;
+
+    for i in 1 .. l_schema_names.count loop
+      refresh_cache(l_schema_names(i));
     end loop;
 
-    return ut_suite_cache_manager.get_cached_packages( a_schema_names );
+    return ut_suite_cache_manager.get_cached_packages( l_schema_names );
   end;
 
   function get_schema_names(a_paths ut_varchar2_list) return ut_varchar2_rows is
diff --git a/source/core/ut_suite_manager.pks b/source/core/ut_suite_manager.pks
@@ -30,7 +30,7 @@ create or replace package ut_suite_manager authid current_user is
    * @param a_schema_names list of schemas to return the information for
    * @return array containing unit test schema and object names
    */
-  function get_schema_ut_packages(a_schema_names ut_varchar2_rows) return ut_object_names;
+  function get_schema_ut_packages(a_schema_names ut_varchar2_rows, a_schema_name_expr varchar2) return ut_object_names;
 
   /**
    * Builds a hierarchical suites based on given suite-paths
diff --git a/test/ut3_tester_helper/run_helper.pkb b/test/ut3_tester_helper/run_helper.pkb
@@ -616,7 +616,7 @@ create or replace package body run_helper is
   
   function get_schema_ut_packages(a_owner in varchar2) return ut3_develop.ut_object_names is
   begin
-    return ut3_develop.ut_suite_manager.get_schema_ut_packages(ut3_develop.ut_varchar2_rows(a_owner));
+    return ut3_develop.ut_suite_manager.get_schema_ut_packages(ut3_develop.ut_varchar2_rows(a_owner), null);
   end;
     
   function ut_output_buffer_tmp return t_out_buff_tab pipelined is
diff --git a/test/ut3_user/reporters/test_coverage/test_extended_coverage.pkb b/test/ut3_user/reporters/test_coverage/test_extended_coverage.pkb
@@ -112,9 +112,9 @@ create or replace package body test_extended_coverage is
     l_actual     clob;
   begin
     --Arrange
-    l_expected := '%<file path="package body ut3_develop.regex_dummy_cov">' ||
+    l_expected := '%<file path="package body ut3_tester_helper.regex_dummy_cov">' ||
       '%<lineToCover lineNumber="4" covered="true"%/>%';
-    l_not_expected := '%<file path="package body ut3_tester_helper.regex_dummy_cov">' ||
+    l_not_expected := '%<file path="package body ut3_develop.regex_dummy_cov">' ||
       '%<lineToCover lineNumber="4" covered="true"%/>%';
     --Act
     l_actual :=
@@ -123,14 +123,15 @@ create or replace package body test_extended_coverage is
             ut3_develop.ut.run(
               a_paths => ut3_develop.ut_varchar2_list('ut3_develop.test_regex_dummy_cov', 'ut3_tester_helper.test_regex_dummy_cov'),
               a_reporter=> ut3_develop.ut_coverage_sonar_reporter( ),
-              a_include_schema_expr => '^ut3_develop',
-              a_include_objects => ut3_develop.ut_varchar2_list( 'ut3_tester_helper.regex_dummy_cov' )
+              a_include_schema_expr => '^ut3_tester_hel.*',
+              a_include_objects => ut3_develop.ut_varchar2_list( 'ut3_develop.regex_dummy_cov' )
             )
           ]'
         );          
     --Assert
     ut.expect(l_actual).to_be_like(l_expected);
     ut.expect(l_actual).not_to_be_like(l_not_expected);
+    ut.expect(l_actual).not_to_be_like('%ut3_tester_helper.test_regex_dummy_cov%');
   end;
  
   procedure coverage_regex_include_object is
