vm_tiny_tds 2.1.2

data/lib/tiny_tds/bin.rb

@@ -0,0 +1,104 @@
+require_relative './version'
+require_relative './gem'
+require 'shellwords'
+
+module TinyTds
+  class Bin
+
+    attr_reader :name
+
+    class << self
+      def exe(name, *args)
+        bin = new(name)
+        puts bin.info unless args.any? { |x| x == '-q' }
+        bin.run(*args)
+      end
+    end
+
+    def initialize(name)
+      @root = Gem.root_path
+      @exts = (ENV['PATHEXT'] ? ENV['PATHEXT'].split(';') : ['']) | ['.exe']
+
+      @name = name
+      @binstub = find_bin
+      @exefile = find_exe
+    end
+
+    def run(*args)
+      with_ports_paths do
+        return nil unless path
+        Kernel.system Shellwords.join(args.unshift(path))
+        $CHILD_STATUS.to_i
+      end
+    end
+
+    def path
+      @path ||= @exefile && File.exist?(@exefile) ? @exefile : which
+    end
+
+    def info
+      "[TinyTds][v#{TinyTds::VERSION}][#{name}]: #{path}"
+    end
+
+    private
+
+    def search_paths
+      ENV['PATH'].split File::PATH_SEPARATOR
+    end
+
+    def with_ports_paths
+      old_path = ENV['PATH']
+
+      begin
+        ENV['PATH'] = [
+          Gem.ports_bin_paths,
+          old_path
+        ].flatten.join File::PATH_SEPARATOR
+
+        yield if block_given?
+      ensure
+        ENV['PATH'] = old_path
+      end
+    end
+
+    def find_bin
+      File.join @root, 'bin', name
+    end
+
+    def find_exe
+      Gem.ports_bin_paths.each do |bin|
+        @exts.each do |ext|
+          f = File.join bin, "#{name}#{ext}"
+          return f if File.exist?(f)
+        end
+      end
+      nil
+    end
+
+    def which
+      search_paths.each do |path|
+        @exts.each do |ext|
+          exe = File.expand_path File.join(path, "#{name}#{ext}"), @root
+          next if exe == @binstub
+          next unless File.executable?(exe)
+          next unless binary?(exe)
+          return exe
+        end
+      end
+      nil
+    end
+
+    # Implementation directly copied from ptools.
+    # https://github.com/djberg96/ptools
+    # https://opensource.org/licenses/Artistic-2.0
+    #
+    def binary?(file)
+      bytes = File.stat(file).blksize
+      return false unless bytes
+      bytes = 4096 if bytes > 4096
+      s = (File.read(file, bytes) || '')
+      s = s.encode('US-ASCII', undef: :replace).split(//)
+      ((s.size - s.grep(' '..'~').size) / s.size.to_f) > 0.30
+    end
+  end
+end

data/lib/tiny_tds/client.rb

@@ -0,0 +1,136 @@
+module TinyTds
+  class Client
+
+    @default_query_options = {
+      as: :hash,
+      symbolize_keys: false,
+      cache_rows: true,
+      timezone: :local,
+      empty_sets: true
+    }
+
+    attr_reader :query_options
+    attr_reader :message_handler
+
+    class << self
+
+      attr_reader :default_query_options
+
+      # Most, if not all, iconv encoding names can be found by ruby. Just in case, you can
+      # overide this method to return a string name that Encoding.find would work with. Default
+      # is to return the passed encoding.
+      #
+      def transpose_iconv_encoding(encoding)
+        encoding
+      end
+
+      def local_offset
+        ::Time.local(2010).utc_offset.to_r / 86_400
+      end
+
+    end
+
+    # rubocop:disable Metrics/AbcSize
+    # rubocop:disable Metrics/MethodLength
+    # rubocop:disable Metrics/CyclomaticComplexity
+    # rubocop:disable Metrics/PerceivedComplexity
+    def initialize(opts = {})
+      if opts[:dataserver].to_s.empty? && opts[:host].to_s.empty?
+        raise ArgumentError, 'missing :host option if no :dataserver given'
+      end
+
+      @message_handler = opts[:message_handler]
+      if @message_handler && !@message_handler.respond_to?(:call)
+        raise ArgumentError, ':message_handler must implement `call` (eg, a Proc or a Method)'
+      end
+
+      opts[:username] = parse_username(opts)
+      @query_options = self.class.default_query_options.dup
+      opts[:password] = opts[:password].to_s if opts[:password] && opts[:password].to_s.strip != ''
+      opts[:appname] ||= 'TinyTds'
+      opts[:tds_version] = tds_versions_setter(opts)
+      opts[:use_utf16] = opts[:use_utf16].nil? || ["true", "1", "yes"].include?(opts[:use_utf16].to_s)
+      opts[:login_timeout] ||= 60
+      opts[:timeout] ||= 5
+      opts[:encoding] = opts[:encoding].nil? || opts[:encoding].casecmp('utf8').zero? ? 'UTF-8' : opts[:encoding].upcase
+      opts[:port] ||= 1433
+      opts[:dataserver] = "#{opts[:host]}:#{opts[:port]}" if opts[:dataserver].to_s.empty?
+      forced_integer_keys = [:login_timeout, :port, :timeout]
+      forced_integer_keys.each { |k| opts[k] = opts[k].to_i if opts[k] }
+      connect(opts)
+    end
+
+    def tds_73?
+      tds_version >= 11
+    end
+
+    def tds_version_info
+      info = TDS_VERSIONS_GETTERS[tds_version]
+      "#{info[:name]} - #{info[:description]}" if info
+    end
+
+    def active?
+      !closed? && !dead?
+    end
+
+    private
+
+    def parse_username(opts)
+      host = opts[:host]
+      username = opts[:username]
+      return username if username.nil? || !opts[:azure]
+      return username if username.include?('@') && !username.include?('database.windows.net')
+      user, domain = username.split('@')
+      domain ||= host
+      "#{user}@#{domain.split('.').first}"
+    end
+
+    def tds_versions_setter(opts = {})
+      v = opts[:tds_version] || ENV['TDSVER'] || '7.3'
+      TDS_VERSIONS_SETTERS[v.to_s]
+    end
+
+    # From sybdb.h comments:
+    # DBVERSION_xxx are used with dbsetversion()
+    #
+    TDS_VERSIONS_SETTERS = {
+      'unknown' => 0,
+      '46'      => 1,
+      '100'     => 2,
+      '42'      => 3,
+      '70'      => 4,
+      '7.0'     => 4,
+      '71'      => 5,
+      '7.1'     => 5,
+      '80'      => 5,
+      '8.0'     => 5,
+      '72'      => 6,
+      '7.2'     => 6,
+      '90'      => 6,
+      '9.0'     => 6,
+      '73'      => 7,
+      '7.3'     => 7
+    }.freeze
+
+    # From sybdb.h comments:
+    # DBTDS_xxx are returned by DBTDS()
+    # The integer values of the constants are poorly chosen.
+    #
+    TDS_VERSIONS_GETTERS = {
+      0  => { name: 'DBTDS_UNKNOWN',        description: 'Unknown' },
+      1  => { name: 'DBTDS_2_0',            description: 'Pre 4.0 SQL Server' },
+      2  => { name: 'DBTDS_3_4',            description: 'Microsoft SQL Server (3.0)' },
+      3  => { name: 'DBTDS_4_0',            description: '4.0 SQL Server' },
+      4  => { name: 'DBTDS_4_2',            description: '4.2 SQL Server' },
+      5  => { name: 'DBTDS_4_6',            description: '2.0 OpenServer and 4.6 SQL Server.' },
+      6  => { name: 'DBTDS_4_9_5',          description: '4.9.5 (NCR) SQL Server' },
+      7  => { name: 'DBTDS_5_0',            description: '5.0 SQL Server' },
+      8  => { name: 'DBTDS_7_0',            description: 'Microsoft SQL Server 7.0' },
+      9  => { name: 'DBTDS_7_1/DBTDS_8_0',  description: 'Microsoft SQL Server 2000' },
+      10 => { name: 'DBTDS_7_2/DBTDS_9_0',  description: 'Microsoft SQL Server 2005' },
+      11 => { name: 'DBTDS_7_3',            description: 'Microsoft SQL Server 2008' },
+      12 => { name: 'DBTDS_7_4',            description: 'Microsoft SQL Server 2012/2014' }
+    }.freeze
+
+  end
+end

data/lib/tiny_tds/error.rb

@@ -0,0 +1,14 @@
+module TinyTds
+  class Error < StandardError
+
+    attr_accessor :source, :severity, :db_error_number, :os_error_number
+
+    def initialize(message)
+      super
+      @severity = nil
+      @db_error_number = nil
+      @os_error_number = nil
+    end
+
+  end
+end

data/lib/tiny_tds/gem.rb

@@ -0,0 +1,32 @@
+require 'rbconfig'
+
+module TinyTds
+  module Gem
+    class << self
+      def root_path
+        File.expand_path '../../..', __FILE__
+      end
+
+      def ports_root_path
+        File.join(root_path,'ports')
+      end
+
+      def ports_bin_paths
+        Dir.glob(File.join(ports_root_path,ports_host,'**','bin'))
+      end
+
+      def ports_lib_paths
+        Dir.glob(File.join(ports_root_path,ports_host,'**','lib'))
+      end
+
+      def ports_host
+        h = RbConfig::CONFIG['host']
+
+        # Our fat binary builds with a i686-w64-mingw32 toolchain
+        # but ruby for windows x32-mingw32 reports i686-pc-mingw32
+        # so correct the host here
+        h.gsub('i686-pc-mingw32', 'i686-w64-mingw32')
+      end
+    end
+  end
+end

data/lib/tiny_tds/result.rb

@@ -0,0 +1,7 @@
+module TinyTds
+  class Result
+
+    include Enumerable
+
+  end
+end

data/lib/tiny_tds/version.rb

@@ -0,0 +1,3 @@
+module TinyTds
+  VERSION = File.read(File.expand_path('../../../VERSION', __FILE__)).chomp
+end

data/lib/tiny_tds.rb

@@ -0,0 +1,61 @@
+# encoding: UTF-8
+require 'date'
+require 'bigdecimal'
+require 'rational'
+
+require 'tiny_tds/version'
+require 'tiny_tds/error'
+require 'tiny_tds/client'
+require 'tiny_tds/result'
+require 'tiny_tds/gem'
+
+# Support multiple ruby versions, fat binaries under Windows.
+if RUBY_PLATFORM =~ /mingw|mswin/ && RUBY_VERSION =~ /(\d+.\d+)/
+  ver = Regexp.last_match(1)
+
+  add_dll_path = proc do |path, &block|
+    begin
+      require 'ruby_installer/runtime'
+      RubyInstaller::Runtime.add_dll_directory(path, &block)
+    rescue LoadError
+      old_path = ENV['PATH']
+      ENV['PATH'] = "#{path};#{old_path}"
+      begin
+        block.call
+      ensure
+        ENV['PATH'] = old_path
+      end
+    end
+  end
+
+  add_dll_paths = proc do |paths, &block|
+    if path=paths.shift
+      add_dll_path.call(path) do
+        add_dll_paths.call(paths, &block)
+      end
+    else
+      block.call
+    end
+  end
+
+  # Temporary add bin directories for DLL search, so that freetds DLLs can be found.
+  add_dll_paths.call( TinyTds::Gem.ports_bin_paths ) do
+    begin
+      require "tiny_tds/#{ver}/tiny_tds"
+    rescue LoadError
+      require 'tiny_tds/tiny_tds'
+    end
+  end
+else
+  # Load dependent shared libraries into the process, so that they are already present,
+  # when tiny_tds.so is loaded. This ensures, that shared libraries are loaded even when
+  # the path is different between build and run time (e.g. Heroku).
+  ports_libs = File.join(TinyTds::Gem.ports_root_path,
+                         "#{RbConfig::CONFIG['host']}/lib/*.so")
+  Dir[ports_libs].each do |lib|
+    require 'fiddle'
+    Fiddle.dlopen(lib)
+  end
+
+  require 'tiny_tds/tiny_tds'
+end

data/patches/freetds/1.00.27/0001-mingw_missing_inet_pton.diff

@@ -0,0 +1,34 @@
+diff --git a/src/tds/tls.c b/src/tds/tls.c
+index 09e7fa0..1da18f6 100644
+--- a/src/tds/tls.c
++++ b/src/tds/tls.c
+@@ -101,6 +101,29 @@
+ #define SSL_PTR BIO_get_data(bio)
+ #endif
+
++/*
++ * Add a workaround for older Mingw versions without inet_pton().
++ * This means RubyInstallers DevKit-4.7.2 in particular.
++ */
++#if defined(__MINGW32__) && !defined(InetPtonA)
++  #include <windows.h>
++
++  static HMODULE ws2_32 = NULL;
++  typedef INT (WINAPI * __inet_pton)(INT Family, LPCWSTR pStringBuf, PVOID pAddr);
++  static __inet_pton _inet_pton = NULL;
++
++  INT WINAPI inet_pton(INT Family, LPCWSTR pStringBuf, PVOID pAddr)
++  {
++    if (_inet_pton == NULL) {
++      ws2_32 = LoadLibraryEx("Ws2_32.dll", NULL, 0);
++
++      _inet_pton = (__inet_pton)GetProcAddress(ws2_32, "inet_pton");
++    }
++
++    return (_inet_pton)(Family, pStringBuf, pAddr);
++  }
++#endif
++
+ static SSL_RET
+ tds_pull_func_login(SSL_PULL_ARGS)
+ {

data/patches/freetds/1.00.27/0002-Don-t-use-MSYS2-file-libws2_32.diff

@@ -0,0 +1,28 @@
+From 56e8972f66c3e948e2ad6885595c58fd23dcdb37 Mon Sep 17 00:00:00 2001
+From: Lars Kanis <kanis@comcard.de>
+Date: Thu, 6 Jul 2017 17:09:40 +0200
+Subject: [PATCH] Don't use MSYS2 file libws2_32.a for MINGW build
+
+This file is intended for MSYS2/cygwin builds and blocks OpenSSL
+detection of freetds on i686.
+---
+ configure    | 2 --
+ configure.ac | 2 --
+ 2 files changed, 4 deletions(-)
+
+diff --git a/configure b/configure
+index 9495a49..31eb01d 100644
+--- a/configure
++++ b/configure
+@@ -15915,8 +15915,6 @@ case $host in
+ 	tds_mingw=yes
+ 	if test "$host_cpu" = "x86_64"; then
+ 		LIBS="-lws2_32"
+-	elif test -r /usr/lib/w32api/libws2_32.a; then
+-		LIBS="-L/usr/lib/w32api -lws2_32"
+ 	else
+ 		LIBS="-lws2_32"
+ 	fi
+-- 
+2.6.2.windows.1
+

data/patches/libiconv/1.14/1-avoid-gets-error.patch

@@ -0,0 +1,17 @@
+--- a/srclib/stdio.in.h	2017-01-22 01:23:00.000000000 -0400
++++ b/srclib/stdio.in.h	2017-01-22 01:24:00.000000000 -0400
+@@ -695,8 +695,14 @@
+ /* It is very rare that the developer ever has full control of stdin,
+    so any use of gets warrants an unconditional warning.  Assume it is
+    always declared, since it is required by C89.  */
++#if defined(__GLIBC__) && !defined(__UCLIBC__)
++# ifdef __GLIBC_PREREQ 
++#  if !__GLIBC_PREREQ(2, 16)
+ _GL_WARN_ON_USE (gets, "gets is a security hole - use fgets instead");
++#  endif
++# endif
++#endif
+ #endif
+ 
+ 
+ #if @GNULIB_OBSTACK_PRINTF@ || @GNULIB_OBSTACK_PRINTF_POSIX@

data/tasks/native_gem.rake

@@ -0,0 +1,14 @@
+# encoding: UTF-8
+
+desc 'Build the windows binary gems per rake-compiler-dock'
+task 'gem:windows' => ['ports:cross'] do
+  require 'rake_compiler_dock'
+
+  # make sure to install our bundle
+  build = ['bundle']
+
+  # and finally build the native gem
+  build << 'rake cross native gem RUBY_CC_VERSION=2.5.0:2.4.0:2.3.0:2.2.2:2.1.6:2.0.0 CFLAGS="-Wall" MAKE="make -j`nproc`"'
+
+  RakeCompilerDock.sh build.join(' && ')
+end

data/tasks/package.rake

@@ -0,0 +1,8 @@
+# encoding: UTF-8
+require 'rubygems/package_task'
+
+Gem::PackageTask.new(SPEC) do |pkg|
+  pkg.need_tar = false
+  pkg.need_zip = false
+end
+

data/tasks/ports/freetds.rb

@@ -0,0 +1,37 @@
+require_relative './recipe'
+
+module Ports
+  class Freetds < Recipe
+    def initialize(version)
+      super('freetds', version)
+
+      set_patches
+    end
+
+    private
+
+    def configure_defaults
+      opts = super
+
+      opts << '--with-pic'
+      opts << '--disable-odbc'
+
+      if version =~ /0\.91/
+        opts << '--with-tdsver=7.1'
+      else
+        opts << '--with-tdsver=7.3'
+      end
+
+      if windows?
+        opts << '--sysconfdir=C:/Sites'
+        opts << '--enable-sspi'
+      end
+
+      opts
+    end
+
+    def set_patches
+      self.patch_files.concat get_patches(name, version)
+    end
+  end
+end

data/tasks/ports/libiconv.rb

@@ -0,0 +1,43 @@
+require_relative './recipe'
+
+module Ports
+  class Libiconv < Recipe
+    def initialize(version)
+      super('libiconv', version)
+
+      set_patches
+    end
+
+    def cook
+      chdir_for_build do
+        super
+      end
+      self
+    end
+
+    private
+
+    # When using rake-compiler-dock on Windows, the underlying Virtualbox shared
+    # folders don't support symlinks, but libiconv expects it for a build on
+    # Linux. We work around this limitation by using the temp dir for cooking.
+    def chdir_for_build
+      build_dir = ENV['RCD_HOST_RUBY_PLATFORM'].to_s =~ /mingw|mswin|cygwin/ ? '/tmp' : '.'
+      Dir.chdir(build_dir) do
+        yield
+      end
+    end
+
+    def configure_defaults
+      [
+        "--host=#{@host}",
+        '--disable-static',
+        '--enable-shared',
+        'CFLAGS=-fPIC -O2'
+      ]
+    end
+
+    def set_patches
+      self.patch_files.concat get_patches(name, version)
+    end
+  end
+end

data/tasks/ports/openssl.rb

@@ -0,0 +1,78 @@
+require_relative './recipe'
+
+module Ports
+  class Openssl < Recipe
+    def initialize(version)
+      super('openssl', version)
+
+      set_patches
+    end
+
+    def configure
+      return if configured?
+
+      md5_file = File.join(tmp_path, 'configure.md5')
+      digest   = Digest::MD5.hexdigest(computed_options.to_s)
+      File.open(md5_file, "w") { |f| f.write digest }
+
+      # Windows doesn't recognize the shebang so always explicitly use sh
+      execute('configure', "sh -c \"./Configure #{computed_options.join(' ')}\"")
+    end
+
+    def install
+      unless installed?
+        execute('install', %Q(#{make_cmd} install_sw install_ssldirs))
+      end
+    end
+
+    private
+
+    def execute(action, command, options={})
+      # OpenSSL Requires Perl >= 5.10, while the Ruby devkit uses MSYS1 with Perl 5.8.8.
+      # To overcome this, prepend Git's usr/bin to the PATH.
+      # It has MSYS2 with a recent version of perl.
+      prev_path = ENV['PATH']
+      if host =~ /mingw/ && IO.popen(["perl", "-e", "print($])"], &:read).to_f < 5.010
+        git_perl = 'C:/Program Files/Git/usr/bin'
+        if File.directory?(git_perl)
+          ENV['PATH'] = "#{git_perl}#{File::PATH_SEPARATOR}#{ENV['PATH']}"
+          ENV['PERL'] = 'perl'
+        end
+      end
+
+      super
+      ENV['PATH'] = prev_path
+    end
+
+    def configure_defaults
+      opts = [
+        'shared',
+        target_arch
+      ]
+
+      if cross_build?
+        opts << "--cross-compile-prefix=#{host}-"
+      end
+
+      opts
+    end
+
+    def target_arch
+      if windows?
+        arch = ''
+        arch = '64' if host=~ /x86_64/
+
+        "mingw#{arch}"
+      else
+        arch = 'x32'
+        arch = 'x86_64' if host=~ /x86_64/
+
+        "linux-#{arch}"
+      end
+    end
+
+    def set_patches
+      self.patch_files.concat get_patches(name, version)
+    end
+  end
+end

data/tasks/ports/recipe.rb

@@ -0,0 +1,52 @@
+# encoding: UTF-8
+require 'mini_portile2'
+require 'fileutils'
+require 'rbconfig'
+
+module Ports
+  class Recipe < MiniPortile
+    def cook
+      checkpoint = "ports/#{name}-#{version}-#{host}.installed"
+
+      unless File.exist? checkpoint
+        super
+        FileUtils.touch checkpoint
+      end
+    end
+
+    private
+
+    def configure_defaults
+      [
+        "--host=#{@host}",
+        '--disable-static',
+        '--enable-shared'
+      ]
+    end
+
+    def windows?
+      host =~ /mswin|mingw32/
+    end
+
+    def system_host
+      RbConfig::CONFIG['host']
+    end
+
+    def cross_build?
+      host != system_host
+    end
+
+    def get_patches(libname, version)
+      patches = []
+  
+      patch_path = File.expand_path(
+        File.join('..','..','..','patches',libname,version), 
+        __FILE__
+      )
+
+      patches.concat(Dir[File.join(patch_path, '*.patch')].sort)
+      patches.concat(Dir[File.join(patch_path, '*.diff')].sort)
+    end
+  end
+end
+