ruby-oci8 2.0.4-x86-mingw32

data/test/README

@@ -0,0 +1,4 @@
+This directory includes test cases using RubyUnit.
+
+If RubyUnit is installed in your site, it is used to run test cases.
+If not installed, support files in this package are used.

data/test/config.rb

@@ -0,0 +1,109 @@
+# $dbuser must have permission to run DBMS_LOCK.SLEEP
+#   connect as sys
+#     GRANT EXECUTE ON dbms_lock TO ruby;
+$dbuser = "ruby"
+$dbpass = "oci8"
+$dbname = nil
+
+# test_clob.rb
+
+nls_lang = ENV['NLS_LANG']
+nls_lang = nls_lang.split('.')[1] unless nls_lang.nil?
+nls_lang = nls_lang.upcase unless nls_lang.nil?
+case nls_lang
+when 'JA16EUC'
+  $lobfile = File.dirname(__FILE__) + '/../doc/api.ja.rd' # EUC-JP file
+else
+  $lobfile = File.dirname(__FILE__) + '/../doc/api.en.rd' # ASCII file
+end
+$lobreadnum = 256 # counts in charactors
+
+# don't modify below.
+
+# $oracle_server_version: database compatible level of the Oracle server.
+# $oracle_client_version: Oracle client library version for which oci8 is compiled.
+# $oracle_version: lower value of $oracle_server_version and $oracle_client_version.
+conn = OCI8.new($dbuser, $dbpass, $dbname)
+begin
+  conn.exec('select value from database_compatible_level') do |row|
+    $oracle_server_version = OCI8::OracleVersion.new(row[0])
+  end
+rescue OCIError
+  raise if $!.code != 942 # ORA-00942: table or view does not exist
+  $oracle_server_version = OCI8::ORAVER_8_0
+end
+conn.logoff
+
+if $oracle_server_version < OCI8.oracle_client_version
+  $oracle_version = $oracle_server_version
+else
+  $oracle_version = OCI8.oracle_client_version
+end
+
+if $oracle_version < OCI8::ORAVER_8_1
+  $test_clob = false
+else
+  $test_clob = true
+end
+
+module Test
+  module Unit
+    class TestCase
+
+      def get_oci8_connection()
+        OCI8.new($dbuser, $dbpass, $dbname)
+      rescue OCIError
+        raise if $!.code != 12516 && $!.code != 12520
+        # sleep a few second and try again if
+        # the error code is ORA-12516 or ORA-12520.
+        #
+        # ORA-12516 - TNS:listener could not find available handler with
+        #             matching protocol stack
+        # ORA-12520 - TNS:listener could not find available handler for
+        #             requested type of server
+        #
+        # Thanks to Christopher Jones.
+        #
+        # Ref: The Underground PHP and Oracle Manual (page 175 in vesion 1.4)
+        #      http://www.oracle.com/technology/tech/php/pdf/underground-php-oracle-manual.pdf
+        #
+        sleep(5)
+        OCI8.new($dbuser, $dbpass, $dbname)
+      end
+
+      def get_dbi_connection()
+        DBI.connect("dbi:OCI8:#{$dbname}", $dbuser, $dbpass, 'AutoCommit' => false)
+      rescue DBI::DatabaseError
+        raise if $!.err != 12516 && $!.err != 12520
+        # same as get_oci8_connection()
+        sleep(5)
+        DBI.connect("dbi:OCI8:#{$dbname}", $dbuser, $dbpass, 'AutoCommit' => false)
+      end
+
+      def drop_table(table_name)
+        if $oracle_server_version < OCI8::ORAVER_10_1
+          # Oracle 8 - 9i
+          sql = "DROP TABLE #{table_name}"
+        else
+          # Oracle 10g -
+          sql = "DROP TABLE #{table_name} PURGE"
+        end
+
+        if defined? @conn
+          begin
+            @conn.exec(sql)
+          rescue OCIError
+            raise if $!.code != 942 # table or view does not exist
+          end
+        elsif instance_variable_get(:@dbh)
+          begin
+            @dbh.do(sql)
+          rescue DBI::DatabaseError
+            raise if $!.err != 942 # table or view does not exist
+          end
+        end
+      end # drop_table
+    end
+  end
+end
+

data/test/test_all.rb

@@ -0,0 +1,50 @@
+srcdir = File.dirname(__FILE__)
+
+require 'oci8'
+require 'test/unit'
+require "#{srcdir}/config"
+
+require "#{srcdir}/test_oradate"
+require "#{srcdir}/test_oranumber"
+require "#{srcdir}/test_bind_time"
+require "#{srcdir}/test_bind_raw"
+if $test_clob
+  require "#{srcdir}/test_clob"
+end
+
+require "#{srcdir}/test_break"
+require "#{srcdir}/test_oci8"
+require "#{srcdir}/test_datetime"
+require "#{srcdir}/test_connstr"
+require "#{srcdir}/test_metadata"
+require "#{srcdir}/test_array_dml"
+require "#{srcdir}/test_rowid"
+require "#{srcdir}/test_appinfo"
+require "#{srcdir}/test_oracle_version"
+
+if OCI8.respond_to? :encoding
+  require "#{srcdir}/test_encoding"
+end
+
+# Ruby/DBI
+begin
+  require 'dbi'
+rescue LoadError
+  begin
+    require 'rubygems'
+    require 'dbi'
+  rescue LoadError
+    dbi_not_found = true
+  end
+end
+unless dbi_not_found
+  require "#{srcdir}/test_dbi"
+  if $test_clob
+    require "#{srcdir}/test_dbi_clob"
+  end
+end
+
+#Test::Unit::AutoRunner.run(true, true)
+if defined? Test::Unit::AutoRunner
+  Test::Unit::AutoRunner.run()
+end

data/test/test_appinfo.rb

@@ -0,0 +1,63 @@
+require 'oci8'
+require 'test/unit'
+require File.dirname(__FILE__) + '/config'
+
+class TestAppInfo < Test::Unit::TestCase
+
+  def setup
+    @conn = get_oci8_connection
+  end
+
+  def test_set_client_identifier
+    # set client_id
+    client_id = "ruby-oci8:#{Process.pid()}"
+    @conn.client_identifier = client_id
+    assert_equal(client_id, @conn.select_one("SELECT SYS_CONTEXT('USERENV', 'CLIENT_IDENTIFIER') FROM DUAL")[0]);
+    # check the first character
+    assert_raise ArgumentError do
+      @conn.client_identifier = ':bad_identifier'
+    end
+
+    # clear client_id
+    @conn.client_identifier = nil
+    assert_nil(@conn.select_one("SELECT SYS_CONTEXT('USERENV', 'CLIENT_IDENTIFIER') FROM DUAL")[0]);
+  end
+
+  def test_set_module
+    # FIXME: check again after upgrading Oracle 9.2 to 9.2.0.4.
+    return if @conn.oracle_server_version < OCI8::ORAVER_10_1
+
+    # set module
+    @conn.module = 'ruby-oci8'
+    assert_equal('ruby-oci8', @conn.select_one("SELECT SYS_CONTEXT('USERENV', 'MODULE') FROM DUAL")[0]);
+    # clear module
+    @conn.module = nil
+    assert_nil(@conn.select_one("SELECT SYS_CONTEXT('USERENV', 'MODULE') FROM DUAL")[0]);
+  end
+
+  def test_set_action
+    # FIXME: check again after upgrading Oracle 9.2 to 9.2.0.4.
+    return if @conn.oracle_server_version < OCI8::ORAVER_10_1
+
+    # set action
+    @conn.action = 'test_set_action'
+    assert_equal('test_set_action', @conn.select_one("SELECT SYS_CONTEXT('USERENV', 'ACTION') FROM DUAL")[0]);
+    # clear action
+    @conn.action = nil
+    assert_nil(@conn.select_one("SELECT SYS_CONTEXT('USERENV', 'ACTION') FROM DUAL")[0]);
+  end
+
+  def test_set_client_info
+    # set client_info
+    client_info = "ruby-oci8:#{Process.pid()}"
+    @conn.client_info = client_info
+    assert_equal(client_info, @conn.select_one("SELECT SYS_CONTEXT('USERENV', 'CLIENT_INFO') FROM DUAL")[0]);
+    # clear client_info
+    @conn.client_info = nil
+    assert_nil(@conn.select_one("SELECT SYS_CONTEXT('USERENV', 'CLIENT_INFO') FROM DUAL")[0]);
+  end
+
+  def teardown
+    @conn.logoff
+  end
+end

data/test/test_array_dml.rb

@@ -0,0 +1,333 @@
+require 'oci8'
+require 'test/unit'
+require File.dirname(__FILE__) + '/config'
+
+class TestArrayDML < Test::Unit::TestCase
+  def setup
+    @conn = get_oci8_connection
+  end
+
+  def teardown
+    @conn.logoff
+  end
+
+  # test inserting arrays with different data types
+  #   including char, varchar2, number, date and so on
+  def test_array_insert1
+    drop_table('test_table')
+    sql = <<-EOS
+CREATE TABLE test_table
+  (C CHAR(10) NOT NULL,
+   V VARCHAR2(20),
+   N NUMBER(10, 2),
+   D DATE,
+   INT NUMBER(30), 
+   BIGNUM NUMBER(30),
+   T TIMESTAMP)
+STORAGE (
+   INITIAL 4k
+   NEXT 4k
+   MINEXTENTS 1
+   MAXEXTENTS UNLIMITED
+   PCTINCREASE 0)
+EOS
+    @conn.exec(sql)
+    cursor = @conn.parse("INSERT INTO test_table VALUES (:C, :V, :N, :D, :INT, :BIGNUM, :T)")
+    max_array_size = 3
+    cursor.max_array_size= max_array_size
+    
+    cursor.bind_param_array(1, nil, String)
+    cursor.bind_param_array(2, nil ,String)
+    cursor.bind_param_array(3, nil, Fixnum)
+    cursor.bind_param_array(4, nil, OraDate)
+    cursor.bind_param_array(5, nil, Integer)
+    cursor.bind_param_array(6, nil, Bignum)
+    cursor.bind_param_array(7, nil, DateTime)
+
+    c_arr = Array.new
+    v_arr = Array.new
+    n_arr = Array.new
+    d_arr = Array.new
+    int_arr = Array.new
+    bignum_arr = Array.new
+    t_arr = Array.new
+    
+    1.upto(30) do |i|
+      c_arr << format("%10d", i * 10)
+      v_arr << i.to_s
+      n_arr << i
+      d_arr <<  OraDate.new(2000 + i, 12, 24, 23, 59, 59)
+      int_arr << i * 11111111111
+      bignum_arr << i * 10000000000
+      t_arr <<  DateTime.new(2000 + i, 12, 24, 23, 59, 59)
+      
+      if i%max_array_size == 0
+        cursor[1] = c_arr
+        cursor[2] = v_arr
+        cursor[3] = n_arr
+        cursor[4] = d_arr
+        cursor[5] = int_arr
+        cursor[6] = bignum_arr
+        cursor[7] = t_arr
+        
+        r = cursor.exec_array
+        assert_equal(max_array_size, r)
+        assert_equal(c_arr, cursor[1])
+        assert_equal(v_arr, cursor[2])
+        assert_equal(n_arr, cursor[3])
+        assert_equal(d_arr, cursor[4])
+        assert_equal(int_arr, cursor[5])
+        assert_equal(bignum_arr, cursor[6])
+        assert_equal(t_arr, cursor[7])
+        c_arr.clear
+        v_arr.clear
+        n_arr.clear
+        d_arr.clear
+        int_arr.clear
+        bignum_arr.clear
+        t_arr.clear
+      end
+    end
+    cursor.close
+    
+    cursor = @conn.parse("SELECT * FROM test_table ORDER BY c")
+    cursor.define(5, Integer)
+    cursor.define(6, Bignum)
+    cursor.exec
+    assert_equal(["C","V","N","D","INT","BIGNUM","T"], cursor.get_col_names)
+    1.upto(30) do |i|
+      rv = cursor.fetch
+      assert_equal(format("%10d", i * 10), rv[0])
+      assert_equal(i.to_s, rv[1])
+      assert_equal(i, rv[2])
+      tm = Time.local(2000 + i, 12, 24, 23, 59, 59)
+      assert_equal(tm, rv[3])
+      assert_equal(i * 11111111111, rv[4])
+      assert_equal(i * 10000000000, rv[5])
+      assert_equal(tm, rv[6])
+    end
+    assert_nil(cursor.fetch)
+    drop_table('test_table')
+  end
+
+  # Raise error when binding arrays are not the same size
+  def test_array_insert2
+    drop_table('test_table')
+    sql = <<-EOS
+CREATE TABLE test_table
+  (N NUMBER(10, 2) NOT NULL,
+   V VARCHAR(20))
+EOS
+    @conn.exec(sql)
+    cursor = @conn.parse("INSERT INTO test_table VALUES (:N, :V)")
+    max_array_size = 10
+    cursor.max_array_size = max_array_size
+    cursor.bind_param_array(1, nil, Fixnum)
+    cursor.bind_param_array(2, nil, String)
+    n_arr = Array.new
+    v_arr = Array.new
+    1.upto(max_array_size) do |i|
+      n_arr << i
+      v_arr << i.to_s if i != max_array_size
+    end
+    cursor[1] = n_arr
+    assert_raise(RuntimeError) { cursor[2] = v_arr }
+    cursor.close
+    
+    drop_table('test_table')
+  end  
+
+  # All binds are clear from cursor after calling "max_array_size=", 
+  #  in that case, you have to re-bind the array parameters 
+  #  otherwise, an error will be raised.
+  def test_array_insert3
+    drop_table('test_table')
+    sql = <<-EOS
+CREATE TABLE test_table
+  (N NUMBER(10, 2) NOT NULL,
+   V VARCHAR(20),
+   T TIMESTAMP)
+EOS
+    @conn.exec(sql)
+    cursor = @conn.parse("INSERT INTO test_table VALUES (:N, :V, :T)")
+    cursor.max_array_size = 3
+    cursor.bind_param_array(1, [1, 2, 3])
+    cursor.bind_param_array(2, ['happy', 'new', 'year'])
+    cursor.bind_param_array(3, [Time.gm(1990,1,1), Time.gm(2000,1,1), Time.gm(2010,1,1)])
+    assert_nothing_raised() { cursor.exec_array }
+    cursor.max_array_size = 2
+    assert_raise(RuntimeError) { cursor.exec_array }
+    drop_table('test_table')
+  end
+
+  # The size of binding arrays are not required to be same as max_array_size. The 
+  #   only requirement is that they should be the same size, and the size will be 
+  #   used as execution count for OCIStmtExecute.
+  def test_array_insert4
+    drop_table('test_table')
+    sql = <<-EOS
+CREATE TABLE test_table
+  (N NUMBER(10, 2) NOT NULL,
+   V VARCHAR(20))
+EOS
+    @conn.exec(sql)
+    cursor = @conn.parse("INSERT INTO test_table VALUES (:N, :V)")
+    max_array_size = 4
+    cursor.max_array_size = max_array_size
+    cursor.bind_param_array(1, nil, Fixnum)
+    cursor.bind_param_array(2, nil, String)
+    n_arr = Array.new
+    v_arr = Array.new
+    1.upto( max_array_size - 1 ) do |i|
+      n_arr << i
+      v_arr << i.to_s
+    end
+    cursor[1] = n_arr
+    cursor[2] = v_arr
+    assert_nothing_raised() { cursor.exec_array }
+    cursor.close
+
+    cursor = @conn.parse("SELECT * FROM test_table ORDER BY N")
+    cursor.exec
+    1.upto( max_array_size - 1 ) do |i|
+      rv = cursor.fetch
+      assert_equal(i, rv[0])
+      assert_equal(i.to_s, rv[1])
+    end  
+    assert_nil(cursor.fetch)
+    cursor.close
+    drop_table('test_table')    
+  end
+
+  # Inserting "nil" elements with array dml raises an error
+  def test_array_insert5
+    drop_table('test_table')
+    sql = <<-EOS
+CREATE TABLE test_table
+  (N NUMBER(10, 2),
+   V VARCHAR(20))
+EOS
+    @conn.exec(sql)
+    cursor = @conn.parse("INSERT INTO test_table VALUES (:N, :V)")
+    max_array_size = 3
+    cursor.max_array_size = max_array_size
+    cursor.bind_param_array(1, nil, Fixnum)
+    cursor.bind_param_array(2, nil, String)
+    assert_raise(RuntimeError) { cursor.exec_array }
+    cursor.close
+    drop_table('test_table')
+  end
+
+  # delete with array bindings
+  def test_array_delete
+    drop_table('test_table')
+    sql = <<-EOS
+CREATE TABLE test_table
+  (N NUMBER(10, 2),
+   V VARCHAR(20))
+EOS
+    @conn.exec(sql)    
+    cursor = @conn.parse("INSERT INTO test_table VALUES (:N, :V)")
+    max_array_size = 10
+    cursor.max_array_size = max_array_size
+    n_arr = Array.new
+    v_arr = Array.new
+    1.upto( max_array_size) do |i|
+      n_arr << i
+      v_arr << i.to_s
+    end    
+    cursor.bind_param_array(1, nil, Fixnum)
+    cursor.bind_param_array(2, nil, String)
+    cursor[1] = n_arr
+    cursor[2] = v_arr
+    cursor.exec_array
+    cursor.close
+
+    cursor = @conn.parse("DELETE FROM test_table WHERE N=:1")
+    cursor.max_array_size = max_array_size
+    delete_arr = Array.new
+    1.upto(max_array_size) do |i|
+      if i%2 == 0
+        delete_arr << i
+      end  
+    end
+    cursor.bind_param_array(1, nil, Fixnum)
+    cursor[1] = delete_arr
+    cursor.exec_array
+    cursor.close
+    
+    cursor = @conn.parse("SELECT * FROM test_table ORDER BY N")
+    cursor.exec
+    1.upto( max_array_size ) do |i|
+      if i%2 != 0
+        rv = cursor.fetch
+        assert_equal(rv[0], i)
+        assert_equal(rv[1], i.to_s)
+      end
+    end  
+    assert_nil(cursor.fetch)    
+    cursor.close
+    
+    drop_table('test_table')
+  end
+
+  # update with array bindings
+  def test_array_update
+    drop_table('test_table')
+    sql = <<-EOS
+CREATE TABLE test_table
+  (N NUMBER(10, 2),
+   V VARCHAR(20))
+EOS
+    @conn.exec(sql)    
+    cursor = @conn.parse("INSERT INTO test_table VALUES (:N, :V)")
+    max_array_size = 10
+    cursor.max_array_size = max_array_size
+    n_arr = Array.new
+    v_arr = Array.new
+    1.upto( max_array_size) do |i|
+      n_arr << i
+      v_arr << i.to_s
+    end    
+    cursor.bind_param_array(1, nil, Fixnum)
+    cursor.bind_param_array(2, nil, String)
+    cursor[1] = n_arr
+    cursor[2] = v_arr
+    cursor.exec_array
+    cursor.close
+
+    cursor = @conn.parse("UPDATE test_table SET V=:1 WHERE N=:2")
+    cursor.max_array_size = max_array_size
+    update_arr = Array.new
+    update_v_arr = Array.new
+    1.upto(max_array_size) do |i|
+      if i%2 == 0
+        update_arr << i
+        update_v_arr << (i * 10).to_s
+      end  
+    end
+    cursor.bind_param_array(1, nil, String)
+    cursor.bind_param_array(2, nil, Fixnum)
+    cursor[1] = update_v_arr
+    cursor[2] = update_arr
+    cursor.exec_array
+    cursor.close
+    
+    cursor = @conn.parse("SELECT * FROM test_table ORDER BY N")
+    cursor.exec
+    1.upto( max_array_size ) do |i|
+      rv = cursor.fetch      
+      if i%2 != 0
+        assert_equal(rv[0], i)
+        assert_equal(rv[1], i.to_s)
+      else
+        assert_equal(rv[0], i)
+        assert_equal(rv[1], (i * 10).to_s)
+      end
+    end  
+    assert_nil(cursor.fetch)    
+
+    cursor.close
+    drop_table('test_table')
+  end
+end