au_core_test_kit 0.0.16

data/lib/au_core_test_kit/generator/must_support_metadata_extractor_au_core_3.rb

@@ -0,0 +1,64 @@
+# frozen_string_literal: true
+
+module AUCoreTestKit
+  class Generator
+    class MustSupportMetadataExtractorAUCore3
+      attr_accessor :profile, :must_supports
+
+      def initialize(profile, must_supports)
+        self.profile = profile
+        self.must_supports = must_supports
+      end
+
+      def handle_special_cases
+        add_must_support_choices
+        remove_patient_address_period
+        remove_document_reference_custodian
+      end
+
+      def add_must_support_choices
+        choices = []
+
+        case profile.type
+        when 'Device'
+          choices << { paths: ['udiCarrier.carrierAIDC', 'udiCarrier.carrierHRF'] }
+        when 'DocumentReference'
+          choices << { paths: ['content.attachment.data', 'content.attachment.url'] }
+        when 'Patient'
+          # FHIR-40299 adds USCDI MustSupport choices for:
+          # * address.period.end and address.use,
+          # * name.period.end and name.use
+          choices << {
+            paths: ['address.period.end', 'address.use'],
+            uscdi_only: true
+          }
+
+          choices << {
+            paths: ['name.period.end', 'name.use'],
+            uscdi_only: true
+          }
+        end
+
+        must_supports[:choices] = choices if choices.present?
+      end
+
+      # FHIR-40299 removes Patient.address.period from MustSupport,
+      def remove_patient_address_period
+        return unless profile.type == 'Patient'
+
+        must_supports[:elements].delete_if do |element|
+          element[:path] == 'address.period'
+        end
+      end
+
+      # AU Core clarified that server implmentation is not required to support DocumentReference.custodian (FHIR-28393)
+      def remove_document_reference_custodian
+        return unless profile.type == 'DocumentReference'
+
+        must_supports[:elements].delete_if do |element|
+          element[:path] == 'custodian'
+        end
+      end
+    end
+  end
+end

data/lib/au_core_test_kit/generator/must_support_test_generator.rb

@@ -0,0 +1,118 @@
+# frozen_string_literal: true
+
+require_relative 'naming'
+require_relative 'special_cases'
+
+module AUCoreTestKit
+  class Generator
+    class MustSupportTestGenerator
+      class << self
+        def generate(ig_metadata, base_output_dir)
+          ig_metadata.groups
+                     .reject { |group| SpecialCases.exclude_group? group }
+                     .each { |group| new(group, base_output_dir).generate }
+        end
+      end
+
+      attr_accessor :group_metadata, :base_output_dir
+
+      def initialize(group_metadata, base_output_dir)
+        self.group_metadata = group_metadata
+        self.base_output_dir = base_output_dir
+      end
+
+      def template
+        @template ||= File.read(File.join(__dir__, 'templates', 'must_support.rb.erb'))
+      end
+
+      def output
+        @output ||= ERB.new(template).result(binding)
+      end
+
+      def base_output_file_name
+        "#{class_name.underscore}.rb"
+      end
+
+      def output_file_directory
+        File.join(base_output_dir, profile_identifier)
+      end
+
+      def output_file_name
+        File.join(output_file_directory, base_output_file_name)
+      end
+
+      def read_interaction
+        self.class.read_interaction(group_metadata)
+      end
+
+      def profile_identifier
+        Naming.snake_case_for_profile(group_metadata)
+      end
+
+      def test_id
+        "au_core_#{group_metadata.reformatted_version}_#{profile_identifier}_must_support_test"
+      end
+
+      def class_name
+        "#{Naming.upper_camel_case_for_profile(group_metadata)}MustSupportTest"
+      end
+
+      def module_name
+        "AUCore#{group_metadata.reformatted_version.upcase}"
+      end
+
+      def resource_type
+        group_metadata.resource
+      end
+
+      def resource_collection_string
+        'all_scratch_resources'
+      end
+
+      def must_support_list_string
+        build_must_support_list_string(false)
+      end
+
+      def uscdi_list_string
+        build_must_support_list_string(true)
+      end
+
+      def build_must_support_list_string(uscdi_only)
+        slice_names = group_metadata.must_supports[:slices]
+                                    .select { |slice| slice[:uscdi_only].presence == uscdi_only.presence }
+                                    .map { |slice| slice[:slice_id] }
+
+        element_names = group_metadata.must_supports[:elements]
+                                      .select { |element| element[:uscdi_only].presence == uscdi_only.presence }
+                                      .map { |element| "#{resource_type}.#{element[:path]}" }
+
+        extension_names = group_metadata.must_supports[:extensions]
+                                        .select { |extension| extension[:uscdi_only].presence == uscdi_only.presence }
+                                        .map { |extension| extension[:id] }
+
+        group_metadata.must_supports[:choices]&.each do |choice|
+          next unless choice[:uscdi_only].presence == uscdi_only.presence && choice.key?(:paths)
+
+          choice[:paths].each { |path| element_names.delete("#{resource_type}.#{path}") }
+          element_names << choice[:paths].map { |path| "#{resource_type}.#{path}" }.join(' or ')
+        end
+
+        (slice_names + element_names + extension_names)
+          .uniq
+          .sort
+          .map { |name| "#{' ' * 8}* #{name}" }
+          .join("\n")
+      end
+
+      def generate
+        FileUtils.mkdir_p(output_file_directory)
+        File.open(output_file_name, 'w') { |f| f.write(output) }
+
+        group_metadata.add_test(
+          id: test_id,
+          file_name: base_output_file_name
+        )
+      end
+    end
+  end
+end

data/lib/au_core_test_kit/generator/naming.rb

@@ -0,0 +1,57 @@
+# frozen_string_literal: true
+
+module AUCoreTestKit
+  class Generator
+    module Naming
+      HEART_RATE = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-heartrate'
+      PATIENT = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-patient'
+      BLOOD_PRESSURE = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-bloodpressure'
+      PROVENANCE = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-provenance'
+      LOCATION = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-location'
+      BODY_TEMPERATURE = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-bodytemp'
+      RESPIRATION_RATE = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-resprate'
+      MEDICATION = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-medication'
+      SEX_ASSIGNED_AT_BIRTH = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-rsg-sexassignedab'
+      MEDICATIONSTATEMENT = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-medicationstatement'
+      ALLERGYINTOLERANCE = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-allergyintolerance'
+      PATHOLOGY_RESULT_OBSERVATION = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-diagnosticresult-path'
+      BODY_HEIGHT = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-bodyheight'
+      MEDICATIONREQUEST = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-medicationrequest'
+      SMOKING_STATUS = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-smokingstatus'
+      CONDITION = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-condition'
+      WAIST_CIRCUMFERENCE = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-waistcircum'
+      BODY_WEIGHT = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-bodyweight'
+      ENCOUNTER = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-encounter'
+      ORGANIZATION = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-organization'
+      PRACTITIONER = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-practitioner'
+      PROCEDURE = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-procedure'
+      IMMUNIZATION = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-immunization'
+      DIAGNOSTIC_RESULT_OBSERVATION = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-diagnosticresult'
+      PRACTITIONERROLE = 'http://hl7.org.au/fhir/core/StructureDefinition/au-core-practitionerrole'
+
+      class << self
+        def resources_with_multiple_profiles
+          %w[Condition DiagnosticReport Observation]
+        end
+
+        def resource_has_multiple_profiles?(resource)
+          resources_with_multiple_profiles.include? resource
+        end
+
+        def snake_case_for_profile(group_metadata)
+          resource = group_metadata.resource
+          return resource.underscore unless resource_has_multiple_profiles?(resource)
+
+          group_metadata.name
+                        .delete_prefix('au_core_')
+                        .gsub('diagnosticreport', 'diagnostic_report')
+                        .underscore
+        end
+
+        def upper_camel_case_for_profile(group_metadata)
+          snake_case_for_profile(group_metadata).camelize
+        end
+      end
+    end
+  end
+end

data/lib/au_core_test_kit/generator/provenance_revinclude_search_test_generator.rb

@@ -0,0 +1,193 @@
+# frozen_string_literal: true
+
+require_relative 'naming'
+require_relative 'special_cases'
+
+module AUCoreTestKit
+  class Generator
+    class ProvenanceRevincludeSearchTestGenerator
+      class << self
+        def generate(ig_metadata, base_output_dir)
+          ig_metadata.groups
+                     .reject { |group| SpecialCases.exclude_group? group }
+                     .select { |group| group.revincludes.include? 'Provenance:target' }
+                     .each { |group| new(group, group.searches.first, base_output_dir).generate }
+        end
+      end
+
+      attr_accessor :group_metadata, :search_metadata, :base_output_dir
+
+      def initialize(group_metadata, search_metadata, base_output_dir)
+        self.group_metadata = group_metadata
+        self.search_metadata = search_metadata
+        self.base_output_dir = base_output_dir
+      end
+
+      def template
+        @template ||= File.read(File.join(__dir__, 'templates', 'provenance_revinclude_search.rb.erb'))
+      end
+
+      def output
+        @output ||= ERB.new(template).result(binding)
+      end
+
+      def base_output_file_name
+        "#{class_name.underscore}.rb"
+      end
+
+      def output_file_directory
+        File.join(base_output_dir, profile_identifier)
+      end
+
+      def output_file_name
+        File.join(output_file_directory, base_output_file_name)
+      end
+
+      def profile_identifier
+        Naming.snake_case_for_profile(group_metadata)
+      end
+
+      def test_id
+        "au_core_#{group_metadata.reformatted_version}_#{profile_identifier}_#{search_identifier}_search_test"
+      end
+
+      def search_identifier
+        'provenance_revinclude'
+      end
+
+      def search_title
+        search_identifier.camelize
+      end
+
+      def class_name
+        "#{Naming.upper_camel_case_for_profile(group_metadata)}#{search_title}SearchTest"
+      end
+
+      def module_name
+        "AUCore#{group_metadata.reformatted_version.upcase}"
+      end
+
+      def resource_type
+        group_metadata.resource
+      end
+
+      def search_params
+        @search_params ||=
+          search_metadata[:names].map do |name|
+            {
+              name:,
+              path: search_definition(name)[:path]
+            }
+          end
+      end
+
+      def first_search?
+        group_metadata.searches.first == search_metadata
+      end
+
+      def fixed_value_search?
+        search_metadata[:names] != ['patient'] &&
+          !group_metadata.delayed? && resource_type != 'Patient'
+      end
+
+      def fixed_value_search_param_name
+        (search_metadata[:names] - [:patient]).first
+      end
+
+      def search_param_name_string
+        "#{search_metadata[:names].join(' + ')} + revInclude:Provenance:target"
+      end
+
+      def needs_patient_id?
+        search_metadata[:names].include?('patient') ||
+          (resource_type == 'Patient' && search_metadata[:names].include?('_id'))
+      end
+
+      def search_param_names
+        search_params.map { |param| param[:name] }
+      end
+
+      def search_param_names_array
+        array_of_strings(search_param_names)
+      end
+
+      def path_for_value(path)
+        path == 'class' ? 'local_class' : path
+      end
+
+      def required_comparators_for_param(name)
+        search_definition(name)[:comparators].select { |_comparator, expectation| expectation == 'SHALL' }
+      end
+
+      def required_comparators
+        @required_comparators ||=
+          search_param_names.each_with_object({}) do |name, comparators|
+            required_comparators = required_comparators_for_param(name)
+            comparators[name] = required_comparators if required_comparators.present?
+          end
+      end
+
+      # def patient_id_param?(param)
+      #   param[:name] == 'patient' ||
+      #     (resource_type == 'Patient' && param[:name] == '_id')
+      # end
+
+      def search_definition(name)
+        group_metadata.search_definitions[name.to_sym]
+      end
+
+      def saves_delayed_references?
+        first_search? && group_metadata.delayed_references.present?
+      end
+
+      def possible_status_search?
+        !search_metadata[:names].include?('status') && group_metadata.search_definitions.key?(:status)
+      end
+
+      def token_search_params
+        @token_search_params ||=
+          search_param_names.select do |name|
+            %w[Identifier CodeableConcept Coding].include? group_metadata.search_definitions[name.to_sym][:type]
+          end
+      end
+
+      def token_search_params_string
+        array_of_strings(token_search_params)
+      end
+
+      def required_comparators_string
+        array_of_strings(required_comparators.keys)
+      end
+
+      def array_of_strings(array)
+        quoted_strings = array.map { |element| "'#{element}'" }
+        "[#{quoted_strings.join(', ')}]"
+      end
+
+      def search_properties
+        {}.tap do |properties|
+          properties[:fixed_value_search] = 'true' if fixed_value_search?
+          properties[:resource_type] = "'#{resource_type}'"
+          properties[:search_param_names] = search_param_names_array
+          properties[:possible_status_search] = 'true' if possible_status_search?
+        end
+      end
+
+      def search_test_properties_string
+        search_properties
+          .map { |key, value| "#{' ' * 8}#{key}: #{value}" }
+          .join(",\n")
+      end
+
+      def generate
+        FileUtils.mkdir_p(output_file_directory)
+        File.open(output_file_name, 'w') { |f| f.write(output) }
+
+        group_metadata.add_test(
+          id: test_id,
+          file_name: base_output_file_name
+        )
+      end
+    end
+  end
+end

data/lib/au_core_test_kit/generator/read_test_generator.rb

@@ -0,0 +1,112 @@
+# frozen_string_literal: true
+
+require_relative 'naming'
+require_relative 'special_cases'
+
+module AUCoreTestKit
+  class Generator
+    class ReadTestGenerator
+      class << self
+        def generate(ig_metadata, base_output_dir)
+          ig_metadata.groups
+                     .reject { |group| SpecialCases.exclude_group? group }
+                     .select { |group| read_interaction(group).present? }
+                     .each { |group| new(group, base_output_dir).generate }
+        end
+
+        def read_interaction(group_metadata)
+          group_metadata.interactions.find { |interaction| interaction[:code] == 'read' }
+        end
+      end
+
+      attr_accessor :group_metadata, :base_output_dir
+
+      def initialize(group_metadata, base_output_dir)
+        self.group_metadata = group_metadata
+        self.base_output_dir = base_output_dir
+      end
+
+      def template
+        @template ||= File.read(File.join(__dir__, 'templates', 'read.rb.erb'))
+      end
+
+      def output
+        @output ||= ERB.new(template).result(binding)
+      end
+
+      def base_output_file_name
+        "#{class_name.underscore}.rb"
+      end
+
+      def output_file_directory
+        File.join(base_output_dir, profile_identifier)
+      end
+
+      def output_file_name
+        File.join(output_file_directory, base_output_file_name)
+      end
+
+      def read_interaction
+        self.class.read_interaction(group_metadata)
+      end
+
+      def profile_identifier
+        Naming.snake_case_for_profile(group_metadata)
+      end
+
+      def test_id
+        "au_core_#{group_metadata.reformatted_version}_#{profile_identifier}_read_test"
+      end
+
+      def class_name
+        "#{Naming.upper_camel_case_for_profile(group_metadata)}ReadTest"
+      end
+
+      def module_name
+        "AUCore#{group_metadata.reformatted_version.upcase}"
+      end
+
+      def resource_type
+        group_metadata.resource
+      end
+
+      def resource_collection_string
+        if group_metadata.delayed? && resource_type != 'Provenance'
+          "scratch.dig(:references, '#{resource_type}')"
+        else
+          'all_scratch_resources'
+        end
+      end
+
+      def conformance_expectation
+        read_interaction[:expectation]
+      end
+
+      def needs_location_id?
+        resource_type == 'Location'
+      end
+
+      def needs_organization_id?
+        resource_type == 'Organization'
+      end
+
+      def needs_practitioner_id?
+        resource_type == 'Practitioner'
+      end
+
+      def needs_practitioner_role_id?
+        resource_type == 'PractitionerRole'
+      end
+
+      def generate
+        FileUtils.mkdir_p(output_file_directory)
+        File.open(output_file_name, 'w') { |f| f.write(output) }
+
+        group_metadata.add_test(
+          id: test_id,
+          file_name: base_output_file_name
+        )
+      end
+    end
+  end
+end

data/lib/au_core_test_kit/generator/reference_resolution_test_generator.rb

@@ -0,0 +1,94 @@
+# frozen_string_literal: true
+
+require_relative 'naming'
+require_relative 'special_cases'
+
+module AUCoreTestKit
+  class Generator
+    class ReferenceResolutionTestGenerator
+      class << self
+        def generate(ig_metadata, base_output_dir)
+          ig_metadata.groups
+                     .reject { |group| SpecialCases.exclude_group? group }
+                     .each { |group| new(group, base_output_dir).generate }
+        end
+      end
+
+      attr_accessor :group_metadata, :base_output_dir
+
+      def initialize(group_metadata, base_output_dir)
+        self.group_metadata = group_metadata
+        self.base_output_dir = base_output_dir
+      end
+
+      def template
+        @template ||= File.read(File.join(__dir__, 'templates', 'reference_resolution.rb.erb'))
+      end
+
+      def output
+        @output ||= ERB.new(template).result(binding)
+      end
+
+      def base_output_file_name
+        "#{class_name.underscore}.rb"
+      end
+
+      def output_file_directory
+        File.join(base_output_dir, profile_identifier)
+      end
+
+      def output_file_name
+        File.join(output_file_directory, base_output_file_name)
+      end
+
+      def profile_identifier
+        Naming.snake_case_for_profile(group_metadata)
+      end
+
+      def test_id
+        "au_core_#{group_metadata.reformatted_version}_#{profile_identifier}_reference_resolution_test"
+      end
+
+      def class_name
+        "#{Naming.upper_camel_case_for_profile(group_metadata)}ReferenceResolutionTest"
+      end
+
+      def module_name
+        "AUCore#{group_metadata.reformatted_version.upcase}"
+      end
+
+      def resource_type
+        group_metadata.resource
+      end
+
+      def resource_collection_string
+        'scratch_resources[:all]'
+      end
+
+      def must_support_references
+        group_metadata.must_supports[:elements]
+                      .select { |element| element[:types]&.include?('Reference') }
+      end
+
+      def must_support_reference_list_string
+        must_support_references
+          .map { |element| "#{' ' * 8}* #{resource_type}.#{element[:path]}" }
+          .uniq
+          .sort
+          .join("\n")
+      end
+
+      def generate
+        return if must_support_references.empty?
+
+        FileUtils.mkdir_p(output_file_directory)
+        File.open(output_file_name, 'w') { |f| f.write(output) }
+
+        group_metadata.add_test(
+          id: test_id,
+          file_name: base_output_file_name
+        )
+      end
+    end
+  end
+end