dcm_dict 0.29.0

data/spec/dcm_dict/dictionary/uid_dictionary_spec.rb

@@ -0,0 +1,82 @@
+#
+#  This file is part of DcmDict gem (dcm_dict).
+#
+#  DcmDict is free software: you can redistribute it and/or modify
+#  it under the terms of the GNU General Public License as published by
+#  the Free Software Foundation, either version 3 of the License, or
+#  (at your option) any later version.
+#
+#  DcmDict is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#
+#  You should have received a copy of the GNU General Public License
+#  along with DcmDict.  If not, see <http://www.gnu.org/licenses/>.
+#
+#  This software has neither been tested nor approved for clinical use
+#  or for incorporation in a medical device.
+#  It is the redistributor's or user's responsibility to comply with any
+#  applicable local, state, national or international regulations.
+#
+require 'spec_helper'
+
+describe DcmDict::Dictionary::UidDictionary do
+
+  include_examples "Map all source data",
+                   [:uid_value, :uid_name],
+                   DcmDict::SourceData::UidValuesData,
+                   DcmDict::Dictionary::TheUidDictionary,
+                   DcmDict::Dictionary::UidRecord,
+                   [:uid_value, :uid_name, :uid_type]
+
+  {
+    '1.2.3.4.5.6'                   => { :uid_value => '1.2.3.4.5.6',
+                                         :uid_name  => 'Unknown UID',
+                                         :uid_type  => :unknown },
+    '1.2.840.10008.5.1.4.1.1.12.77' => { :uid_value => '1.2.840.10008.5.1.4.1.1.12.77',
+                                         :uid_name  => '1.2.840.10008.5.1.4.1.1.12.77 (Retired)',
+                                         :uid_type  => :sop_class },
+    '1.2.840.10008.5.1.4.1.1.40'    => { :uid_value => '1.2.840.10008.5.1.4.1.1.40',
+                                         :uid_name  => '1.2.840.10008.5.1.4.1.1.40 (Retired)',
+                                         :uid_type  => :sop_class },
+    '1.2.840.10008.5.1.4.39.3'      => { :uid_value => '1.2.840.10008.5.1.4.39.3',
+                                         :uid_name  => 'Color Palette Query/Retrieve Information Model - MOVE',
+                                         :uid_type  => :sop_class },
+    '1.2.840.10008.5.1.4.34.6.5'    => { :uid_value => '1.2.840.10008.5.1.4.34.6.5',
+                                         :uid_name  => 'Unified Procedure Step - Query SOP Class',
+                                         :uid_type  => :sop_class },
+    '1.2.840.10008.1.2.4.70'        => { :uid_value => '1.2.840.10008.1.2.4.70',
+                                         :uid_name  => "JPEG Lossless, Non-Hierarchical, First-Order Prediction (Process 14 [Selection Value 1]): Default Transfer Syntax for Lossless JPEG Image Compression",
+                                         :uid_type  => :transfer_syntax},
+    '1.2.840.10008.1.2.4.60'        => { :uid_value => '1.2.840.10008.1.2.4.60',
+                                         :uid_name  => 'JPEG Extended, Hierarchical (Process 17 & 19) (Retired)',
+                                         :uid_type  => :transfer_syntax },
+    '1.2.840.10008.5.1.4.1.1.481.19'=> { :uid_value => '1.2.840.10008.5.1.4.1.1.481.19',
+                                         :uid_name  => "C-Arm Photon-Electron Radiation Record Storage",
+                                         :uid_type  => :sop_class},
+  }.each do |uid, data|
+    include_examples "Handle specific record", data[:uid_name],
+                     uid, data, DcmDict::Dictionary::TheUidDictionary
+  end
+
+  [
+    '1.2.abc.3.4', 'this string is not a valid uid', '1.2.3.04.5'
+  ].each do |uid|
+    include_examples "Dictionary with wrong key",
+                     uid, [:uid_value, :uid_name, :uid_type],
+                     DcmDict::Dictionary::TheUidDictionary
+  end
+
+  include_examples "Dictionary Data not modifiable",
+                   '1.2.840.10008.1.2', :uid_value, DcmDict::Dictionary::TheUidDictionary
+
+
+  include_examples "Concurrency support",
+                   '1.2.840.10008.1.2',
+                   DcmDict::Dictionary::TheUidDictionary,
+                   {uid_value: '1.2.840.10008.1.2',
+                    uid_name: "Implicit VR Little Endian: Default Transfer Syntax for DICOM",
+                    uid_type: :transfer_syntax}
+
+end

data/spec/dcm_dict/dictionary/uid_record_spec.rb

@@ -0,0 +1,53 @@
+#
+#  Copyright (C) 2014-2020  Enrico Rivarola
+#
+#  This file is part of DcmDict gem (dcm_dict).
+#
+#  DcmDict is free software: you can redistribute it and/or modify
+#  it under the terms of the GNU General Public License as published by
+#  the Free Software Foundation, either version 3 of the License, or
+#  (at your option) any later version.
+#
+#  DcmDict is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#
+#  You should have received a copy of the GNU General Public License
+#  along with DcmDict.  If not, see <http://www.gnu.org/licenses/>.
+#
+#  This software has neither been tested nor approved for clinical use
+#  or for incorporation in a medical device.
+#  It is the redistributor's or user's responsibility to comply with any
+#  applicable local, state, national or international regulations.
+#
+require 'spec_helper'
+
+describe DcmDict::Dictionary::UidRecord do
+  [
+    { uid_value: '1.2.840.10008.1.2',
+      uid_name: "Implicit VR Little Endian: Default Transfer Syntax for DICOM",
+      uid_type: :transfer_syntax }
+  ].each do |data|
+    it "Handle Data Element Data correctly" do
+      ur = DcmDict::Dictionary::UidRecord.new(data.dup)
+      expect(ur.uid_value).to eq(data[:uid_value])
+      expect(ur.uid).to eq(data[:uid_value])
+      expect(ur.uid_name).to eq(data[:uid_name])
+      expect(ur.uid_type).to eq(data[:uid_type])
+    end
+
+
+    include_examples "Record handle methods correctly",
+                     DcmDict::Dictionary::UidRecord.new(data),
+                     data
+
+    it "data should be not modifiable" do
+      uid = DcmDict::Dictionary::UidRecord.new(data.dup)
+      old_value = uid.uid_value.dup
+      expect{uid.uid_value << 'aaa'}.to raise_error(RuntimeError)
+      expect(uid.uid_value).to eq(old_value)
+    end
+
+  end
+end

data/spec/dcm_dict/encoder/data_to_code_spec.rb

@@ -0,0 +1,109 @@
+#
+#  Copyright (C) 2014-2020  Enrico Rivarola
+#
+#  This file is part of DcmDict gem (dcm_dict).
+#
+#  DcmDict is free software: you can redistribute it and/or modify
+#  it under the terms of the GNU General Public License as published by
+#  the Free Software Foundation, either version 3 of the License, or
+#  (at your option) any later version.
+#
+#  DcmDict is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#
+#  You should have received a copy of the GNU General Public License
+#  along with DcmDict.  If not, see <http://www.gnu.org/licenses/>.
+#
+#  This software has neither been tested nor approved for clinical use
+#  or for incorporation in a medical device.
+#  It is the redistributor's or user's responsibility to comply with any
+#  applicable local, state, national or international regulations.
+#
+require 'spec_helper'
+require 'xml_sample_spec_helper'
+
+describe DcmDict::Encoder::DataToCode do
+  describe "should print out data element with" do
+    it "data elements header code" do
+      header = DcmDict::Encoder::DataToCode.data_element_header
+      expected_header = <<END
+module DcmDict
+  module SourceData
+    DataElementsData = [
+END
+      expect(header).to eq(expected_header)
+    end
+
+    it "data elements footer code" do
+      footer = DcmDict::Encoder::DataToCode.data_element_footer
+      expected_footer=<<END
+    ]
+  end
+end
+END
+      expect(footer).to eq(expected_footer)
+    end
+
+    describe "data element data field" do
+      using DcmDict::Refine::Internal::ArrayRefineInternal
+
+      XmlSampleSpecHelper.xml_tag_single_set.each do |xml_string, data|
+        it "for data element sample as #{data[:tag_ps].inspect}" do
+          indent = 4
+          tag_ary_str = "[0x#{data[:tag_ary].tag_group_str},0x#{data[:tag_ary].tag_element_str}]"
+          src_text = "#{' '*indent}{ tag_ps: '#{data[:tag_ps]}', tag_name: \"#{data[:tag_name]}\", tag_key: '#{data[:tag_key]}', tag_vr: #{data[:tag_vr]}, tag_vm: #{data[:tag_vm]}, tag_str: '#{data[:tag_str]}', tag_sym: #{data[:tag_sym].inspect}, tag_ndm: '#{data[:tag_ndm]}', tag_ary: #{tag_ary_str}, tag_multiple: #{data[:tag_multiple].inspect}, tag_note: '#{data[:tag_note]}'},"
+          src_line = DcmDict::Encoder::DataToCode.data_element_data_to_code(data)
+          expect(src_line).to eq(src_text)
+          src_line = DcmDict::Encoder::DataToCode.data_element_data_to_code(data, indent)
+          expect(src_line).to eq(src_text)
+          indent = 6
+          src_line = DcmDict::Encoder::DataToCode.data_element_data_to_code(data, indent)
+          expect(src_line.start_with?("#{' '*indent}{")).to be true
+        end
+      end
+
+    end
+  end
+
+   describe "should print out uid with" do
+    it "uid header code" do
+      header = DcmDict::Encoder::DataToCode.uid_header
+      expected_header = <<END
+module DcmDict
+  module SourceData
+    UidValuesData = [
+END
+      expect(header).to eq(expected_header)
+    end
+
+    it "uid footer code" do
+      footer = DcmDict::Encoder::DataToCode.uid_footer
+      expected_footer=<<END
+    ]
+  end
+end
+END
+      expect(footer).to eq(expected_footer)
+    end
+
+    describe "uid data field" do
+      XmlSampleSpecHelper.xml_uid_set.each do |xml_string, data|
+      it "for uid sample as #{data[:uid_value].inspect}" do
+        indent = 4
+        src_text = "#{' '*indent}{ uid_value: '#{data[:uid_value]}', uid_name: \"#{data[:uid_name]}\", uid_type: #{data[:uid_type].inspect}},"
+        src_line = DcmDict::Encoder::DataToCode.uid_data_to_code(data)
+        expect(src_line).to eq(src_text)
+        src_line = DcmDict::Encoder::DataToCode.uid_data_to_code(data, indent)
+        expect(src_line).to eq(src_text)
+        indent = 6
+        src_line = DcmDict::Encoder::DataToCode.uid_data_to_code(data, indent)
+        expect(src_line.start_with?("#{' '*indent}{")).to be true
+      end
+      end
+    end
+
+  end
+
+end

data/spec/dcm_dict/ext/object_extension_spec.rb

@@ -0,0 +1,53 @@
+#
+#  Copyright (C) 2014-2020  Enrico Rivarola
+#
+#  This file is part of DcmDict gem (dcm_dict).
+#
+#  DcmDict is free software: you can redistribute it and/or modify
+#  it under the terms of the GNU General Public License as published by
+#  the Free Software Foundation, either version 3 of the License, or
+#  (at your option) any later version.
+#
+#  DcmDict is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#
+#  You should have received a copy of the GNU General Public License
+#  along with DcmDict.  If not, see <http://www.gnu.org/licenses/>.
+#
+#  This software has neither been tested nor approved for clinical use
+#  or for incorporation in a medical device.
+#  It is the redistributor's or user's responsibility to comply with any
+#  applicable local, state, national or international regulations.
+#
+require 'spec_helper'
+
+describe "Object extension" do
+
+  describe "should check object for nil or empty status" do
+    describe "for class with empty? method" do
+      it "as string object" do
+        expect("bla bla".nil_or_empty?).to be_falsy
+        expect("".nil_or_empty?).to be_truthy
+      end
+
+      it "as array object" do
+        expect([1, 2].nil_or_empty?).to be_falsy
+        expect([].nil_or_empty?).to be_truthy
+      end
+
+    end
+
+    describe "for class without empty? method" do
+      it "as fixnum object" do
+        expect(5.nil_or_empty?).to be_falsy
+      end
+
+      it "as nil object" do
+        expect(nil.nil_or_empty?).to be_truthy
+      end
+    end
+
+  end
+end

data/spec/dcm_dict/refine/array_refine_spec.rb

@@ -0,0 +1,60 @@
+#
+#  Copyright (C) 2014-2020  Enrico Rivarola
+#
+#  This file is part of DcmDict gem (dcm_dict).
+#
+#  DcmDict is free software: you can redistribute it and/or modify
+#  it under the terms of the GNU General Public License as published by
+#  the Free Software Foundation, either version 3 of the License, or
+#  (at your option) any later version.
+#
+#  DcmDict is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#
+#  You should have received a copy of the GNU General Public License
+#  along with DcmDict.  If not, see <http://www.gnu.org/licenses/>.
+#
+#  This software has neither been tested nor approved for clinical use
+#  or for incorporation in a medical device.
+#  It is the redistributor's or user's responsibility to comply with any
+#  applicable local, state, national or international regulations.
+#
+require 'spec_helper'
+
+describe "Array refinement" do
+  using DcmDict::Refine::ArrayRefine
+
+  describe "should permit access to single data element dictionary information" do
+
+    include_examples "refinement for standard tag",
+                     [[0x0010,0x1005], [0x0028,0x1200], [0x0014,0x3050]],
+                     Proc.new{|tag| tag}
+
+
+    multi_data = { [0x6046,0x0040] => {
+                     tag_name: "Overlay Type",
+                     tag_multiple: true,
+                     tag_keyword: "OverlayType",
+                     tag_key: "OverlayType",
+                     tag_vr: [:CS], tag_vm: ["1"],
+                     tag: [0x6046, 0x0040], tag_ary: [0x6046, 0x0040],
+                     tag_ps: "(60XX,0040)",
+                     tag_sym: :overlay_type,
+                     tag_ndm: "60460040",
+                     tag_str: "(6046,0040)",
+                     tag_group: 0x6046,
+                     tag_element: 0x0040 } }
+
+    include_examples "refinement for multiple tag",
+                     multi_data,
+                     Proc.new {|tag| tag}
+
+  end
+
+  include_examples "Raise exception for wrong input",
+                   [ [0,1,2,3], [-0x0010,-0x0010], [0x1ffff,0x0010], [0x1ffff,0x10010], [0x0010, 0x1ffff]],
+                   [],
+                   Proc.new {|tag| tag}
+end

data/spec/dcm_dict/refine/internal/array_refine_internal_spec.rb

@@ -0,0 +1,98 @@
+#
+#  Copyright (C) 2014-2020  Enrico Rivarola
+#
+#  This file is part of DcmDict gem (dcm_dict).
+#
+#  DcmDict is free software: you can redistribute it and/or modify
+#  it under the terms of the GNU General Public License as published by
+#  the Free Software Foundation, either version 3 of the License, or
+#  (at your option) any later version.
+#
+#  DcmDict is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#
+#  You should have received a copy of the GNU General Public License
+#  along with DcmDict.  If not, see <http://www.gnu.org/licenses/>.
+#
+#  This software has neither been tested nor approved for clinical use
+#  or for incorporation in a medical device.
+#  It is the redistributor's or user's responsibility to comply with any
+#  applicable local, state, national or international regulations.
+#
+require 'spec_helper'
+
+describe "Array Refinement" do
+
+  using DcmDict::Refine::Internal::ArrayRefineInternal
+  it "should implement tag_ary metod" do
+    expect([0x0010,0x0020].to_tag_ary).to eq([0x0010,0x0020])
+  end
+
+  describe "should extract group and element from 'array tag'" do
+    it "for correct object" do
+      expect([0x0010,0x0020].tag_group_num).to eq(0x0010)
+      expect([0x0010,0x0020].tag_element_num).to eq(0x0020)
+    end
+
+    describe "and for wrong array must be raise error" do
+      [
+        [0x0010],
+        [0x0010,0x0020,0x0030],
+        ['0010', '0020'],
+        [16.0, 0x0020],
+        [0x1ffff,0x10000],
+        [-1,-2]
+      ].each do |tag|
+        it "as #{tag.inspect}" do
+          expect{ tag.tag_group_num }.to raise_error(RuntimeError)
+          expect{ tag.tag_element_num }.to raise_error(RuntimeError)
+
+        end
+      end
+    end
+
+  end
+
+  describe "should convert group and element to hex string" do
+    {
+      [0xfffe,0xe0dd] => {group: 'FFFE', element: 'E0DD', tag_str: '(FFFE,E0DD)', tag_ndm: 'FFFEE0DD'},
+      [0x0010,0x0020] => {group: '0010', element: '0020', tag_str: '(0010,0020)', tag_ndm: '00100020'}
+    }.each do |tag, value|
+      it "for #{tag.inspect}" do
+        expect(tag.tag_group_str).to eq(value[:group])
+        expect(tag.tag_element_str).to eq(value[:element])
+        expect(tag.to_tag_str).to eq(value[:tag_str])
+        expect(tag.to_tag_ndm).to eq(value[:tag_ndm])
+      end
+    end
+  end
+
+  describe "should check for group-length tag" do
+    {
+      [0x0010, 0x0020] => false,
+      [0x0010, 0x0000] => true,
+      [0x0000, 0x0002] => false,
+      [0x0000, 0x0000] => true
+    }.each do |tag, value|
+      it "for #{tag.inspect}" do
+        expect(tag.group_length_tag?).to eq(value)
+      end
+    end
+  end
+
+  describe "should check for private-creator tag" do
+    {
+      [0x0010, 0x0010] => false,
+      [0x0011, 0x0010] => true,
+      [0x0011, 0x0110] => false,
+      [0x0028, 0x2468] => false
+    }.each do |tag, value|
+      it "for #{tag.inspect}" do
+        expect(tag.private_creator_tag?).to eq(value)
+      end
+    end
+  end
+
+end