ruby-odbc-supported 1.0.0

data/ext/extconf.rb

@@ -0,0 +1,127 @@
+require 'mkmf'
+
+if ! defined? PLATFORM
+  PLATFORM = RUBY_PLATFORM
+end
+# 2.0+
+#adding this for backward compatible
+have_header('ruby/thread.h') && have_func('rb_thread_call_without_gvl', 'ruby/thread.h')
+# 1.9-only
+have_func('rb_thread_blocking_region')
+
+def have_library_ex(lib, func="main", headers=nil)
+  checking_for "#{func}() in -l#{lib}" do
+    libs = append_library($libs, lib)
+    if !func.nil? && !func.empty? && COMMON_LIBS.include?(lib)
+      true
+    elsif try_func(func, libs, headers)
+      $libs = libs
+      true
+    else
+      false
+    end
+  end
+end
+ 
+dir_config("odbc")
+have_header("version.h")
+have_header("sql.h") || begin
+  puts "ERROR: sql.h not found"
+  exit 1
+end
+have_header("sqlext.h") || begin
+  puts "ERROR: sqlext.h not found"
+  exit 1
+end
+testdlopen = enable_config("dlopen", false)
+begin
+  if PLATFORM !~ /(mingw|cygwin)/ then
+    header = "sqltypes.h"
+  else
+    header = ["windows.h", "sqltypes.h"]
+  end
+  if defined? have_type
+    have_type("SQLTCHAR", header)
+  else
+    throw
+  end
+rescue
+  puts "WARNING: please check sqltypes.h for SQLTCHAR manually,"
+  puts "WARNING: if defined, modify CFLAGS in Makefile to contain"
+  puts "WARNING: the option -DHAVE_TYPE_SQLTCHAR"
+end
+begin
+  if PLATFORM !~ /(mingw|cygwin)/ then
+    header = "sqltypes.h"
+  else
+    header = ["windows.h", "sqltypes.h"]
+  end
+  if defined? have_type
+    have_type("SQLLEN", header)
+  else
+    throw
+  end
+rescue
+  puts "WARNING: please check sqltypes.h for SQLLEN manually,"
+  puts "WARNING: if defined, modify CFLAGS in Makefile to contain"
+  puts "WARNING: the option -DHAVE_TYPE_SQLLEN"
+end
+begin
+  if PLATFORM !~ /(mingw|cygwin)/ then
+    header = "sqltypes.h"
+  else
+    header = ["windows.h", "sqltypes.h"]
+  end
+  if defined? have_type
+    have_type("SQLULEN", header)
+  else
+    throw
+  end
+rescue
+  puts "WARNING: please check sqltypes.h for SQLULEN manually,"
+  puts "WARNING: if defined, modify CFLAGS in Makefile to contain"
+  puts "WARNING: the option -DHAVE_TYPE_SQLULEN"
+end
+$have_odbcinst_h = have_header("odbcinst.h")
+
+if PLATFORM =~ /mswin32/ then
+  if !have_library_ex("odbc32", "SQLAllocConnect", "sql.h") ||
+     !have_library_ex("odbccp32", "SQLConfigDataSource", "odbcinst.h") ||
+     !have_library_ex("odbccp32", "SQLInstallerError", "odbcinst.h") ||
+     !have_library("user32", "CharUpper") then
+    puts "Can not locate odbc libraries"
+    exit 1
+  end
+  have_func("SQLInstallerError", "odbcinst.h")
+# mingw untested !!!
+elsif PLATFORM =~ /(mingw|cygwin)/ then
+  have_library("odbc32")
+  have_library("odbccp32")
+  have_library("user32")
+elsif (testdlopen && PLATFORM !~ /(macos|darwin)/ && CONFIG["CC"] =~ /gcc/ && have_func("dlopen", "dlfcn.h") && have_library("dl", "dlopen")) then
+  $LDFLAGS+=" -Wl,-init -Wl,ruby_odbc_init -Wl,-fini -Wl,ruby_odbc_fini"
+  $CPPFLAGS+=" -DHAVE_SQLCONFIGDATASOURCE"
+  $CPPFLAGS+=" -DHAVE_SQLINSTALLERERROR"
+  $CPPFLAGS+=" -DUSE_DLOPEN_FOR_ODBC_LIBS"
+  if defined? have_type then
+    if have_type("SQLBIGINT", "sqltypes.h", "-DHAVE_LONG_LONG") then
+      $CPPFLAGS+=" -DHAVE_LONG_LONG"
+    end
+  end
+else
+  have_library("odbc", "SQLAllocConnect") ||
+    have_library("iodbc", "SQLAllocConnect")
+  ($have_odbcinst_h &&
+    have_library("odbcinst", "SQLConfigDataSource")) ||
+  ($have_odbcinst_h &&
+    have_library("iodbcinst", "SQLConfigDataSource"))
+  $have_odbcinst_h &&
+    have_func("SQLInstallerError", "odbcinst.h")
+  if defined? have_type then
+    if have_type("SQLBIGINT", "sqltypes.h", "-DHAVE_LONG_LONG") then
+      $CPPFLAGS+=" -DHAVE_LONG_LONG"
+    end
+  end
+end
+
+create_makefile("odbc")

data/ext/init.c

@@ -0,0 +1,197 @@
+/*
+ * Part of ODBC-Ruby binding
+ * Copyright (c) 2006-2007 Christian Werner <chw@ch-werner.de>
+ *
+ * See the file "COPYING" for information on usage
+ * and redistribution of this file and for a
+ * DISCLAIMER OF ALL WARRANTIES.
+ *
+ * $Id: init.c,v 1.6 2007/04/07 09:39:08 chw Exp chw $
+ */
+
+#include "ruby.h"
+
+#ifdef USE_DLOPEN_FOR_ODBC_LIBS
+
+/*
+ * This module acts as a drop-in replacement for linking with
+ * "-lodbc -lodbcinst" or "-liodbc -liodbcinst" when dlopen()
+ * is supported.
+ *
+ * Setting the environment variable RUBY_ODBC_DM can be used
+ * to force loading a specific driver manager shared library.
+ * Same logic is used with RUBY_ODBC_INST for the ODBC installer
+ * shared library.
+ */
+
+#include <dlfcn.h>
+
+/* Create weak alias and function declarations. */
+
+#define WEAKFUNC(name) \
+    int __attribute__((weak, alias("__"#name))) name (void); \
+    static int __attribute__((unused)) __ ## name (void) \
+	{ return -1; /* == SQL_ERROR */ }
+
+#define WEAKFUNC_BOOL(name) \
+    int __attribute__((weak, alias("__"#name))) name (void); \
+    static int __attribute__((unused)) __ ## name (void) \
+	{ return 0; /* == BOOL/FALSE */ }
+
+WEAKFUNC(SQLAllocConnect)
+WEAKFUNC(SQLAllocEnv)
+WEAKFUNC(SQLAllocStmt)
+WEAKFUNC(SQLBindParameter)
+WEAKFUNC(SQLCancel)
+WEAKFUNC(SQLDescribeParam)
+WEAKFUNC(SQLDisconnect)
+WEAKFUNC(SQLExecute)
+WEAKFUNC(SQLFetch)
+WEAKFUNC(SQLFetchScroll)
+WEAKFUNC(SQLFreeConnect)
+WEAKFUNC(SQLFreeEnv)
+WEAKFUNC(SQLFreeStmt)
+WEAKFUNC(SQLGetData)
+WEAKFUNC(SQLGetEnvAttr)
+WEAKFUNC(SQLGetStmtOption)
+WEAKFUNC(SQLMoreResults)
+WEAKFUNC(SQLNumParams)
+WEAKFUNC(SQLNumResultCols)
+WEAKFUNC(SQLRowCount)
+WEAKFUNC(SQLSetEnvAttr)
+WEAKFUNC(SQLSetStmtOption)
+WEAKFUNC(SQLTransact)
+WEAKFUNC(SQLEndTran)
+
+WEAKFUNC(SQLColAttributes)
+WEAKFUNC(SQLColAttributesW)
+WEAKFUNC(SQLColumns)
+WEAKFUNC(SQLColumnsW)
+WEAKFUNC(SQLConnect)
+WEAKFUNC(SQLConnectW)
+WEAKFUNC(SQLDataSources)
+WEAKFUNC(SQLDataSourcesW)
+WEAKFUNC(SQLDriverConnect)
+WEAKFUNC(SQLDriverConnectW)
+WEAKFUNC(SQLDrivers)
+WEAKFUNC(SQLDriversW)
+WEAKFUNC(SQLError)
+WEAKFUNC(SQLErrorW)
+WEAKFUNC(SQLExecDirect)
+WEAKFUNC(SQLExecDirectW)
+WEAKFUNC(SQLForeignKeys)
+WEAKFUNC(SQLForeignKeysW)
+WEAKFUNC(SQLGetConnectOption)
+WEAKFUNC(SQLGetConnectOptionW)
+WEAKFUNC(SQLGetCursorName)
+WEAKFUNC(SQLGetCursorNameW)
+WEAKFUNC(SQLGetInfo)
+WEAKFUNC(SQLGetInfoW)
+WEAKFUNC(SQLGetTypeInfo)
+WEAKFUNC(SQLGetTypeInfoW)
+WEAKFUNC(SQLPrepare)
+WEAKFUNC(SQLPrepareW)
+WEAKFUNC(SQLPrimaryKeys)
+WEAKFUNC(SQLPrimaryKeysW)
+WEAKFUNC(SQLProcedureColumns)
+WEAKFUNC(SQLProcedureColumnsW)
+WEAKFUNC(SQLProcedures)
+WEAKFUNC(SQLProceduresW)
+WEAKFUNC(SQLSetConnectOption)
+WEAKFUNC(SQLSetConnectOptionW)
+WEAKFUNC(SQLSetCursorName)
+WEAKFUNC(SQLSetCursorNameW)
+WEAKFUNC(SQLSpecialColumns)
+WEAKFUNC(SQLSpecialColumnsW)
+WEAKFUNC(SQLStatistics)
+WEAKFUNC(SQLStatisticsW)
+WEAKFUNC(SQLTablePrivileges)
+WEAKFUNC(SQLTablePrivilegesW)
+WEAKFUNC(SQLTables)
+WEAKFUNC(SQLTablesW)
+WEAKFUNC(SQLInstallerError)
+WEAKFUNC(SQLInstallerErrorW)
+
+WEAKFUNC_BOOL(SQLConfigDataSource)
+WEAKFUNC_BOOL(SQLConfigDataSourceW)
+WEAKFUNC_BOOL(SQLReadFileDSN)
+WEAKFUNC_BOOL(SQLReadFileDSNW)
+WEAKFUNC_BOOL(SQLWriteFileDSN)
+WEAKFUNC_BOOL(SQLWriteFileDSNW)
+
+/* Library initializer and finalizer. */
+
+static void *lib_odbc = 0;
+static void *lib_odbcinst = 0;
+
+#define warn(msg) fputs(msg, stderr)
+
+void
+ruby_odbc_init()
+{
+    int useiodbc = 0;
+    char *dm_name = getenv("RUBY_ODBC_DM");
+    char *inst_name = getenv("RUBY_ODBC_INST");
+
+    if (dm_name) {
+	lib_odbc = dlopen(dm_name, RTLD_NOW | RTLD_GLOBAL);
+	if (!lib_odbc) {
+	    warn("WARNING: $RUBY_ODBC_DM not loaded.\n");
+	} else {
+	    if (inst_name) {
+		lib_odbcinst = dlopen(inst_name, RTLD_NOW | RTLD_GLOBAL);
+	    }
+	    if (!lib_odbcinst) {
+		warn("WARNING: $RUBY_ODBC_INST not loaded.\n");
+	    }
+	    return;
+	}
+    }
+    lib_odbc = dlopen("libodbc" DLEXT ".1", RTLD_NOW | RTLD_GLOBAL);
+    if (!lib_odbc) {
+	lib_odbc = dlopen("libodbc" DLEXT, RTLD_NOW | RTLD_GLOBAL);
+    }
+    if (!lib_odbc) {
+	lib_odbc = dlopen("libiodbc" DLEXT ".2", RTLD_NOW | RTLD_GLOBAL);
+	if (!lib_odbc) {
+	    lib_odbc = dlopen("libiodbc" DLEXT, RTLD_NOW | RTLD_GLOBAL);
+	}
+	if (!lib_odbc) {
+	    warn("WARNING: no ODBC driver manager found.\n");
+	    return;
+	}
+	useiodbc = 1;
+    }
+    lib_odbcinst = dlopen(useiodbc ?
+			  "libiodbcinst" DLEXT ".2" : "libodbcinst" DLEXT ".1",
+			  RTLD_NOW | RTLD_GLOBAL);
+    if (!lib_odbcinst) {
+	lib_odbcinst = dlopen(useiodbc ?
+			      "libiodbcinst" DLEXT : "libodbcinst" DLEXT,
+			      RTLD_NOW | RTLD_GLOBAL);
+    }
+    if (!lib_odbcinst) {
+	warn("WARNING: no ODBC installer library found.\n");
+    }
+}
+
+void
+ruby_odbc_fini()
+{
+    if (lib_odbcinst) {
+	dlclose(lib_odbcinst);
+	lib_odbcinst = 0;
+    }
+    if (lib_odbc) {
+	dlclose(lib_odbc);
+	lib_odbc = 0;
+    }
+}
+
+int
+ruby_odbc_have_func(char *name, void *addr)
+{
+    return name && addr && (dlsym(NULL, name) != addr);
+}
+
+#endif