activerecord-jdbc-adapter 70.0.pre-java → 70.1-java

data/lib/arjdbc/db2/as400.rb

@@ -1,142 +0,0 @@
-require 'arjdbc/db2/adapter'
-
-module ArJdbc
-  module AS400
-    include DB2
-
-    module ActiveRecord::ConnectionAdapters
-      remove_const(:AS400Adapter) if const_defined?(:AS400Adapter)
-      class AS400Adapter < DB2Adapter
-
-        include ::ArJdbc::AS400
-
-        def jdbc_connection_class(spec)
-          ArJdbc::AS400.jdbc_connection_class
-        end
-      end
-    end
-
-    # @private
-    def self.extended(adapter); DB2.extended(adapter); end
-
-    # @private
-    def self.initialize!; DB2.initialize!; end
-
-    # @see ActiveRecord::ConnectionAdapters::JdbcAdapter#jdbc_connection_class
-    def self.jdbc_connection_class; DB2.jdbc_connection_class; end
-
-    def self.column_selector
-      [ /as400/i, lambda { |config, column| column.extend(Column) } ]
-    end
-
-    # Boolean emulation can be disabled using :
-    #
-    #   ArJdbc::AS400.emulate_booleans = false
-    #
-    def self.emulate_booleans; DB2.emulate_booleans; end
-    def self.emulate_booleans=(emulate); DB2.emulate_booleans = emulate; end
-
-    ADAPTER_NAME = 'AS400'.freeze
-
-    def adapter_name
-      ADAPTER_NAME
-    end
-
-    # @override
-    def prefetch_primary_key?(table_name = nil)
-      # TRUE if the table has no identity column
-      names = table_name.upcase.split(".")
-      sql = "SELECT 1 FROM SYSIBM.SQLPRIMARYKEYS WHERE "
-      sql << "TABLE_SCHEM = '#{names.first}' AND " if names.size == 2
-      sql << "TABLE_NAME = '#{names.last}'"
-      select_one(sql).nil?
-    end
-
-    # @override
-    def rename_column(table_name, column_name, new_column_name)
-      raise NotImplementedError, "rename_column is not supported on IBM iSeries"
-    end
-
-    # @override
-    def execute_table_change(sql, table_name, name = nil)
-      execute_and_auto_confirm(sql, name)
-    end
-
-    # holy moly batman! all this to tell AS400 "yes i am sure"
-    def execute_and_auto_confirm(sql, name = nil)
-
-      begin
-        @connection.execute_update "call qsys.qcmdexc('QSYS/CHGJOB INQMSGRPY(*SYSRPYL)',0000000031.00000)"
-        @connection.execute_update "call qsys.qcmdexc('ADDRPYLE SEQNBR(9876) MSGID(CPA32B2) RPY(''I'')',0000000045.00000)"
-      rescue Exception => e
-        raise "Could not call CHGJOB INQMSGRPY(*SYSRPYL) and ADDRPYLE SEQNBR(9876) MSGID(CPA32B2) RPY('I').\n" +
-              "Do you have authority to do this?\n\n#{e.inspect}"
-      end
-
-      begin
-        result = execute(sql, name)
-      rescue Exception
-        raise
-      else
-        # Return if all work fine
-        result
-      ensure
-
-        # Ensure default configuration restoration
-        begin
-          @connection.execute_update "call qsys.qcmdexc('QSYS/CHGJOB INQMSGRPY(*DFT)',0000000027.00000)"
-          @connection.execute_update "call qsys.qcmdexc('RMVRPYLE SEQNBR(9876)',0000000021.00000)"
-        rescue Exception => e
-          raise "Could not call CHGJOB INQMSGRPY(*DFT) and RMVRPYLE SEQNBR(9876).\n" +
-                    "Do you have authority to do this?\n\n#{e.inspect}"
-        end
-
-      end
-    end
-    private :execute_and_auto_confirm
-
-    # disable all schemas browsing when default schema is specified
-    def table_exists?(name)
-      return false unless name
-      schema ? @connection.table_exists?(name, schema) : @connection.table_exists?(name)
-    end
-
-    DRIVER_NAME = 'com.ibm.as400.access.AS400JDBCDriver'.freeze
-
-    # @private
-    # @deprecated no longer used
-    def as400?
-      true
-    end
-
-    private
-
-    # @override
-    def db2_schema
-      @db2_schema = false unless defined? @db2_schema
-      return @db2_schema if @db2_schema != false
-      @db2_schema =
-        if config[:schema].present?
-          config[:schema]
-        elsif config[:jndi].present?
-          # Only found method to set db2_schema from jndi
-          result = select_one("SELECT CURRENT_SCHEMA FROM SYSIBM.SYSDUMMY1")
-          schema = result['00001']
-          # If the connection uses the library list schema name will be nil
-          if schema == '*LIBL'
-            schema = nil
-          end
-          schema
-        else
-          # AS400 implementation takes schema from library name (last part of URL)
-          # jdbc:as400://localhost/schema;naming=system;libraries=lib1,lib2
-          schema = nil
-          split = config[:url].split('/')
-          # Return nil if schema isn't defined
-          schema = split.last.split(';').first.strip if split.size == 4
-          schema
-        end
-    end
-
-  end
-end

data/lib/arjdbc/db2/column.rb

@@ -1,131 +0,0 @@
-module ArJdbc
-  module DB2
-
-    # @see ActiveRecord::ConnectionAdapters::JdbcColumn#column_types
-    def self.column_selector
-      [ /(db2|zos)/i, lambda { |config, column| column.extend(Column) } ]
-    end
-
-    # @see ActiveRecord::ConnectionAdapters::JdbcColumn
-    module Column
-
-      # @private
-      def self.included(base)
-        # NOTE: assumes a standalone DB2Column class
-        class << base; include Cast; end
-      end
-
-      # @deprecated use `self.class.string_to_time`
-      def self.cast_to_date_or_time(value)
-        return value if value.is_a? Date
-        return nil if value.blank?
-        # https://github.com/jruby/activerecord-jdbc-adapter/commit/c225126e025df2e98ba3386c67e2a5bc5e5a73e6
-        return Time.now if value =~ /^CURRENT/
-        guess_date_or_time((value.is_a? Time) ? value : cast_to_time(value))
-      rescue
-        value
-      end
-
-      # @deprecated use `self.class.string_to_time` or `self.class.string_to_dummy_time`
-      def self.cast_to_time(value)
-        return value if value.is_a? Time
-        # AS400 returns a 2 digit year, LUW returns a 4 digit year
-        time = DateTime.parse(value).to_time rescue nil
-        return nil unless time
-        time_array = [time.year, time.month, time.day, time.hour, time.min, time.sec]
-        time_array[0] ||= 2000; time_array[1] ||= 1; time_array[2] ||= 1;
-        Time.send(ActiveRecord.default_timezone, *time_array) rescue nil
-      end
-
-      # @deprecated
-      # @private
-      def self.guess_date_or_time(value)
-        return value if value.is_a? Date
-        ( value && value.hour == 0 && value.min == 0 && value.sec == 0 ) ?
-          Date.new(value.year, value.month, value.day) : value
-      end
-
-      # @override
-      def type_cast(value)
-        # AR5.2
-        return super unless respond_to?(:type)
-
-        return nil if value.nil? || value == 'NULL' || value =~ /^\s*NULL\s*$/i
-        case type
-        when :string    then value
-        when :integer   then value.respond_to?(:to_i) ? value.to_i : (value ? 1 : 0)
-        when :primary_key then value.respond_to?(:to_i) ? value.to_i : (value ? 1 : 0)
-        when :float     then value.to_f
-        when :date      then self.class.string_to_date(value)
-        when :datetime  then self.class.string_to_time(value)
-        when :timestamp then self.class.string_to_time(value)
-        when :time      then self.class.string_to_dummy_time(value)
-        # TODO AS400 stores binary strings in EBCDIC (CCSID 65535), need to convert back to ASCII
-        else
-          super
-        end
-      end
-
-      # @override
-      def type_cast_code(var_name)
-        case type
-        when :date      then "#{self.class.name}.string_to_date(#{var_name})"
-        when :datetime  then "#{self.class.name}.string_to_time(#{var_name})"
-        when :timestamp then "#{self.class.name}.string_to_time(#{var_name})"
-        when :time      then "#{self.class.name}.string_to_dummy_time(#{var_name})"
-        else
-          super
-        end
-      end
-
-      private
-
-      # Post process default value from JDBC into a Rails-friendly format (columns{-internal})
-      def default_value(value)
-        # IBM i (AS400) will return an empty string instead of null for no default
-        return nil if value.blank?
-
-        # string defaults are surrounded by single quotes
-        return $1 if value =~ /^'(.*)'$/
-
-        value
-      end
-
-      module Cast
-
-        # @override
-        def string_to_date(value)
-          return nil unless value = current_date_time_parse(value)
-
-          super
-        end
-
-        # @override
-        def string_to_time(value)
-          return nil unless value = current_date_time_parse(value)
-
-          super
-        end
-
-        # @override
-        def string_to_dummy_time(value)
-          return nil unless value = current_date_time_parse(value)
-
-          super
-        end
-
-        private
-
-        def current_date_time_parse(value)
-          return value unless value.is_a?(String)
-          return nil if value.empty?
-          return Time.now if value.index('CURRENT') == 0
-
-          return value
-        end
-
-      end
-
-    end
-  end
-end

data/lib/arjdbc/db2/connection_methods.rb

@@ -1,48 +0,0 @@
-ArJdbc::ConnectionMethods.module_eval do
-  # @note Assumes DB2 driver (*db2jcc.jar*) is on class-path.
-  def db2_connection(config)
-    config[:adapter_spec] ||= ::ArJdbc::DB2
-
-    return jndi_connection(config) if jndi_config?(config)
-
-    config[:url] ||= begin
-      if config[:host] # Type 4 URL: jdbc:db2://server:port/database
-        config[:port] ||= 50000
-        "jdbc:db2://#{config[:host]}:#{config[:port]}/#{config[:database]}"
-      else # Type 2 URL: jdbc:db2:database
-        "jdbc:db2:#{config[:database]}"
-      end
-    end
-    config[:driver] ||= ::ArJdbc::DB2::DRIVER_NAME
-    config[:connection_alive_sql] ||= 'SELECT 1 FROM syscat.tables FETCH FIRST 1 ROWS ONLY'
-    config[:adapter_class] = ActiveRecord::ConnectionAdapters::DB2Adapter unless config.key?(:adapter_class)
-
-    jdbc_connection(config)
-  end
-  alias_method :jdbcdb2_connection, :db2_connection
-
-  # @note Assumes AS400 driver (*jt400.jar*) is on class-path.
-  def as400_connection(config)
-    config[:adapter_spec] ||= ::ArJdbc::AS400
-
-    return jndi_connection(config) if config[:jndi]
-
-    config[:url] ||= begin
-      # jdbc:as400://[host]
-      url = 'jdbc:as400://'
-      url << config[:host] if config[:host]
-      # jdbc:as400://myiSeries;database name=IASP1
-      url << ";database name=#{config[:database]}" if config[:database]
-      # jdbc:as400://[host];proxy server=HODServerName:proxyServerPort
-      url << ";proxy server=#{config[:proxy]}" if config[:proxy]
-      url
-    end
-    require 'arjdbc/db2/as400'
-    config[:driver] ||= ::ArJdbc::AS400::DRIVER_NAME
-    config[:connection_alive_sql] ||= 'SELECT 1 FROM sysibm.tables FETCH FIRST 1 ROWS ONLY'
-    config[:adapter_class] = ActiveRecord::ConnectionAdapters::AS400Adapter unless config.key?(:adapter_class)
-
-    jdbc_connection(config)
-  end
-  alias_method :jdbcas400_connection, :as400_connection
-end

data/lib/arjdbc/db2.rb

@@ -1,4 +0,0 @@
-require 'arjdbc'
-require 'arjdbc/db2/adapter'
-require 'arjdbc/db2/connection_methods'
-ArJdbc.warn_unsupported_adapter 'db2', [4, 2] # warns on AR >= 4.2

data/lib/arjdbc/derby/active_record_patch.rb

@@ -1,13 +0,0 @@
-# Needed because Rails is broken wrt to quoting of some values.
-# Most databases are nice about it, but not Derby.
-# The real issue is that you can't compare a CHAR value to a NUMBER column.
-ActiveRecord::Associations::ClassMethods.module_eval do
-  private
-  def select_limited_ids_list(options, join_dependency)
-    return super unless connection.is_a?(ArJdbc::Derby)
-    connection.select_all(
-      construct_finder_sql_for_association_limiting(options, join_dependency),
-      "#{name} Load IDs For Limited Eager Loading"
-    ).collect { |row| connection.quote(row[primary_key], columns_hash[primary_key]) }.join(", ")
-  end
-end