Merge branch 'feature/call_tests_by_part_of_name' of https://github.com/utPLSQL/utPLSQL into feature/call_tests_by_part_of_name

lwasylow · lwasylow · commit 870cfe4d1d82 · 2022-04-16T02:32:05.000+01:00
diff --git a/docs/about/authors.md b/docs/about/authors.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 ### utPLSQL v3 Major Contributors 
 
diff --git a/docs/about/license.md b/docs/about/license.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Version Information
 
diff --git a/docs/about/project-details.md b/docs/about/project-details.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # utPLSQL Project Details
 
diff --git a/docs/about/support.md b/docs/about/support.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # How to get support
 
diff --git a/docs/index.md b/docs/index.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Introduction to utPLSQL
 
diff --git a/docs/userguide/advanced_data_comparison.md b/docs/userguide/advanced_data_comparison.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Advanced data comparison
 
diff --git a/docs/userguide/annotations.md b/docs/userguide/annotations.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Annotations
 
diff --git a/docs/userguide/best-practices.md b/docs/userguide/best-practices.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Best Practices
 
diff --git a/docs/userguide/coverage.md b/docs/userguide/coverage.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Coverage
 utPLSQL comes with a built-in coverage reporting engine. The code coverage reporting uses package DBMS_PROFILER (and DBMS_PLSQL_CODE_COVERAGE on Oracle database version 12.2 and above) provided with Oracle database.
diff --git a/docs/userguide/exception-reporting.md b/docs/userguide/exception-reporting.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Exception handling and reporting
 
diff --git a/docs/userguide/expectations.md b/docs/userguide/expectations.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Expectation concepts 
 Validation of the code under test (the tested logic of procedure/function etc.) is performed by comparing the actual data against the expected data.
diff --git a/docs/userguide/getting-started.md b/docs/userguide/getting-started.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Getting started with TDD and utPLSQL
 
diff --git a/docs/userguide/install.md b/docs/userguide/install.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Supported database versions
 
diff --git a/docs/userguide/querying_suites.md b/docs/userguide/querying_suites.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Qyerying for test suites
 
diff --git a/docs/userguide/reporters.md b/docs/userguide/reporters.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 utPLSQL provides the following reporting formats.
 
diff --git a/docs/userguide/running-unit-tests.md b/docs/userguide/running-unit-tests.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Running tests
 
diff --git a/docs/userguide/upgrade.md b/docs/userguide/upgrade.md
@@ -1,4 +1,4 @@
-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)
+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)
 
 # Upgrading from version 2
 
diff --git a/source/core/annotations/ut_annotation_manager.pkb b/source/core/annotations/ut_annotation_manager.pkb
@@ -61,15 +61,15 @@ create or replace package body ut_annotation_manager as
     l_refresh_needed boolean;
     l_objects_view   varchar2(200) := ut_metadata.get_objects_view_name();
     l_cached_objects ut_annotation_objs_cache_info;
-    l_result         ut_annotation_objs_cache_info;
+    l_result         ut_annotation_objs_cache_info := ut_annotation_objs_cache_info();
   begin
-    ut_event_manager.trigger_event( 'get_objects_to_refresh - start' );
+    ut_event_manager.trigger_event( 'get_objects_to_refresh - start', ut_key_anyvalues().put('ut_trigger_check.is_alive()',ut_trigger_check.is_alive()) );
 
     l_refresh_needed := ( ut_trigger_check.is_alive() = false ) or a_modified_after is null;
-    l_cached_objects := ut_annotation_cache_manager.get_cached_objects_list( a_object_owner, a_object_type, a_modified_after );
     if l_refresh_needed then
       --limit the list to objects that exist and are visible to the invoking user
       --enrich the list by info about cache validity
+      l_cached_objects := ut_annotation_cache_manager.get_cached_objects_list( a_object_owner, a_object_type, a_modified_after );
       execute immediate
         'select /*+ no_parallel cardinality(i '||ut_utils.scale_cardinality(cardinality(l_cached_objects))||') */
                 '||l_ut_owner||q'[.ut_annotation_obj_cache_info(
@@ -94,8 +94,6 @@ create or replace package body ut_annotation_manager as
              else 'o.last_ddl_time >= cast(:a_modified_after as date)'
              end
         bulk collect into l_result using l_cached_objects, a_modified_after;
-    else
-      l_result := l_cached_objects;
     end if;
     ut_event_manager.trigger_event('get_objects_to_refresh - end (count='||l_result.count||')');
     return l_result;
diff --git a/source/core/ut_suite_cache_manager.pkb b/source/core/ut_suite_cache_manager.pkb
@@ -387,7 +387,7 @@ create or replace package body ut_suite_cache_manager is
       if a_parse_time > l_cached_parse_time or l_cached_parse_time is null then
 
         update /*+ no_parallel */ ut_suite_cache_schema t
-           set t.parse_time = a_parse_time
+           set t.parse_time = greatest(t.parse_time,a_parse_time)
          where object_owner = l_object_owner;
 
         if sql%rowcount = 0 then
diff --git a/source/core/ut_suite_manager.pkb b/source/core/ut_suite_manager.pkb
@@ -84,7 +84,7 @@ create or replace package body ut_suite_manager is
           when sys.dbms_assert.invalid_schema_name then
             if l_object like '%*%' or ut_metadata.package_exists_in_cur_schema(upper(l_object)) then
               a_paths(i) := c_current_schema || '.' || a_paths(i);
-              l_schema := c_current_schema;              
+              l_schema := c_current_schema;
             else
               raise;
             end if;
@@ -279,7 +279,7 @@ create or replace package body ut_suite_manager is
           pragma inline(get_logical_suite, 'YES');
           a_suites(a_suites.last) := get_logical_suite(l_rows, l_idx, l_level,l_prev_level, l_items_at_level );
         end if;
-        if l_prev_level > l_level then    
+        if l_prev_level > l_level then
           l_items_at_level(l_prev_level).delete;
         end if;
         l_prev_level := l_level;
@@ -295,11 +295,11 @@ create or replace package body ut_suite_manager is
     end loop;
     close a_suite_data_cursor;
   end reconstruct_from_cache;
-  
+
   function get_filtered_cursor(
     a_unfiltered_rows in ut_suite_cache_rows,
     a_skip_all_objects boolean  := false
-  ) 
+  )
   return ut_suite_cache_rows is
     l_result           ut_suite_cache_rows := ut_suite_cache_rows();
   begin
@@ -321,22 +321,22 @@ create or replace package body ut_suite_manager is
                and a.object_type = 'PACKAGE'
             )
           or c.self_type = 'UT_LOGICAL_SUITE'));
-    end if; 
+    end if;
     return l_result;
   end;
-  
+
   procedure reconcile_paths_and_suites(
     a_schema_paths     ut_path_items,
     a_filtered_rows    ut_suite_cache_rows
   ) is
-  begin 
+  begin
     for i in ( select  /*+ no_parallel */ sp.schema_name,sp.object_name,sp.procedure_name,
         sp.suite_path,sc.path
       from table(a_schema_paths) sp left outer join
-      table(a_filtered_rows) sc on 
-        (( upper(sp.schema_name) = upper(sc.object_owner) and upper(sp.object_name) = upper(sc.object_name) 
+      table(a_filtered_rows) sc on
+        (( upper(sp.schema_name) = upper(sc.object_owner) and upper(sp.object_name) = upper(sc.object_name)
            and nvl(upper(sp.procedure_name),sc.name) = sc.name )
-        or (sc.path = sp.suite_path))          
+        or (sc.path = sp.suite_path))
         where sc.path is null)
     loop
       if i.suite_path is not null then
@@ -346,9 +346,9 @@ create or replace package body ut_suite_manager is
       elsif i.object_name is not null then
         raise_application_error(ut_utils.gc_suite_package_not_found,'Suite package '||i.schema_name||'.'||i.object_name|| ' does not exist');
       end if;
-    end loop;    
+    end loop;
   end;
-  
+
   function get_cached_suite_data(
     a_schema_paths     ut_path_items,
     a_random_seed      positive,
@@ -363,14 +363,14 @@ create or replace package body ut_suite_manager is
       a_schema_paths,
       a_random_seed,
       a_tags
-    );  
-    
+    );
+
     l_filtered_rows := get_filtered_cursor(l_unfiltered_rows,a_skip_all_objects);
     reconcile_paths_and_suites(a_schema_paths,l_filtered_rows);
-    
+
     ut_suite_cache_manager.sort_and_randomize_tests(l_filtered_rows,a_random_seed);
 
-    open l_result for 
+    open l_result for
       select * from table(l_filtered_rows);
     return l_result;
   end;
@@ -486,7 +486,7 @@ create or replace package body ut_suite_manager is
       get_cached_suite_data(
         l_schema_paths,
         null,
-        null,        
+        null,
         a_skip_all_objects
       )
     );
@@ -528,7 +528,7 @@ create or replace package body ut_suite_manager is
     l_schema             varchar2(4000);
   begin
     ut_event_manager.trigger_event('configure_execution_by_path - start');
-    a_suites := ut_suite_items();    
+    a_suites := ut_suite_items();
     --resolve schema names from paths and group paths by schema name
     l_schema_names := resolve_schema_names(l_paths);
 
@@ -538,23 +538,23 @@ create or replace package body ut_suite_manager is
       refresh_cache(upper(l_schema_names(l_schema)));
       l_schema := l_schema_names.next(l_schema);
     end loop;
-    
+
     l_schema_paths := ut_suite_cache_manager.get_schema_paths(l_paths);
-    
+
     --We will get a single list of paths rather than loop by loop.
     add_suites_for_paths(
       l_schema_paths,
       a_suites,
       a_random_seed,
       a_tags
     );
-        
+
     --propagate rollback type to suite items after organizing suites into hierarchy
     for i in 1 .. a_suites.count loop
       a_suites(i).set_rollback_type( a_suites(i).get_rollback_type() );
     end loop;
 
-    ut_event_manager.trigger_event('configure_execution_by_path - start');
+    ut_event_manager.trigger_event('configure_execution_by_path - end');
   end configure_execution_by_path;
 
   function get_suites_info(
@@ -564,11 +564,11 @@ create or replace package body ut_suite_manager is
     l_all_suite_info     ut_suite_items_info;
     l_schema_names       ut_varchar2_rows;
     l_schema_paths       ut_path_items;
-    l_paths              ut_varchar2_list := a_paths; 
+    l_paths              ut_varchar2_list := a_paths;
     l_schema             varchar2(4000);
     l_unfiltered_rows    ut_suite_cache_rows;
     l_filtered_rows      ut_suite_cache_rows;
-   
+
   begin
     l_schema_names := resolve_schema_names(l_paths);
     --refresh cache
diff --git a/source/core/ut_utils.pks b/source/core/ut_utils.pks
@@ -21,7 +21,7 @@ create or replace package ut_utils authid definer is
    *
    */
 
-  gc_version                 constant varchar2(50) := 'v3.1.13.3940-develop';
+  gc_version                 constant varchar2(50) := 'v3.1.13.4003-develop';
     
   subtype t_executable_type      is varchar2(30);
   gc_before_all                  constant t_executable_type := 'beforeall';

Original file line number	Diff line number	Diff line change
`@@ -1,4 +1,4 @@`
`1`		`-![version](https://img.shields.io/badge/version-v3.1.13.3940--develop-blue.svg)`
	`1`	`+![version](https://img.shields.io/badge/version-v3.1.13.4003--develop-blue.svg)`
`2`	`2`
`3`	`3`	`### utPLSQL v3 Major Contributors`
`4`	`4`