ruby-oci8 2.0.4-x86-mingw32

data/test/test_bind_raw.rb

@@ -0,0 +1,46 @@
+# Low-level API
+require 'oci8'
+require 'test/unit'
+require File.dirname(__FILE__) + '/config'
+
+class TestBindRaw < Test::Unit::TestCase
+  CHECK_TARGET = [
+    ["0123456789:;<=>?", "303132333435363738393A3B3C3D3E3F"],
+    ["@ABCDEFGHIJKLMNO", "404142434445464748494A4B4C4D4E4F"],
+    ["PQRSTUVWXYZ[\\]^_", "505152535455565758595A5B5C5D5E5F"],
+    ["`abcdefghijklmno", "606162636465666768696A6B6C6D6E6F"],
+    ["pqrstuvwxyz{|}~", "707172737475767778797A7B7C7D7E"],
+  ]
+
+  def setup
+    @conn = get_oci8_connection()
+  end
+
+  def test_set_raw
+    cursor = @conn.parse("BEGIN :hex := RAWTOHEX(:raw); END;")
+    cursor.bind_param(:raw, nil, OCI8::RAW, 16)
+    cursor.bind_param(:hex, nil, String, 32)
+
+    CHECK_TARGET.each do |raw, hex|
+      cursor[:raw] = raw
+      cursor.exec
+      assert_equal(hex, cursor[:hex])
+    end
+  end
+
+  def test_get_raw
+    cursor = @conn.parse("BEGIN :raw := HEXTORAW(:hex); END;")
+    cursor.bind_param(:hex, nil, String, 32)
+    cursor.bind_param(:raw, nil, OCI8::RAW, 16)
+
+    CHECK_TARGET.each do |raw, hex|
+      cursor[:hex] = hex
+      cursor.exec
+      assert_equal(raw, cursor[:raw])
+    end
+  end
+
+  def teardown
+    @conn.logoff
+  end
+end

data/test/test_bind_time.rb

@@ -0,0 +1,178 @@
+require 'oci8'
+require 'test/unit'
+require File.dirname(__FILE__) + '/config'
+
+class TestBindTime < Test::Unit::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
+    @conn = get_oci8_connection
+  end
+
+  def test_set_year
+    cursor = @conn.parse("BEGIN :year := TO_NUMBER(TO_CHAR(:time, 'SYYYY'), '9999'); END;")
+    cursor.bind_param(:time, Time)
+    cursor.bind_param(:year, Fixnum)
+
+    YEAR_CHECK_TARGET.each do |i|
+      # set year
+      cursor[:time] = Time.local(i, 1)
+      # check result
+      cursor.exec
+      assert_equal(i, cursor[:year])
+    end
+  end
+
+  def test_get_year
+    cursor = @conn.parse("BEGIN :time := TO_DATE(TO_CHAR(:year, '0999'), 'SYYYY'); END;")
+    cursor.bind_param(:year, Fixnum)
+    cursor.bind_param(:time, Time)
+    YEAR_CHECK_TARGET.each do |i|
+      # set time via oracle.
+      cursor[:year] = i
+      cursor.exec
+      # check Time#year
+      assert_equal(i, cursor[:time].year)
+    end
+  end
+
+  def test_set_mon
+    cursor = @conn.parse("BEGIN :mon := TO_NUMBER(TO_CHAR(:time, 'MM'), '99'); END;")
+    cursor.bind_param(:time, Time)
+    cursor.bind_param(:mon, Fixnum)
+    MON_CHECK_TARGET.each do |i|
+      # set mon
+      cursor[:time] = Time.local(2001, i)
+      # check result via oracle.
+      cursor.exec
+      assert_equal(i, cursor[:mon])
+    end
+  end
+
+  def test_get_mon
+    cursor = @conn.parse("BEGIN :time := TO_DATE(TO_CHAR(:mon, '99'), 'MM'); END;")
+    cursor.bind_param(:mon, Fixnum)
+    cursor.bind_param(:time, Time)
+    MON_CHECK_TARGET.each do |i|
+      # set time via oracle.
+      cursor[:mon] = i;
+      cursor.exec
+      # check Time#mon
+      assert_equal(i, cursor[:time].mon)
+    end
+  end
+
+  def test_set_day
+    cursor = @conn.parse("BEGIN :day := TO_NUMBER(TO_CHAR(:time, 'DD'), '99'); END;")
+    cursor.bind_param(:time, Time)
+    cursor.bind_param(:day, Fixnum)
+    DAY_CHECK_TARGET.each do |i|
+      # set day
+      cursor[:time] = Time.local(2001, 1, i)
+      # check result via oracle.
+      cursor.exec
+      assert_equal(i, cursor[:day])
+    end
+  end
+
+  def test_get_day
+    cursor = @conn.parse("BEGIN :time := TO_DATE('200101' || TO_CHAR(:day, 'FM00'), 'YYYYMMDD'); END;")
+    day_in = cursor.bind_param(:day, Fixnum)
+    time_out = cursor.bind_param(:time, Time)
+    DAY_CHECK_TARGET.each do |i|
+      # set time via oracle.
+      cursor[:day] = i;
+      cursor.exec
+      # check Time#day
+      assert_equal(i, cursor[:time].day)
+    end
+  end
+
+  def test_set_hour
+    cursor = @conn.parse("BEGIN :hour := TO_NUMBER(TO_CHAR(:time, 'HH24'), '99'); END;")
+    cursor.bind_param(:time, Time)
+    cursor.bind_param(:hour, Fixnum)
+    HOUR_CHECK_TARGET.each do |i|
+      # set hour
+      cursor[:time] = Time.local(2001, 1, 1, i)
+      # check result via oracle.
+      cursor.exec
+      assert_equal(i, cursor[:hour])
+    end
+  end
+
+  def test_get_hour
+    cursor = @conn.parse("BEGIN :time := TO_DATE(TO_CHAR(:hour, '99'), 'HH24'); END;")
+    cursor.bind_param(:hour, Fixnum)
+    cursor.bind_param(:time, Time)
+    HOUR_CHECK_TARGET.each do |i|
+      # set time via oracle.
+      cursor[:hour] = i
+      cursor.exec
+      # check Time#hour
+      assert_equal(i, cursor[:time].hour)
+    end
+  end
+
+  def test_set_min
+    cursor = @conn.parse("BEGIN :min := TO_NUMBER(TO_CHAR(:time, 'MI'), '99'); END;")
+    cursor.bind_param(:time, Time)
+    cursor.bind_param(:min, Fixnum)
+    MIN_CHECK_TARGET.each do |i|
+      # set min
+      cursor[:time] = Time.local(2001, 1, 1, 0, i)
+      # check result via oracle.
+      cursor.exec
+      assert_equal(i, cursor[:min])
+    end
+  end
+
+  def test_get_min
+    cursor = @conn.parse("BEGIN :time := TO_DATE(TO_CHAR(:min, '99'), 'MI'); END;")
+    cursor.bind_param(:min, Fixnum)
+    cursor.bind_param(:time, Time)
+    MIN_CHECK_TARGET.each do |i|
+      # set time via oracle.
+      cursor[:min] = i;
+      cursor.exec
+      # check Time#min
+      assert_equal(i, cursor[:time].min)
+    end
+  end
+
+  def test_set_sec
+    cursor = @conn.parse("BEGIN :sec := TO_NUMBER(TO_CHAR(:time, 'SS'), '99'); END;")
+    cursor.bind_param(:time, Time)
+    cursor.bind_param(:sec, Fixnum)
+    SEC_CHECK_TARGET.each do |i|
+      # set sec
+      cursor[:time] = Time.local(2001, 1, 1, 0, 0, i)
+      # check result via oracle.
+      cursor.exec
+      assert_equal(i, cursor[:sec])
+    end
+  end
+
+  def test_get_sec
+    cursor = @conn.parse("BEGIN :time := TO_DATE(TO_CHAR(:sec, '99'), 'SS'); END;")
+    cursor.bind_param(:sec, Fixnum)
+    cursor.bind_param(:time, Time)
+    SEC_CHECK_TARGET.each do |i|
+      # set time via oracle.
+      cursor[:sec] = i
+      cursor.exec
+      # check Time#sec
+      assert_equal(i, cursor[:time].sec)
+    end
+  end
+
+  def teardown
+    @conn.logoff
+  end
+end

data/test/test_break.rb

@@ -0,0 +1,83 @@
+# High-level API
+require 'oci8'
+require 'test/unit'
+require File.dirname(__FILE__) + '/config'
+
+class TestBreak < Test::Unit::TestCase
+
+  def setup
+    @conn = get_oci8_connection
+  end
+
+  def teardown
+    @conn.logoff
+  end
+
+  def report(str)
+    printf "%d: %s\n", (Time.now - $start_time), str
+  end
+  
+  PLSQL_DONE = 1
+  OCIBREAK = 2
+  SEND_BREAK = 3
+
+  TIME_IN_PLSQL = 5
+  TIME_TO_BREAK = 2
+  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, 'PLSQL_DONE')
+      rescue OCIBreak
+	assert_equal(expect[OCIBREAK], (Time.now - $start_time + MARGIN).to_i, 'OCIBREAK')
+      end
+    end
+
+    sleep(0.01) # make a time to run DBMS_LOCK.SLEEP
+    sleep(TIME_TO_BREAK)
+    assert_equal(expect[SEND_BREAK], (Time.now - $start_time + MARGIN).to_i, 'SEND_BREAK')
+    conn.break()
+    th.join
+  end
+
+  def test_blocking_mode
+    @conn.non_blocking = false
+    assert_equal(false, @conn.non_blocking?)
+    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)
+  end
+
+  def test_non_blocking_mode
+    is_windows_server = false
+    @conn.exec('select banner from v$version') do |row|
+      is_windows_server = true if row[0].include? 'Windows'
+    end
+
+    @conn.non_blocking = true
+    assert_equal(true, @conn.non_blocking?)
+    expect = []
+    if is_windows_server
+      if $oracle_server_version >= OCI8::ORAVER_9_0
+        # raise after sleeping #{TIME_IN_PLSQL} seconds.
+        expect[PLSQL_DONE] = "Invalid status"
+        expect[OCIBREAK] = TIME_IN_PLSQL
+      else
+        expect[PLSQL_DONE] = TIME_IN_PLSQL
+        expect[OCIBREAK] = "Invalid status"
+      end
+    else
+      # raise immediately by OCI8#break.
+      expect[PLSQL_DONE] = "Invalid status"
+      expect[OCIBREAK] = TIME_TO_BREAK
+    end
+    expect[SEND_BREAK]   = TIME_TO_BREAK
+    do_test_ocibreak(@conn, expect)
+  end
+end

data/test/test_clob.rb

@@ -0,0 +1,79 @@
+# Low-level API
+require 'oci8'
+require 'test/unit'
+require File.dirname(__FILE__) + '/config'
+
+class TestCLob < Test::Unit::TestCase
+
+  def setup
+    @conn = get_oci8_connection
+  end
+
+  def test_insert
+    filename = File.basename($lobfile)
+    @conn.exec("DELETE FROM test_clob WHERE filename = :1", filename)
+    @conn.exec("INSERT INTO test_clob(filename, content) VALUES (:1, EMPTY_CLOB())", filename)
+    cursor = @conn.exec("SELECT content FROM test_clob WHERE filename = :1 FOR UPDATE", filename)
+    lob = cursor.fetch[0]
+    open($lobfile) do |f|
+      while f.gets()
+        lob.write($_)
+      end
+    end
+    lob.close
+  end
+
+  def test_insert_with_flush
+    filename = File.basename($lobfile)
+    @conn.exec("DELETE FROM test_clob WHERE filename = :1", filename)
+    @conn.exec("INSERT INTO test_clob(filename, content) VALUES (:1, EMPTY_CLOB())", filename)
+    cursor = @conn.exec("SELECT content FROM test_clob WHERE filename = :1 FOR UPDATE", filename)
+    lob = cursor.fetch[0]
+    lob.sync = false
+    open($lobfile) do |f|
+      while f.gets()
+        lob.write($_)
+      end
+    end
+    lob.flush
+    lob.close
+  end
+
+  def test_insert_symbol
+    filename = 'test_symbol'
+    value = :foo_bar
+    @conn.exec("DELETE FROM test_clob WHERE filename = :1", filename)
+    @conn.exec("INSERT INTO test_clob(filename, content) VALUES (:1, EMPTY_CLOB())", filename)
+    cursor = @conn.exec("SELECT content FROM test_clob WHERE filename = :1 FOR UPDATE", filename)
+    lob = cursor.fetch[0]
+    lob.write(value)
+    lob.rewind
+    assert_equal(value.to_s, lob.read);
+    lob.close
+  end
+
+  def test_read
+    test_insert() # first insert data.
+    filename = File.basename($lobfile)
+    cursor = @conn.exec("SELECT content FROM test_clob WHERE filename = :1 FOR UPDATE", filename)
+    lob = cursor.fetch[0]
+
+    open($lobfile) do |f|
+      while buf = lob.read($lobreadnum)
+        fbuf = f.read(buf.size)
+        assert_equal(fbuf, buf)
+        # 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(f.eof?)
+      assert(lob.eof?)
+    end
+    lob.close
+  end
+
+  def teardown
+    @conn.logoff
+  end
+end

data/test/test_connstr.rb

@@ -0,0 +1,81 @@
+require 'oci8'
+require 'test/unit'
+require File.dirname(__FILE__) + '/config'
+
+class TestConnStr < Test::Unit::TestCase
+  TEST_CASES =
+    [
+     # success cases:
+     #  [ 'connect_string', expected result as an array]
+     # error cases:
+     #  [ 'connect_string', ExceptionClass]
+     ["hr/hr@host/service_name", ["hr", "hr", "host/service_name", nil]],
+     ["sys/syspw@host/service_name   AS    SYSdba ", ["sys", "syspw", "host/service_name", :SYSDBA]],
+     ["sys/syspw@host:1521/service_name as sysdba", ["sys", "syspw", "host:1521/service_name", :SYSDBA]],
+     # error cases
+     ["service_name", ArgumentError],
+     ["", ArgumentError],
+     ["foo bar/baz", ArgumentError],
+     ["foo@bar/baz", ArgumentError],
+     # raise error in connecting but no error in parse_connect_string.
+     ["foo/bar as sysdbaaa", ["foo", "bar", nil, "sysdbaaa"]],
+
+     ##
+     ## following test cases are contributed by Shiwei Zhang.
+     ##
+     #"username/password"
+     ["username/password", ["username", "password", nil, nil]],
+     #"username/password@[//]host[:port][/service_name]"
+     ["username/password@host", ["username", "password", "host", nil]],
+     ["username/password@host/service_name", ["username", "password", "host/service_name", nil]],
+     ["username/password@host:1521", ["username", "password", "host:1521", nil]],
+     ["username/password@host:1521/service_name", ["username", "password", "host:1521/service_name", nil]],
+     ["username/password@//host", ["username", "password", "//host", nil]],
+     ["username/password@//host/service_name", ["username", "password", "//host/service_name", nil]],
+     ["username/password@//host:1521", ["username", "password", "//host:1521", nil]],
+     ["username/password@//host:1521/service_name", ["username", "password", "//host:1521/service_name", nil]],
+     #"username/password as{sysoper|sysdba}"
+     ["username/password as sysoper", ["username", "password", nil, :SYSOPER]],
+     ["username/password as sysdba", ["username", "password", nil, :SYSDBA]],
+     #"username/password@[//]host[:port][/service_name] as {sysoper|sysdba}"
+     ["username/password@host as sysoper", ["username", "password", "host", :SYSOPER]],
+     ["username/password@host as sysdba", ["username", "password", "host", :SYSDBA]],
+     ["username/password@host/service_name as sysoper", ["username", "password", "host/service_name", :SYSOPER]],
+     ["username/password@host/service_name as sysdba", ["username", "password", "host/service_name", :SYSDBA]],
+     ["username/password@host:1521 as sysoper", ["username", "password", "host:1521", :SYSOPER]],
+     ["username/password@host:1521 as sysdba", ["username", "password", "host:1521", :SYSDBA]],
+     ["username/password@host:1521/service_name as sysoper", ["username", "password", "host:1521/service_name", :SYSOPER]],
+     ["username/password@host:1521/service_name as sysdba", ["username", "password", "host:1521/service_name", :SYSDBA]],
+     ["username/password@//host as sysoper", ["username", "password", "//host", :SYSOPER]],
+     ["username/password@//host as sysdba", ["username", "password", "//host", :SYSDBA]],
+     ["username/password@//host/service_name as sysoper", ["username", "password", "//host/service_name", :SYSOPER]],
+     ["username/password@//host/service_name as sysdba", ["username", "password", "//host/service_name", :SYSDBA]],
+     ["username/password@//host:1521 as sysoper", ["username", "password", "//host:1521", :SYSOPER]],
+     ["username/password@//host:1521 as sysdba", ["username", "password", "//host:1521", :SYSDBA]],
+     ["username/password@//host:1521/service_name as sysoper", ["username", "password", "//host:1521/service_name", :SYSOPER]],
+     ["username/password@//host:1521/service_name as sysdba", ["username", "password", "//host:1521/service_name", :SYSDBA]],
+     ["/passwd@192.168.19.19:1521/orcl as sysdba", ["", "passwd", "192.168.19.19:1521/orcl", :SYSDBA]],
+     ["/", [nil, nil, nil, nil]],
+     ["/ as sysdba", [nil, nil, nil, :SYSDBA]],
+    ]
+
+  def test_connstr
+    obj = OCI8.allocate # create an uninitialized object.
+    TEST_CASES.each do |test_case|
+      case test_case[1]
+      when Array
+        # use instance_eval to call a private method parse_connect_string.
+        result = obj.instance_eval { parse_connect_string(test_case[0]) }
+        assert_equal(test_case[1], result, test_case[0])
+      when Class
+        assert_raises(test_case[1]) do
+          result = obj.instance_eval { parse_connect_string(test_case[0]) }
+        end
+      else
+        raise "unsupported testcase"
+      end
+    end
+  end
+end
+
+Test::Unit::AutoRunner.run() if $0 == __FILE__