ruby-oci8 1.0.2

data/test/test_all.rb

@@ -0,0 +1,43 @@
+require 'runit/testsuite'
+require 'runit/cui/testrunner'
+
+srcdir = File.dirname(__FILE__)
+
+# Low-level API
+require "#{srcdir}/test_oradate"
+require "#{srcdir}/test_oranumber"
+require "#{srcdir}/test_describe"
+require "#{srcdir}/test_bind_time"
+require "#{srcdir}/test_bind_raw"
+if $test_clob
+  require "#{srcdir}/test_clob"
+end
+
+# High-level API
+require "#{srcdir}/test_break"
+require "#{srcdir}/test_oci8"
+require "#{srcdir}/test_connstr"
+require "#{srcdir}/test_metadata"
+
+# Ruby/DBI
+begin
+  require 'dbi'
+  is_dbi_loaded = true
+rescue LoadError
+  is_dbi_loaded = false
+end
+if is_dbi_loaded
+  require "#{srcdir}/test_dbi"
+  if $test_clob
+    require "#{srcdir}/test_dbi_clob"
+  end
+end
+
+suite = RUNIT::TestSuite.new
+ObjectSpace.each_object(Class) { |klass|
+  if klass.ancestors.include?(RUNIT::TestCase)
+    suite.add_test(klass.suite)
+  end
+}
+#RUNIT::CUI::TestRunner.quiet_mode = true
+RUNIT::CUI::TestRunner.run(suite)

data/test/test_bind_raw.rb

@@ -0,0 +1,53 @@
+# Low-level API
+require 'oci8'
+require 'runit/testcase'
+require 'runit/cui/testrunner'
+require File.dirname(__FILE__) + '/config'
+
+class TestBindRaw < RUNIT::TestCase
+  CHECK_TARGET = [
+    ["0123456789:;<=>?", "303132333435363738393A3B3C3D3E3F"],
+    ["@ABCDEFGHIJKLMNO", "404142434445464748494A4B4C4D4E4F"],
+    ["PQRSTUVWXYZ[\\]^_", "505152535455565758595A5B5C5D5E5F"],
+    ["`abcdefghijklmno", "606162636465666768696A6B6C6D6E6F"],
+    ["pqrstuvwxyz{|}~", "707172737475767778797A7B7C7D7E"],
+  ]
+
+  def setup
+    @env, @svc, @stmt = setup_lowapi()
+  end
+
+  def test_set_raw
+    @stmt.prepare("BEGIN :hex := RAWTOHEX(:raw); END;")
+    raw_in = @stmt.bindByName(":raw", OCI_TYPECODE_RAW, 16)
+    hex_out = @stmt.bindByName(":hex", String, 32)
+    
+    CHECK_TARGET.each do |raw, hex|
+      raw_in.set(raw)
+      @stmt.execute(@svc)
+      assert_equal(hex, hex_out.get())
+    end
+  end
+
+  def test_get_raw
+    @stmt.prepare("BEGIN :raw := HEXTORAW(:hex); END;")
+    hex_in = @stmt.bindByName(":hex", String, 32)
+    raw_out = @stmt.bindByName(":raw", OCI_TYPECODE_RAW, 16)
+    
+    CHECK_TARGET.each do |raw, hex|
+      hex_in.set(hex)
+      @stmt.execute(@svc)
+      assert_equal(raw, raw_out.get())
+    end
+  end
+
+  def teardown
+    @stmt.free()
+    @svc.logoff()
+    @env.free()
+  end
+end
+
+if $0 == __FILE__
+  RUNIT::CUI::TestRunner.run(TestBindRaw.suite())
+end

data/test/test_bind_time.rb

@@ -0,0 +1,191 @@
+# Low-level API
+require 'oci8'
+require 'runit/testcase'
+require 'runit/cui/testrunner'
+require File.dirname(__FILE__) + '/config'
+
+class TestBindTime < RUNIT::TestCase
+
+  YEAR_CHECK_TARGET = [1971, 1989, 2002, 2037]
+  MON_CHECK_TARGET = [1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12]
+  DAY_CHECK_TARGET = [1, 10, 20, 31] # days of January.
+  HOUR_CHECK_TARGET = [0, 6, 12, 18, 23]
+  MIN_CHECK_TARGET = [0, 15, 30, 45, 59]
+  SEC_CHECK_TARGET = [0, 15, 30, 45, 59]
+
+  def setup
+    @env, @svc, @stmt = setup_lowapi()
+  end
+
+  def test_set_year
+    @stmt.prepare("BEGIN :year := TO_NUMBER(TO_CHAR(:time, 'SYYYY'), '9999'); END;")
+    time_in = @stmt.bindByName(":time", Time)
+    year_out = @stmt.bindByName(":year", Fixnum)
+    YEAR_CHECK_TARGET.each do |i|
+      # set year
+      time = Time.local(i, 1)
+      # check result via oracle.
+      time_in.set(time)
+      @stmt.execute(@svc)
+      assert_equal(i, year_out.get())
+    end
+  end
+
+  def test_get_year
+    @stmt.prepare("BEGIN :time := TO_DATE(TO_CHAR(:year, '0999'), 'SYYYY'); END;")
+    year_in = @stmt.bindByName(":year", Fixnum)
+    time_out = @stmt.bindByName(":time", Time)
+    YEAR_CHECK_TARGET.each do |i|
+      # set time via oracle.
+      year_in.set(i)
+      @stmt.execute(@svc)
+      # check Time#year
+      assert_equal(i, time_out.get.year)
+    end
+  end
+
+  def test_set_mon
+    @stmt.prepare("BEGIN :mon := TO_NUMBER(TO_CHAR(:time, 'MM'), '99'); END;")
+    time_in = @stmt.bindByName(":time", Time)
+    mon_out = @stmt.bindByName(":mon", Fixnum)
+    MON_CHECK_TARGET.each do |i|
+      # set mon
+      time = Time.local(2001, i)
+      # check result via oracle.
+      time_in.set(time)
+      @stmt.execute(@svc)
+      assert_equal(i, mon_out.get())
+    end
+  end
+
+  def test_get_mon
+    @stmt.prepare("BEGIN :time := TO_DATE(TO_CHAR(:mon, '99'), 'MM'); END;")
+    mon_in = @stmt.bindByName(":mon", Fixnum)
+    time_out = @stmt.bindByName(":time", Time)
+    MON_CHECK_TARGET.each do |i|
+      # set time via oracle.
+      mon_in.set(i)
+      @stmt.execute(@svc)
+      # check Time#mon
+      assert_equal(i, time_out.get.mon)
+    end
+  end
+
+  def test_set_day
+    @stmt.prepare("BEGIN :day := TO_NUMBER(TO_CHAR(:time, 'DD'), '99'); END;")
+    time_in = @stmt.bindByName(":time", Time)
+    day_out = @stmt.bindByName(":day", Fixnum)
+    DAY_CHECK_TARGET.each do |i|
+      # set day
+      time = Time.local(2001, 1, i)
+      # check result via oracle.
+      time_in.set(time)
+      @stmt.execute(@svc)
+      assert_equal(i, day_out.get())
+    end
+  end
+
+  def test_get_day
+    @stmt.prepare("BEGIN :time := TO_DATE('200101' || TO_CHAR(:day, 'FM00'), 'YYYYMMDD'); END;")
+    day_in = @stmt.bindByName(":day", Fixnum)
+    time_out = @stmt.bindByName(":time", Time)
+    DAY_CHECK_TARGET.each do |i|
+      # set time via oracle.
+      day_in.set(i)
+      @stmt.execute(@svc)
+      # check Time#day
+      assert_equal(i, time_out.get.day)
+    end
+  end
+
+  def test_set_hour
+    @stmt.prepare("BEGIN :hour := TO_NUMBER(TO_CHAR(:time, 'HH24'), '99'); END;")
+    time_in = @stmt.bindByName(":time", Time)
+    hour_out = @stmt.bindByName(":hour", Fixnum)
+    HOUR_CHECK_TARGET.each do |i|
+      # set hour
+      time = Time.local(2001, 1, 1, i)
+      # check result via oracle.
+      time_in.set(time)
+      @stmt.execute(@svc)
+      assert_equal(i, hour_out.get())
+    end
+  end
+
+  def test_get_hour
+    @stmt.prepare("BEGIN :time := TO_DATE(TO_CHAR(:hour, '99'), 'HH24'); END;")
+    hour_in = @stmt.bindByName(":hour", Fixnum)
+    time_out = @stmt.bindByName(":time", Time)
+    HOUR_CHECK_TARGET.each do |i|
+      # set time via oracle.
+      hour_in.set(i)
+      @stmt.execute(@svc)
+      # check Time#hour
+      assert_equal(i, time_out.get.hour)
+    end
+  end
+
+  def test_set_min
+    @stmt.prepare("BEGIN :min := TO_NUMBER(TO_CHAR(:time, 'MI'), '99'); END;")
+    time_in = @stmt.bindByName(":time", Time)
+    min_out = @stmt.bindByName(":min", Fixnum)
+    MIN_CHECK_TARGET.each do |i|
+      # set min
+      time = Time.local(2001, 1, 1, 0, i)
+      # check result via oracle.
+      time_in.set(time)
+      @stmt.execute(@svc)
+      assert_equal(i, min_out.get())
+    end
+  end
+
+  def test_get_min
+    @stmt.prepare("BEGIN :time := TO_DATE(TO_CHAR(:min, '99'), 'MI'); END;")
+    min_in = @stmt.bindByName(":min", Fixnum)
+    time_out = @stmt.bindByName(":time", Time)
+    MIN_CHECK_TARGET.each do |i|
+      # set time via oracle.
+      min_in.set(i)
+      @stmt.execute(@svc)
+      # check Time#min
+      assert_equal(i, time_out.get.min)
+    end
+  end
+
+  def test_set_sec
+    @stmt.prepare("BEGIN :sec := TO_NUMBER(TO_CHAR(:time, 'SS'), '99'); END;")
+    time_in = @stmt.bindByName(":time", Time)
+    sec_out = @stmt.bindByName(":sec", Fixnum)
+    SEC_CHECK_TARGET.each do |i|
+      # set sec
+      time = Time.local(2001, 1, 1, 0, 0, i)
+      # check result via oracle.
+      time_in.set(time)
+      @stmt.execute(@svc)
+      assert_equal(i, sec_out.get())
+    end
+  end
+
+  def test_get_sec
+    @stmt.prepare("BEGIN :time := TO_DATE(TO_CHAR(:sec, '99'), 'SS'); END;")
+    sec_in = @stmt.bindByName(":sec", Fixnum)
+    time_out = @stmt.bindByName(":time", Time)
+    SEC_CHECK_TARGET.each do |i|
+      # set time via oracle.
+      sec_in.set(i)
+      @stmt.execute(@svc)
+      # check Time#sec
+      assert_equal(i, time_out.get.sec)
+    end
+  end
+
+  def teardown
+    @stmt.free()
+    @svc.logoff()
+    @env.free()
+  end
+end
+
+if $0 == __FILE__
+  RUNIT::CUI::TestRunner.run(TestBindTime.suite())
+end

data/test/test_break.rb

@@ -0,0 +1,81 @@
+# High-level API
+require 'oci8'
+require 'runit/testcase'
+require 'runit/cui/testrunner'
+require File.dirname(__FILE__) + '/config'
+
+class TestBreak < RUNIT::TestCase
+
+  def report(str)
+    printf "%d: %s\n", (Time.now - $start_time), str
+  end
+  
+  PLSQL_DONE = 1
+  OCIBREAK = 2
+  SEND_BREAK = 3
+
+  TIME_IN_PLSQL = 3
+  TIME_TO_BREAK = 1
+  MARGIN = 0.1
+
+  def do_test_ocibreak(conn, expect)
+    $start_time = Time.now
+
+    th = Thread.start do 
+      begin
+	conn.exec("BEGIN DBMS_LOCK.SLEEP(#{TIME_IN_PLSQL}); END;")
+	assert_equal(expect[PLSQL_DONE], (Time.now - $start_time + MARGIN).to_i)
+      rescue OCIBreak
+	assert_equal(expect[OCIBREAK], (Time.now - $start_time + MARGIN).to_i)
+      end
+    end
+
+    sleep(TIME_TO_BREAK)
+    assert_equal(expect[SEND_BREAK], (Time.now - $start_time + MARGIN).to_i)
+    conn.break()
+    th.join
+  end
+
+  def test_set_blocking_mode
+    conn = get_oci_connection()
+    conn.non_blocking = true
+    assert_equal(true, conn.non_blocking?)
+    conn.non_blocking = false
+    assert_equal(false, conn.non_blocking?)
+    conn.non_blocking = true
+    assert_equal(true, conn.non_blocking?)
+    conn.logoff()
+  end
+
+  def test_blocking_mode
+    conn = get_oci_connection()
+    conn.non_blocking = false
+    expect = []
+    expect[PLSQL_DONE] = TIME_IN_PLSQL
+    expect[OCIBREAK]   = "Invalid status"
+    expect[SEND_BREAK] = TIME_IN_PLSQL + TIME_TO_BREAK
+    do_test_ocibreak(conn, expect)
+    conn.logoff()
+  end
+
+  def test_non_blocking_mode
+    conn = get_oci_connection()
+    conn.non_blocking = true
+    expect = []
+    expect[PLSQL_DONE] = "Invalid status"
+    if RUBY_PLATFORM =~ /mswin32|cygwin|mingw32|bccwin32/
+      # raise after sleeping #{TIME_IN_PLSQL} seconds.
+      expect[OCIBREAK] = TIME_IN_PLSQL
+    else
+      # raise immediately by OCI8#break.
+      expect[OCIBREAK] = TIME_TO_BREAK
+    end
+    expect[SEND_BREAK]   = TIME_TO_BREAK
+    do_test_ocibreak(conn, expect)
+    conn.logoff()
+  end
+end
+
+if $0 == __FILE__
+  RUNIT::CUI::TestRunner.run(TestBreak.suite())
+end

data/test/test_clob.rb

@@ -0,0 +1,101 @@
+# Low-level API
+require 'oci8'
+require 'runit/testcase'
+require 'runit/cui/testrunner'
+require File.dirname(__FILE__) + '/config'
+
+class TestCLob < RUNIT::TestCase
+
+  def setup
+    @env, @svc, @stmt = setup_lowapi()
+  end
+
+  def test_insert
+    filename = File.basename($lobfile)
+    @stmt.prepare("DELETE FROM test_clob WHERE filename = :1")
+    @stmt.bindByPos(1, String, filename.size).set(filename)
+    @stmt.execute(@svc)
+
+    @stmt.prepare("INSERT INTO test_clob(filename, content) VALUES (:1, EMPTY_CLOB())")
+    @stmt.bindByPos(1, String, filename.size).set(filename)
+    @stmt.execute(@svc)
+
+    lob = @env.alloc(OCILobLocator)
+    @stmt.prepare("SELECT content FROM test_clob WHERE filename = :1 FOR UPDATE")
+    @stmt.bindByPos(1, String, filename.size).set(filename)
+    @stmt.defineByPos(1, OCI_TYPECODE_CLOB, lob)
+    @stmt.execute(@svc, 1)
+    offset = 1 # count by charactor, not byte.
+    open($lobfile) do |f|
+      while f.gets()
+	num_of_chars = lob.write(@svc, offset, $_)
+	offset += num_of_chars
+      end
+    end
+    lob.free()
+  end
+
+  def test_insert_with_open_close
+    filename = File.basename($lobfile)
+    @stmt.prepare("DELETE FROM test_clob WHERE filename = :1")
+    @stmt.bindByPos(1, String, filename.size).set(filename)
+    @stmt.execute(@svc)
+
+    @stmt.prepare("INSERT INTO test_clob(filename, content) VALUES (:1, EMPTY_CLOB())")
+    @stmt.bindByPos(1, String, filename.size).set(filename)
+    @stmt.execute(@svc)
+
+    lob = @env.alloc(OCILobLocator)
+    @stmt.prepare("SELECT content FROM test_clob WHERE filename = :1 FOR UPDATE")
+    @stmt.bindByPos(1, String, filename.size).set(filename)
+    @stmt.defineByPos(1, OCI_TYPECODE_CLOB, lob)
+    @stmt.execute(@svc, 1)
+    lob.open(@svc)
+    begin
+      offset = 1 # count by charactor, not byte.
+      open($lobfile) do |f|
+	while f.gets()
+	  offset += lob.write(@svc, offset, $_)
+	end
+      end
+    ensure
+      lob.close(@svc)
+    end
+    lob.free()
+  end
+
+  def test_read
+    filename = File.basename($lobfile)
+    test_insert() # first insert data.
+    lob = @env.alloc(OCILobLocator)
+    @stmt.prepare("SELECT content FROM test_clob WHERE filename = :1 FOR UPDATE")
+    @stmt.bindByPos(1, String, filename.size).set(filename)
+    @stmt.defineByPos(1, OCI_TYPECODE_CLOB, lob)
+    @stmt.execute(@svc, 1)
+
+    open($lobfile) do |f|
+      offset = 1
+      while buf = lob.read(@svc, offset, $lobreadnum)
+	fbuf = f.read(buf.size)
+	assert_equal(fbuf, buf)
+	offset += $lobreadnum
+	# offset += buf.size will not work fine,
+	# Though buf.size counts in byte,
+	# offset and $lobreadnum count in character.
+      end
+      assert_equal(nil, buf)
+      assert_equal(true, f.eof?)
+    end
+    lob.free()
+  end
+
+  def teardown
+    @stmt.free()
+    @svc.logoff()
+    @env.free()
+  end
+end
+
+if $0 == __FILE__
+  RUNIT::CUI::TestRunner.run(TestCLob.suite())
+end