do_oracle 0.10.1-x86-mingw32

data/ext/do_oracle/extconf.rb

@@ -0,0 +1,36 @@
+ENV["RC_ARCHS"] = "" if RUBY_PLATFORM =~ /darwin/
+
+# Loads mkmf which is used to make makefiles for Ruby extensions
+require 'mkmf'
+
+# need to check dynamically for libraries and include files directories
+def config_value(type)
+  case type
+  when 'libdir'
+    '/usr/local/oracle/instantclient_10_2'
+  when 'includedir'
+    '/usr/local/oracle/instantclient_10_2/sdk/include'
+  end
+end
+
+def have_build_env
+  # have_library('occi') &&
+  # have_library('clntsh') &&
+  # have_header('oci.h')
+  true
+end
+
+# dir_config('oracle-client', config_value('includedir'), config_value('libdir'))
+
+if have_build_env
+
+  $CFLAGS << ' -Wall ' unless RUBY_PLATFORM =~ /mswin/
+  if RUBY_VERSION < '1.8.6'
+    $CFLAGS << ' -DRUBY_LESS_THAN_186'
+  end
+
+  create_makefile("do_oracle/do_oracle")
+else
+  puts 'Could not find Oracle build environment (libraries & headers): Makefile not created'
+  exit(1)
+end

data/lib/do_oracle.rb

@@ -0,0 +1,133 @@
+require 'data_objects'
+if RUBY_PLATFORM =~ /java/
+  require 'do_jdbc'
+  require 'java'
+
+else # MRI and Ruby 1.9
+  require 'oci8'
+end
+
+begin
+  require 'do_oracle/do_oracle'
+rescue LoadError
+  if RUBY_PLATFORM =~ /mingw|mswin/ then
+    RUBY_VERSION =~ /(\d+.\d+)/
+    require "do_oracle/#{$1}/do_oracle"
+  else
+    raise
+  end
+end
+
+require 'do_oracle/version'
+
+if RUBY_PLATFORM =~ /java/
+  # Oracle JDBC driver (ojdbc14.jar or ojdbc5.jar) file should be in JRUBY_HOME/lib or should be in Java class path
+  # Register Oracle JDBC driver
+  begin
+    java.sql.DriverManager.registerDriver Java::oracle.jdbc.OracleDriver.new
+  rescue NameError => e
+    raise ConnectionError, "Cannot load Oracle JDBC driver, put it (ojdbc14.jar or ojdbc5.jar) in JRUBY_HOME/lib or in the java extension directory or include in Java class path or call jruby with the option -J-Djava.ext.dirs=/path/to/directory/with/oracle/jars"
+  end
+  # JDBC driver has transactions implementation in Java
+
+else # MRI and Ruby 1.9
+  require 'do_oracle/transaction'
+end
+
+if RUBY_PLATFORM !~ /java/
+  module DataObjects
+    module Oracle
+      class Command
+        private
+
+        def execute(*args)
+          oci8_conn = @connection.instance_variable_get("@connection")
+          raise ConnectionError, "This connection has already been closed." unless oci8_conn
+
+          sql, bind_variables = replace_argument_placeholders(@text, args)
+          execute_internal(oci8_conn, sql, bind_variables)
+        rescue OCIError => e
+          raise SQLError.new(e.message, e.code, nil, e.sql, @connection.to_s)
+        end
+
+        # Replace ? placeholders with :n argument placeholders in string of SQL
+        # as required by OCI8#exec method
+        # Compare number of ? placeholders with number of passed arguments
+        # and raise exception if different
+        def replace_argument_placeholders(sql_string, args)
+          sql = sql_string.dup
+          args_count = args.length
+          bind_variables = []
+
+          replacements = 0
+          mismatch     = false
+
+          sql.gsub!(/'[^']*'|"[^"]*"|(IS |IS NOT )?\?/) do |x|
+            next x unless x =~ /\?$/
+            arg = args[replacements]
+            replacements += 1
+            case arg
+            when Array
+              i = 0
+              "(" << arg.map do |a|
+                bind_variables << a
+                i += 1
+                ":a#{replacements}_#{i}"
+              end.join(", ") << ")"
+            when Range
+              bind_variables << arg.first << arg.last
+              ":r#{replacements}_1 AND :r#{replacements}_2"
+            when Regexp
+              regexp_options = arg.options & Regexp::IGNORECASE > 0 ? "i" : ""
+              regexp_options << "m" if arg.options & Regexp::MULTILINE > 0
+              bind_variables << arg.source << regexp_options
+              ":re#{replacements}_1, :re#{replacements}_2"
+            when NilClass
+              # if "IS ?" or "IS NOT ?" then replace with NULL
+              if $1
+                "#{$1}NULL"
+              # otherwise pass as bind variable
+              else
+                bind_variables << arg
+                ":#{replacements}"
+              end
+            else
+              bind_variables << arg
+              ":#{replacements}"
+            end
+          end
+
+          if sql =~ /^\s*INSERT.+RETURNING.+INTO :insert_id\s*$/i
+            @insert_id_present = true
+          end
+
+          if args_count != replacements
+            raise ArgumentError, "Binding mismatch: #{args_count} for #{replacements}"
+          else
+            [sql, bind_variables]
+          end
+
+        end
+      end
+
+      class Connection
+        def self.oci8_new(user, password, connect_string)
+          OCI8.new(user, password, connect_string)
+        rescue OCIError => e
+          raise ConnectionError.new(e.message, e.code, nil, nil, @connection.to_s)
+        end
+
+        # Quote true, false as 1 and 0
+        def quote_boolean(value)
+          value ? 1 : 0
+        end
+
+        # for getting Ruby current time zone in C extension
+        def self.ruby_time_zone
+          ENV['TZ']
+        end
+      end
+
+    end
+  end
+end

data/lib/do_oracle/transaction.rb

@@ -0,0 +1,36 @@
+module DataObjects
+
+  module Oracle
+
+    class Transaction < DataObjects::Transaction
+
+      def begin
+        connection.instance_variable_get("@connection").autocommit = false
+      end
+
+      def commit
+        connection.instance_variable_get("@connection").commit
+      ensure
+        connection.instance_variable_get("@connection").autocommit = true
+      end
+
+      def rollback
+        connection.instance_variable_get("@connection").rollback
+      ensure
+        connection.instance_variable_get("@connection").autocommit = true
+      end
+
+      def rollback_prepared
+        # TODO: what should be done differently?
+        rollback
+      end
+
+      def prepare
+        # TODO: what should be done here?
+      end
+
+    end
+
+  end
+
+end

data/lib/do_oracle/version.rb

@@ -0,0 +1,5 @@
+module DataObjects
+  module Oracle
+    VERSION = '0.10.1'.freeze
+  end
+end

data/spec/command_spec.rb

@@ -0,0 +1,53 @@
+# encoding: utf-8
+
+require File.expand_path(File.join(File.dirname(__FILE__), 'spec_helper'))
+require 'data_objects/spec/command_spec'
+
+describe DataObjects::Oracle::Command do
+  behaves_like 'a Command'
+
+  if JRUBY
+    behaves_like 'a Command with async'
+  else
+    describe 'running queries in parallel' do
+
+      before do
+
+        threads = []
+        connections = []
+        4.times do |i|
+          # by default connection is not non_blocking, need to pass parameter
+          connections[i] = DataObjects::Connection.new(CONFIG.uri+"?non_blocking=true")
+        end
+
+        @start = Time.now
+        4.times do |i|
+          threads << Thread.new do
+            command = connections[i].create_command(CONFIG.sleep)
+            result = command.execute_non_query
+          end
+        end
+
+        threads.each{|t| t.join }
+        @finish = Time.now
+
+        connections.each {|c| c.close}
+      end
+
+      # after do
+      #   @connection.close
+      # end
+
+      FINISH_IN_SECONDS = RUBY_VERSION > "1.9" ? 2 : 3
+
+      it "should finish within #{FINISH_IN_SECONDS} seconds" do
+        pending_if("Ruby on Windows doesn't support asynchronious operations", WINDOWS) do
+          # puts "DEBUG: execution time = #{@finish - @start} seconds"
+          (@finish - @start).should < FINISH_IN_SECONDS
+        end
+      end
+
+    end
+
+  end
+end

data/spec/connection_spec.rb

@@ -0,0 +1,21 @@
+# encoding: utf-8
+
+require File.expand_path(File.join(File.dirname(__FILE__), 'spec_helper'))
+require 'data_objects/spec/connection_spec'
+
+describe DataObjects::Oracle::Connection do
+
+  before do
+    @driver   = CONFIG.scheme
+    @user     = CONFIG.user
+    @password = CONFIG.pass
+    @host     = CONFIG.host
+    @port     = CONFIG.port
+    @database = CONFIG.database
+  end
+
+  behaves_like 'a Connection'
+  behaves_like 'a Connection with authentication support'
+  # FIXME: behaves_like 'a Connection with JDBC URL support' if JRUBY
+  behaves_like 'a Connection via JDNI' if JRUBY
+end

data/spec/encoding_spec.rb

@@ -0,0 +1,12 @@
+# encoding: utf-8
+
+# require File.expand_path(File.join(File.dirname(__FILE__), 'spec_helper'))
+# require 'data_objects/spec/encoding_spec'
+#
+# describe DataObjects::Oracle::Connection do
+#   behaves_like 'a driver supporting different encodings'
+# end
+
+
+# Oracle does not support dynamic changing of client character set
+# Client character set is set using NLS_LANG environment variable (e.g. equal to AMERICAN_AMERICA.UTF8)

data/spec/reader_spec.rb

@@ -0,0 +1,8 @@
+# encoding: utf-8
+
+require File.expand_path(File.join(File.dirname(__FILE__), 'spec_helper'))
+require 'data_objects/spec/reader_spec'
+
+describe DataObjects::Oracle::Reader do
+  behaves_like 'a Reader'
+end

data/spec/result_spec.rb

@@ -0,0 +1,95 @@
+# encoding: utf-8
+
+require File.expand_path(File.join(File.dirname(__FILE__), 'spec_helper'))
+require 'data_objects/spec/result_spec'
+
+describe DataObjects::Oracle::Result do
+  behaves_like 'a Result'
+end
+
+def current_sequence_value(seq_name)
+  reader = @connection.create_command("SELECT #{seq_name}.currval FROM dual").execute_reader
+  reader.next!
+  value = reader.values.first
+  reader.close
+  value
+end
+
+describe DataObjects::Oracle::Result do
+
+  setup_test_environment(false)
+
+  describe 'without using RETURNING' do
+
+    before do
+      @connection = DataObjects::Connection.new(CONFIG.uri)
+      @users_seq_value = current_sequence_value("users_seq")
+      @result    = @connection.create_command("INSERT INTO users (name) VALUES (?)").execute_non_query("monkey")
+    end
+
+    after do
+      @connection.close
+    end
+
+    it 'should respond to #affected_rows' do @result.should.respond_to(:affected_rows) end
+
+    describe 'affected_rows' do
+
+      it 'should return the number of created rows' do
+        @result.affected_rows.should == 1
+      end
+
+    end
+
+    it 'should respond to #insert_id' do @result.should.respond_to(:insert_id) end
+
+    describe 'insert_id' do
+
+      it 'should return nil' do
+        @result.insert_id.should.be.nil
+      end
+
+      it 'should be retrievable through currval' do
+        # This is actually the 2nd record inserted
+        current_sequence_value("users_seq").should == @users_seq_value + 1
+      end
+
+    end
+
+  end
+
+  describe 'when using RETURNING' do
+
+    before do
+      @connection = DataObjects::Connection.new(CONFIG.uri)
+      @users_seq_value = current_sequence_value("users_seq")
+      @result    = @connection.create_command("INSERT INTO users (name) VALUES (?) RETURNING id INTO :insert_id").execute_non_query("monkey")
+    end
+
+    after do
+      @connection.close
+    end
+
+    it 'should respond to #affected_rows' do @result.should.respond_to(:affected_rows) end
+
+    describe 'affected_rows' do
+
+      it 'should return the number of created rows' do
+        @result.affected_rows.should == 1
+      end
+
+    end
+
+    it 'should respond to #insert_id' do @result.should.respond_to(:insert_id) end
+
+    describe 'insert_id' do
+
+      it 'should return the generated key value' do
+        @result.insert_id.should == @users_seq_value + 1
+      end
+
+    end
+
+  end
+
+end

data/spec/spec_helper.rb

@@ -0,0 +1,190 @@
+$TESTING=true
+JRUBY = RUBY_PLATFORM =~ /java/
+
+require 'rubygems'
+require 'date'
+require 'ostruct'
+require 'fileutils'
+
+driver_lib = File.expand_path('../../lib', __FILE__)
+$LOAD_PATH.unshift(driver_lib) unless $LOAD_PATH.include?(driver_lib)
+
+# Prepend data_objects/do_jdbc in the repository to the load path.
+# DO NOT USE installed gems, except when running the specs from gem.
+repo_root = File.expand_path('../../..', __FILE__)
+(['data_objects'] << ('do_jdbc' if JRUBY)).compact.each do |lib|
+  lib_path = "#{repo_root}/#{lib}/lib"
+  $LOAD_PATH.unshift(lib_path) if File.directory?(lib_path) && !$LOAD_PATH.include?(lib_path)
+end
+
+require 'data_objects'
+require 'data_objects/spec/bacon'
+require 'do_oracle'
+
+DataObjects::Oracle.logger = DataObjects::Logger.new(STDOUT, :off)
+at_exit { DataObjects.logger.flush }
+
+# Set default time zone in MRI if not set in environment
+# as otherwise wrong time zone is set for database connection
+ENV['TZ'] ||= 'EET' unless JRUBY
+
+CONFIG = OpenStruct.new
+CONFIG.scheme   = 'oracle'
+CONFIG.user     = ENV['DO_ORACLE_USER'] || 'do_test'
+CONFIG.pass     = ENV['DO_ORACLE_PASS'] || 'do_test'
+CONFIG.host     = ENV['DO_ORACLE_HOST'] || 'localhost'
+CONFIG.port     = ENV['DO_ORACLE_PORT'] || '1521'
+CONFIG.database = ENV['DO_ORACLE_DATABASE'] || '/orcl'
+
+CONFIG.uri = ENV["DO_ORACLE_SPEC_URI"] ||"#{CONFIG.scheme}://#{CONFIG.user}:#{CONFIG.pass}@#{CONFIG.host}:#{CONFIG.port}#{CONFIG.database}"
+CONFIG.sleep = "BEGIN SYS.DBMS_LOCK.sleep(seconds => 1); END;"
+CONFIG.testsql = "SELECT 1 FROM dual"
+
+module DataObjectsSpecHelpers
+
+  def drop_table_and_seq(conn, table_name)
+    begin
+      conn.create_command("DROP TABLE #{table_name}").execute_non_query
+    rescue StandardError => error
+      raise unless error.to_s =~ /ORA-00942/
+    end
+    begin
+      conn.create_command("DROP SEQUENCE #{table_name}_seq").execute_non_query
+    rescue StandardError => error
+      raise unless error.to_s =~ /ORA-02289/
+    end
+  end
+
+  def create_seq_and_trigger(conn, table_name)
+    conn.create_command("CREATE SEQUENCE #{table_name}_seq").execute_non_query
+    conn.create_command(<<-EOF).execute_non_query
+    CREATE OR REPLACE TRIGGER #{table_name}_pkt
+    BEFORE INSERT ON #{table_name} FOR EACH ROW
+    BEGIN
+      IF inserting THEN
+        IF :new.id IS NULL THEN
+          SELECT #{table_name}_seq.NEXTVAL INTO :new.id FROM dual;
+        END IF;
+      END IF;
+    END;
+    EOF
+  end
+
+  def setup_test_environment(force_setup = false)
+    # setup test environment just once
+    return if $test_environment_setup_done && !force_setup
+    puts "Setting up test environment"
+
+    conn = DataObjects::Connection.new(CONFIG.uri)
+
+    drop_table_and_seq(conn, "invoices")
+    drop_table_and_seq(conn, "users")
+    drop_table_and_seq(conn, "widgets")
+
+    conn.create_command(<<-EOF).execute_non_query
+      CREATE TABLE users (
+        id NUMBER(38,0) PRIMARY KEY NOT NULL,
+        name VARCHAR(200) default 'Billy',
+        fired_at timestamp
+      )
+    EOF
+    create_seq_and_trigger(conn, "users")
+
+    conn.create_command(<<-EOF).execute_non_query
+      CREATE TABLE invoices (
+        id NUMBER(38,0) PRIMARY KEY NOT NULL,
+        invoice_number VARCHAR2(50) NOT NULL
+      )
+    EOF
+    create_seq_and_trigger(conn, "invoices")
+
+    conn.create_command(<<-EOF).execute_non_query
+      CREATE TABLE widgets (
+        id NUMBER(38,0) PRIMARY KEY NOT NULL,
+        code CHAR(8) DEFAULT 'A14',
+        name VARCHAR2(200) DEFAULT 'Super Widget',
+        shelf_location VARCHAR2(4000),
+        description VARCHAR2(4000),
+        image_data BLOB,
+        ad_description VARCHAR2(4000),
+        ad_image BLOB,
+        whitepaper_text CLOB,
+        class_name VARCHAR2(4000),
+        cad_drawing BLOB,
+        flags NUMBER(1) default 0,
+        number_in_stock NUMBER(38,0) DEFAULT 500,
+        number_sold NUMBER(38,0) DEFAULT 0,
+        super_number NUMBER(38,0) DEFAULT 9223372036854775807,
+        weight BINARY_FLOAT DEFAULT 1.23,
+        cost1 BINARY_DOUBLE DEFAULT 10.23,
+        cost2 NUMBER(8,2) DEFAULT 50.23,
+        release_date DATE DEFAULT '2008-02-14',
+        release_datetime DATE DEFAULT '2008-02-14 00:31:12',
+        release_timestamp TIMESTAMP WITH TIME ZONE DEFAULT '2008-02-14 00:31:12 #{"%+03d" % (Time.local(2008,2,14,0,31,12).utc_offset/3600)}:00'
+      )
+    EOF
+    create_seq_and_trigger(conn, "widgets")
+
+    command = conn.create_command(<<-EOF)
+      insert into widgets(code, name, shelf_location, description, image_data,
+        ad_description, ad_image, whitepaper_text,
+        class_name, cad_drawing, super_number, weight
+        ,release_datetime, release_timestamp)
+      VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?
+        ,?, ?)
+    EOF
+
+    1.upto(16) do |n|
+      # conn.create_command(<<-EOF).execute_non_query
+      #   insert into widgets(code, name, shelf_location, description, image_data, ad_description, ad_image, whitepaper_text, cad_drawing, super_number, weight) VALUES ('W#{n.to_s.rjust(7,"0")}', 'Widget #{n}', 'A14', 'This is a description', 'IMAGE DATA', 'Buy this product now!', 'AD IMAGE DATA', 'String', 'CAD \\001 \\000 DRAWING', 1234, 13.4);
+      # EOF
+      # conn.create_command(<<-EOF).execute_non_query
+      #   insert into widgets(code, name, shelf_location, description, ad_description, whitepaper_text, super_number, weight) VALUES ('W#{n.to_s.rjust(7,"0")}', 'Widget #{n}', 'A14', 'This is a description', 'Buy this product now!', 'String', 1234, 13.4)
+      # EOF
+      command.execute_non_query(
+        "W#{n.to_s.rjust(7,"0")}", "Widget #{n}", 'A14', 'This is a description', ::Extlib::ByteArray.new('IMAGE DATA'),
+        'Buy this product now!', ::Extlib::ByteArray.new('AD IMAGE DATA'), '1234567890'*500,
+        'String', ::Extlib::ByteArray.new("CAD \001 \000 DRAWING"), 1234, 13.4,
+        Time.local(2008,2,14,0,31,12), Time.local(2008,2,14,0,31,12)
+      )
+    end
+
+    conn.create_command(<<-EOF).execute_non_query
+      update widgets set flags = 1 where id = 2
+    EOF
+
+    conn.create_command(<<-EOF).execute_non_query
+      update widgets set ad_description = NULL where id = 3
+    EOF
+
+    conn.create_command(<<-EOF).execute_non_query
+      update widgets set flags = NULL where id = 4
+    EOF
+
+    conn.create_command(<<-EOF).execute_non_query
+      update widgets set cost1 = NULL where id = 5
+    EOF
+
+    conn.create_command(<<-EOF).execute_non_query
+      update widgets set cost2 = NULL where id = 6
+    EOF
+
+    conn.create_command(<<-EOF).execute_non_query
+      update widgets set release_date = NULL where id = 7
+    EOF
+
+    conn.create_command(<<-EOF).execute_non_query
+      update widgets set release_datetime = NULL where id = 8
+    EOF
+
+    conn.create_command(<<-EOF).execute_non_query
+      update widgets set release_timestamp = NULL where id = 9
+    EOF
+
+    conn.close
+    $test_environment_setup_done = true
+  end
+
+end
+
+include DataObjectsSpecHelpers