carray 1.5.1 → 1.5.2

data/spec/Classes/CAField_spec.rb

@@ -0,0 +1,39 @@
+
+require 'carray'
+require "rspec-power_assert"
+
+describe "TestCArrayCAField " do
+
+  example "virtual_array" do
+    a = CArray.int(3,3)
+    b = a.field(0,CA_INT8)
+    r = b.parent
+    is_asserted_by { b.class == CAField }
+    is_asserted_by { true == b.virtual? }
+    is_asserted_by { a == r }
+  end
+
+  example "attributes" do
+    #
+    a = CArray.int16(3,3) { 0x1122 }
+    b = a.field(0, CA_INT8)
+    is_asserted_by { CA_INT8 == b.data_type }
+    is_asserted_by { [3, 3] == b.dim }
+  end
+
+  example "endian" do
+    #
+    a = CArray.int16(3,3) { 0x1122 }
+    b = CArray.int8(3,3) { 0x11 }
+    c = CArray.int8(3,3) { 0x22 }
+    if CArray.big_endian?
+      is_asserted_by { b == a.field(0, CA_INT8) }
+      is_asserted_by { c == a.field(1, CA_INT8) }
+    else
+      is_asserted_by { b == a.field(1, CA_INT8) }
+      is_asserted_by { c == a.field(0, CA_INT8) }
+    end
+  end
+
+
+end

data/spec/Classes/CAGrid_spec.rb

@@ -0,0 +1,75 @@
+
+require 'carray'
+require "rspec-power_assert"
+
+describe "TestCArrayCAGrid " do
+
+  example "virtual_array" do
+    a = CArray.int(3,3)
+    i = CArray.int(3).seq
+    b = a[i, 0..1]
+    r = b.parent
+    is_asserted_by { b.class == CAGrid }
+    is_asserted_by { true == b.virtual? }
+    is_asserted_by { a == r }
+  end
+
+  example "basic_features" do
+    # ---
+    a = CArray.int(3,3).seq
+    i = CA_INT([1,2,0])
+    is_asserted_by { CA_INT([[3,4,5],
+                         [6,7,8],
+                         [0,1,2]]) == a[i,nil] }
+    is_asserted_by { CA_INT([[1,2,0],
+                         [4,5,3],
+                         [7,8,6]]) == a[nil,i] }
+    is_asserted_by { CA_INT([[4,5,3],
+                         [7,8,6],
+                         [1,2,0]]) == a[i,i] }
+    # ---
+    a = CArray.int(3,3).seq
+    i = CA_INT([-1,-2,-3])
+    is_asserted_by { CA_INT([[6,7,8],
+                         [3,4,5],
+                         [0,1,2]]) == a[i,nil] }
+    is_asserted_by { CA_INT([[2,1,0],
+                         [5,4,3],
+                         [8,7,6]]) == a[nil,i] }
+    is_asserted_by { CA_INT([[8,7,6],
+                         [5,4,3],
+                         [2,1,0]]) == a[i,i] }
+  end
+
+  example "invalid_args" do
+    # ---
+    a = CArray.int(3,3).seq
+    i = CA_INT([0,1,2])
+    expect { a.grid(i) }.to raise_error(ArgumentError)
+
+    # ---
+    a = CArray.int(3,3).seq
+    i = CA_INT([0,1,2])
+    i[0] = UNDEF
+    is_asserted_by { CA_INT([[3, 4, 5], [6, 7, 8]]) == a.grid(i, nil) }
+
+    # ---
+    a = CArray.int(3,3).seq
+    i = CA_INT([])
+    is_asserted_by { CArray.int(0, 3) == a.grid(i, nil) }
+    is_asserted_by { CArray.int(3, 0) == a.grid(nil, i) }
+  end
+
+  example "out_of_index" do
+    # ---
+    a = CArray.int(3,3).seq
+    i1 = CA_INT([1,2,3])
+    i2 = CA_INT([-4,-3,-2])
+    expect { a[i1,nil] }.to raise_error(IndexError)
+    expect { a[nil,i1] }.to raise_error(IndexError)
+    expect { a[i2,nil] }.to raise_error(IndexError)
+    expect { a[nil,i2] }.to raise_error(IndexError)
+  end
+
+
+end

data/{test/test_CAMapping.rb → spec/Classes/CAMapping_spec.rb}

@@ -1,106 +1,105 @@
-$:.unshift("../lib", "..")
 
-require 'test/unit'
 require 'carray'
+require "rspec-power_assert"
 
-class TestCArrayCAMapping < Test::Unit::TestCase
+describe "TestCArrayCAMapping " do
 
-  def test_virtual_array
+  example "virtual_array" do
     a = CArray.int(3,3)
     idx = CArray.int(3,3).seq!
     b = a[idx]
     r = b.parent
-    assert_instance_of(CAMapping, b)
-    assert_equal(true, b.virtual?)
-    assert_equal(a, r)
+    is_asserted_by { b.class == CAMapping }
+    is_asserted_by { true == b.virtual? }
+    is_asserted_by { a == r }
   end
 
-  def test_basic_features
+  example "basic_features" do
     # ---
     a   = CArray.int(3,3).seq!
     idx = CArray.int(3,3) { 4 }
-    assert_equal(CA_INT([[4,4,4],
+    is_asserted_by { CA_INT([[4,4,4],
                          [4,4,4],
-                         [4,4,4]]), a[idx])
+                         [4,4,4]]) == a[idx] }
     # ---
     a   = CArray.int(3,3).seq!
     idx = CArray.int(3,3).seq!.reverse!
-    assert_equal(CA_INT([[8,7,6],
+    is_asserted_by { CA_INT([[8,7,6],
                          [5,4,3],
-                         [2,1,0]]), a[idx])
+                         [2,1,0]]) == a[idx] }
     a[idx].seq!
-    assert_equal(CA_INT([[8,7,6],
+    is_asserted_by { CA_INT([[8,7,6],
                          [5,4,3],
-                         [2,1,0]]), a)
+                         [2,1,0]]) == a }
   end
 
-  def test_invalid_args
+  example "invalid_args" do
     # ---
     a   = CArray.int(3,3).seq!
     idx = CArray.int(3,3) { 4 }
     idx[1,1] = UNDEF
-    assert_raise(ArgumentError) { a[idx] }
+    expect { a[idx] }.to raise_error(ArgumentError)
   end
 
-  def test_out_of_range
+  example "out_of_range" do
     # ---
     a = CArray.int(3,3).seq!
     idx = CArray.int(3,3) { 9 }
-    assert_raise(IndexError) { a[idx] }
+    expect { a[idx] }.to raise_error(IndexError)
 
     # ---
     a = CArray.int(3,3).seq!
     idx = CArray.int(3,3) { -1 }
-    assert_equal(CA_INT([[8,8,8],
+    is_asserted_by { CA_INT([[8,8,8],
                          [8,8,8],
-                         [8,8,8]]), a[idx])
+                         [8,8,8]]) == a[idx] }
   end
 
-  def test_mask
+  example "mask" do
     _ = UNDEF
     # ---
     a = CArray.int(3,3).seq!
     idx = CArray.int(3,3).seq!
     a[1,1] = UNDEF
-    assert_equal(CA_INT([[0,1,2],
+    is_asserted_by { CA_INT([[0,1,2],
                          [3,_,5],
-                         [6,7,8]]), a[idx])
+                         [6,7,8]]) == a[idx] }
     a[idx][1,1] = -1
-    assert_equal(CA_INT([[0,1,2],
+    is_asserted_by { CA_INT([[0,1,2],
                          [3,-1,5],
-                         [6,7,8]]), a)
+                         [6,7,8]]) == a }
   end
 
-  def test_fill
+  example "fill" do
     _ = UNDEF
     # ---
     a = CArray.int(3,3).seq!
     idx = CArray.int(3,3).seq!
     a[idx] = 9
-    assert_equal(CA_INT([[9,9,9],
+    is_asserted_by { CA_INT([[9,9,9],
                          [9,9,9],
-                         [9,9,9]]), a)
+                         [9,9,9]]) == a }
     a[idx] = UNDEF
-    assert_equal(CA_INT([[_,_,_],
+    is_asserted_by { CA_INT([[_,_,_],
                          [_,_,_],
-                         [_,_,_]]), a)
+                         [_,_,_]]) == a }
   end
 
-  def test_sync
+  example "sync" do
     # ---
     a   = CArray.int(3,3).seq!
     idx = CArray.int(3,3) { 4 }
     a[idx] = -1                     ### not recomended usage
-    assert_equal(CA_INT([[0,1,2],
+    is_asserted_by { CA_INT([[0,1,2],
                          [3,-1,5],
-                         [6,7,8]]), a)
+                         [6,7,8]]) == a }
     # ---
     a   = CArray.int(3,3).seq!
     idx = CArray.int(3,3) { 4 }
     a[idx].seq!                     ### not recomended usage
-    assert_equal(CA_INT([[0,1,2],
+    is_asserted_by { CA_INT([[0,1,2],
                          [3,8,5],
-                         [6,7,8]]), a)
+                         [6,7,8]]) == a }
   end
 
-end
+end

data/spec/Classes/CAObject_attribute_spec.rb

@@ -0,0 +1,33 @@
+
+require "carray"
+require "rspec-power_assert"
+
+describe "CArray#elements" do
+
+  example "should return element number of array" do
+    ca = CArray.int32(2,3,4)
+    is_asserted_by { ca.elements == 2*3*4 }
+    is_asserted_by { ca.length == 2*3*4 }
+    is_asserted_by { ca.size == 2*3*4 }
+  end
+
+end
+
+describe "CArray#data_type" do
+  
+  example "should return data type of array" do
+    ca = CArray.int32(2,3,4)
+    is_asserted_by { ca.data_type == CA_INT32 }
+  end
+
+end
+
+describe "CArray#dim" do
+
+  example "should return a array contains the shape of array" do
+    ca = CArray.int32(2,3,4)
+    is_asserted_by { ca.dim == [2,3,4] }
+  end
+
+end
+

data/spec/Classes/CAObject_spec.rb

@@ -0,0 +1,33 @@
+
+require "carray"
+require "rspec-power_assert"
+
+
+describe "CArray.new" do
+
+  example "should return a CA_INT type carray if CA_INT is specified as data_type" do
+    ca = CArray.new(CA_INT, [2,3,4])
+    is_asserted_by { ca.class == CArray }
+    is_asserted_by { ca.data_type == CA_INT }
+  end
+
+  example "should return a CA_FIXLEN type carray if CA_FIXLEN is specified as data_type" do
+    ca = CArray.new(CA_FIXLEN, [2,3,4], :bytes=>3)
+    is_asserted_by { ca.class == CArray }
+    is_asserted_by { ca.data_type == CA_FIXLEN }
+    is_asserted_by { ca.bytes == 3 }
+  end
+
+  example "should return a carray filled by 0 when data_type == CA_INT" do
+    ca = CArray.new(CA_INT, [2,3,4])
+    is_asserted_by { ca[0] == 0 }
+    is_asserted_by { ca.all_equal?(0) == true }
+  end
+
+  example "should return a carray filled by string filled by 0 when data_type == CA_FIXLEN" do
+    ca = CArray.new(CA_FIXLEN, [2,3,4], :bytes=>3)
+    is_asserted_by { ca[0] == "\0\0\0" }
+    is_asserted_by { ca.all_equal?("\0\0\0") == true }
+  end
+
+end

data/spec/Classes/CARefer_spec.rb

@@ -0,0 +1,93 @@
+
+require 'carray'
+require "rspec-power_assert"
+
+describe "TestCArrayCARefer " do
+
+  example "virtual_array" do
+    a = CArray.int(3,3)
+    b = a.refer(CA_INT,[9])
+    r = b.parent
+    is_asserted_by { b.class == CARefer }
+    is_asserted_by { true == b.virtual? }
+    is_asserted_by { a == r }
+  end
+
+  example "basic_features" do
+    # ---
+    a = CArray.int(3,2).seq!
+    r = a.reshape(2,3)
+    is_asserted_by { a.data_type == r.data_type }
+    is_asserted_by { [2, 3] == r.dim }
+    is_asserted_by { CA_INT([[0,1,2],
+                         [3,4,5]]) == r }
+
+    # ---
+    # less data number
+    a = CArray.int(3,2).seq!
+    r = a.reshape(2,2)
+    is_asserted_by { CA_INT([[0,1],
+                         [2,3]]) == r }
+
+    # ---
+    # data type change (int -> float)
+    a = CArray.int(3,2).seq!
+    r = a.refer(CA_FLOAT32, [2,3])
+    rr = r.refer(CA_INT32, [3,2])
+    is_asserted_by { CA_FLOAT == r.data_type }
+    is_asserted_by { a == rr }
+  end
+
+  example "refer_to_virtual_array" do
+    # ---
+    a = CArray.int(3,3).seq!
+    b = a[1..2,1..2]
+    r = b.reshape(4)
+    is_asserted_by { CA_INT([4, 5, 7, 8]) == r }
+
+    # ---
+    a = CArray.int(3).seq!
+    b = a[:%,3]
+    r = b.reshape(9)
+    is_asserted_by { CA_INT([0, 0, 0, 1, 1, 1, 2, 2, 2]) == r }
+
+  end
+
+  example "invalid_args" do
+    # ---
+    a = CArray.int8(3,3).seq!
+    expect { a.reshape(10) }.to raise_error(RuntimeError) ### too large data num
+    expect { a.refer(CA_INT,[9]) }.to raise_error(RuntimeError)
+                                                   ### larger data type bytes
+
+  end
+
+  example "flatten" do
+    a = CArray.int(3,3).seq!
+    b = CArray.int(9).seq!
+
+    # ---
+    is_asserted_by { b == a.flatten }
+    is_asserted_by { b == a.flattened }
+
+    # ---
+    c = a.reverse
+    a.flattened.reverse!
+    is_asserted_by { c == a }
+  end
+
+  example "refer_variant" do
+    a = CArray.fixlen(4, :bytes=>4) {"abcd"}
+    b = CA_FIXLEN([["ab", "cd"],
+                   ["ab", "cd"],
+                   ["ab", "cd"],
+                   ["ab", "cd"]], :bytes=>2)
+    c = CA_FIXLEN(["abcdabcd", "abcdabcd"], :bytes=>8)
+
+    # ---
+    is_asserted_by { b == a.refer(CA_FIXLEN, [4, 2], bytes: 2) }
+    is_asserted_by { c == a.refer(CA_FIXLEN, [2], bytes: 8) }
+
+  end
+
+end

data/spec/Classes/CARepeat_spec.rb

@@ -0,0 +1,65 @@
+
+require 'carray'
+require "rspec-power_assert"
+
+describe "TestCArrayCARepeat " do
+
+  example "virtual_array" do
+    a = CArray.int(3)
+    b = a[:%,3]
+    r = b.parent
+    is_asserted_by { b.class == CARepeat }
+    is_asserted_by { true == b.virtual? }
+    is_asserted_by { true == b.read_only? }
+    is_asserted_by { false == b.attached? }
+    is_asserted_by { a == r }
+  end
+
+  example "basic_feature" do
+    # ---
+    a = CArray.int(3).seq!
+    r1 = a[3,:%]
+    r2 = a[:%,3]
+    is_asserted_by { CA_INT([[0,1,2],
+                         [0,1,2],
+                         [0,1,2]]) == r1 }
+    is_asserted_by { CA_INT([[0,0,0],
+                         [1,1,1],
+                         [2,2,2]]) == r2 }
+    # ---
+    b = CArray.int(2,2).seq!
+    is_asserted_by { CA_INT([[[ 0, 1 ],
+                          [ 0, 1 ]],
+                         [[ 2, 3 ],
+                          [ 2, 3 ]]]) == b[:%,2,:%] }
+  end
+
+  example "store" do
+    a = CArray.int(3).seq!
+    r1 = a[3,:%]
+    expect { r1[1,1] = 1 }.to raise_error(RuntimeError)
+    expect { r1.seq! }.to raise_error(RuntimeError)    
+    r2 = a[:%,3]
+    expect { r1[1,1] = 1 }.to raise_error(RuntimeError)
+    expect { r1.seq! }.to raise_error(RuntimeError)    
+  end
+
+  example "mask_repeat" do
+    a = CArray.int(3).seq!
+    a[1] = UNDEF
+    r1 = a[3,:%]
+    x1 = r1.to_ca
+    is_asserted_by { 3 == r1.count_masked }
+    is_asserted_by { 3 == r1[nil, 1].count_masked }
+    is_asserted_by { 3 == x1.count_masked }
+    is_asserted_by { 3 == x1[nil, 1].count_masked }
+    
+    r2 = a[:%,3]
+    x2 = r2.to_ca
+    is_asserted_by { 3 == r2.count_masked }
+    is_asserted_by { 3 == r2[1, nil].count_masked }
+    is_asserted_by { 3 == x2.count_masked }
+    is_asserted_by { 3 == x2[1, nil].count_masked }
+  end
+
+end