mysql 2.5.1

data/extconf.rb

@@ -0,0 +1,67 @@
+require 'mkmf'
+
+if mc = with_config('mysql-config') then
+  mc = 'mysql_config' if mc == true
+  cflags = `#{mc} --cflags`.chomp
+  exit 1 if $? != 0
+  libs = `#{mc} --libs`.chomp
+  exit 1 if $? != 0
+  $CPPFLAGS += ' ' + cflags
+  $libs = libs + " " + $libs
+else
+  inc, lib = dir_config('mysql', '/usr/local')
+  libs = ['m', 'z', 'socket', 'nsl']
+  while not find_library('mysqlclient', 'mysql_query', lib, "#{lib}/mysql") do
+    exit 1 if libs.empty?
+    have_library(libs.shift)
+  end
+end
+
+have_func('mysql_ssl_set')
+
+if have_header('mysql.h') then
+  src = "#include <errmsg.h>\n#include <mysqld_error.h>\n"
+elsif have_header('mysql/mysql.h') then
+  src = "#include <mysql/errmsg.h>\n#include <mysql/mysqld_error.h>\n"
+else
+  exit 1
+end
+
+# make mysql constant
+File::open("conftest.c", "w") do |f|
+  f.puts src
+end
+if defined? cpp_command then
+  cpp = Config::expand(cpp_command(''))
+else
+  cpp = Config::expand sprintf(CPP, $CPPFLAGS, $CFLAGS, '')
+end
+unless system "#{cpp} > confout" then
+  exit 1
+end
+File::unlink "conftest.c"
+
+error_syms = []
+IO::foreach('confout') do |l|
+  next unless l =~ /errmsg\.h|mysqld_error\.h/
+  fn = l.split(/\"/)[1]
+  IO::foreach(fn) do |m|
+    if m =~ /^#define\s+([CE]R_[0-9A-Z_]+)/ then
+      error_syms << $1
+    end
+  end
+end
+File::unlink 'confout'
+error_syms.uniq!
+
+newf = File::open('mysql.c', 'w')
+IO::foreach('mysql.c.in') do |l|
+  newf.puts l
+  if l =~ /\/\* Mysql::Error constant \*\// then
+    error_syms.each do |s|
+      newf.puts "    rb_define_const(eMysql, \"#{s}\", INT2NUM(#{s}));"
+    end
+  end
+end
+
+create_makefile("mysql")

data/mysql-compat.rb

@@ -0,0 +1,62 @@
+# for compatibility with 1.x
+# $Id: mysql-compat.rb,v 1.2 1998/11/29 13:02:15 tommy Exp $
+
+require 'mysql.o'
+
+class Mysql
+  def Mysql.connect(host=nil, db=nil, user=nil, pass=nil)
+    Mysql.real_connect(host, user, pass, db)
+  end
+  def Mysql.new(host=nil, db=nil, user=nil, pass=nil)
+    Mysql.real_connect(host, user, pass, db)
+  end
+
+  alias selectdb select_db
+  alias affectedrows affected_rows
+  alias insertid insert_id
+  alias createdb create_db
+  alias dropdb drop_db
+
+  def listdbs()
+    ret = []
+    query("show databases").each {|x| ret << x[0]}
+    ret
+  end
+
+  def listtables()
+    ret = []
+    query("show tables").each {|x| ret << x[0]}
+    ret
+  end
+
+  def listfields(table)
+    query("show fields from #{table}")
+  end
+end
+
+class MysqlRes
+  alias numrows num_rows
+  alias numfields num_fields
+  alias fetchrow fetch_row
+  alias dataseek data_seek
+
+  def fetchfields()
+    ret = []
+    fetch_fields.each{|f| ret << f.name}
+    ret
+  end
+
+  def fetchhash()
+    row = fetchrow or return nil
+    fields = fetchfields
+    ret = {}
+    fields.each_index {|i| ret[fields[i]] = row[i]}
+    ret
+  end
+
+  def each_hash()
+    while hash = fetchhash
+      yield hash
+    end
+  end
+end

data/mysql-ruby.gemspec

@@ -0,0 +1,20 @@
+require 'rubygems'
+
+SPEC = Gem::Specification.new do |s|
+  s.name         = "mysql"
+  s.version      = "2.5.1"
+  s.author       = "TOMITA Masahiro"
+  s.email        = "tommy@tmtm.org"
+  s.homepage     = "http://www.tmtm.org/en/mysql/ruby/"
+  s.platform     = Gem::Platform::RUBY
+  s.summary      = "MySQL/Ruby provides the same functions for Ruby programs that the MySQL C API provides for C programs."
+  s.extensions   = %w{extconf.rb}
+  s.has_rdoc     = false
+  s.autorequire  = "mysql"
+  s.files        = Dir.glob('**/*')
+end
+
+if $0 == __FILE__
+  Gem::manage_gems
+  Gem::Builder.new(spec).build
+end

data/mysql.c.in

@@ -0,0 +1,1267 @@
+/*	ruby mysql module
+ *	$Id: mysql.c.in,v 1.8 2004/09/20 12:03:47 tommy Exp $
+ */
+
+#include "ruby.h"
+#include "version.h"
+#ifdef HAVE_MYSQL_H
+#include <mysql.h>
+#include <errmsg.h>
+#include <mysqld_error.h>
+#else
+#include <mysql/mysql.h>
+#include <mysql/errmsg.h>
+#include <mysql/mysqld_error.h>
+#endif
+
+#define GC_STORE_RESULT_LIMIT 20
+
+#ifndef Qtrue		/* ruby 1.2.x ? */
+#define	Qtrue		TRUE
+#define	Qfalse		FALSE
+#define	rb_exc_raise	rb_raise
+#define	rb_exc_new2	exc_new2
+#define	rb_str_new	str_new
+#define	rb_str_new2	str_new2
+#define	rb_ary_new2	ary_new2
+#define	rb_ary_store	ary_store
+#define	rb_obj_alloc	obj_alloc
+#define	rb_hash_new	hash_new
+#define	rb_hash_aset	hash_aset
+#define	rb_eStandardError	eStandardError
+#define	rb_cObject	cObject
+#endif
+
+#if MYSQL_VERSION_ID < 32224
+#define	mysql_field_count	mysql_num_fields
+#endif
+
+#define NILorSTRING(obj)	(NIL_P(obj)? NULL: STR2CSTR(obj))
+#define NILorINT(obj)		(NIL_P(obj)? 0: NUM2INT(obj))
+
+#define GetMysqlStruct(obj)	(Check_Type(obj, T_DATA), (struct mysql*)DATA_PTR(obj))
+#define GetHandler(obj)		(Check_Type(obj, T_DATA), &(((struct mysql*)DATA_PTR(obj))->handler))
+#define GetMysqlRes(obj)	(Check_Type(obj, T_DATA), ((struct mysql_res*)DATA_PTR(obj))->res)
+
+VALUE cMysql;
+VALUE cMysqlRes;
+VALUE cMysqlField;
+VALUE eMysql;
+
+static int store_result_count = 0;
+
+struct mysql {
+    MYSQL handler;
+    char connection;
+    char query_with_result;
+};
+
+struct mysql_res {
+    MYSQL_RES* res;
+    char freed;
+};
+
+
+/*	free Mysql class object		*/
+static void free_mysql(struct mysql* my)
+{
+    if (my->connection == Qtrue)
+	mysql_close(&my->handler);
+    free(my);
+}
+
+static void free_mysqlres(struct mysql_res* resp)
+{
+    if (resp->freed == Qfalse) {
+	mysql_free_result(resp->res);
+	store_result_count--;
+    }
+    free(resp);
+}
+
+static void mysql_raise(MYSQL* m)
+{
+    VALUE e = rb_exc_new2(eMysql, mysql_error(m));
+    rb_iv_set(e, "errno", INT2FIX(mysql_errno(m)));
+    rb_exc_raise(e);
+}
+
+static VALUE mysqlres2obj(MYSQL_RES* res)
+{
+    VALUE obj;
+    struct mysql_res* resp;
+    obj = Data_Make_Struct(cMysqlRes, struct mysql_res, 0, free_mysqlres, resp);
+    resp->res = res;
+    resp->freed = Qfalse;
+    rb_obj_call_init(obj, 0, NULL);
+    if (++store_result_count > GC_STORE_RESULT_LIMIT)
+	rb_gc();
+    return obj;
+}
+
+/*	make Mysql::Field object	*/
+static VALUE make_field_obj(MYSQL_FIELD* f)
+{
+    VALUE obj;
+    VALUE hash;
+    if (f == NULL)
+	return Qnil;
+    obj = rb_obj_alloc(cMysqlField);
+    rb_iv_set(obj, "name", f->name? rb_str_freeze(rb_tainted_str_new2(f->name)): Qnil);
+    rb_iv_set(obj, "table", f->table? rb_str_freeze(rb_tainted_str_new2(f->table)): Qnil);
+    rb_iv_set(obj, "def", f->def? rb_str_freeze(rb_tainted_str_new2(f->def)): Qnil);
+    rb_iv_set(obj, "type", INT2NUM(f->type));
+    rb_iv_set(obj, "length", INT2NUM(f->length));
+    rb_iv_set(obj, "max_length", INT2NUM(f->max_length));
+    rb_iv_set(obj, "flags", INT2NUM(f->flags));
+    rb_iv_set(obj, "decimals", INT2NUM(f->decimals));
+    return obj;
+}
+
+/*-------------------------------
+ * Mysql class method
+ */
+
+/*	init()	*/
+static VALUE init(VALUE klass)
+{
+    struct mysql* myp;
+    VALUE obj;
+
+    obj = Data_Make_Struct(klass, struct mysql, 0, free_mysql, myp);
+    mysql_init(&myp->handler);
+    myp->connection = Qfalse;
+    myp->query_with_result = Qtrue;
+    rb_obj_call_init(obj, 0, NULL);
+    return obj;
+}
+
+/*	real_connect(host=nil, user=nil, passwd=nil, db=nil, port=nil, sock=nil, flag=nil)	*/
+static VALUE real_connect(int argc, VALUE* argv, VALUE klass)
+{
+    VALUE host, user, passwd, db, port, sock, flag;
+    char *h, *u, *p, *d, *s;
+    unsigned int pp, f;
+    struct mysql* myp;
+    VALUE obj;
+
+#if MYSQL_VERSION_ID >= 32200
+    rb_scan_args(argc, argv, "07", &host, &user, &passwd, &db, &port, &sock, &flag);
+    d = NILorSTRING(db);
+    f = NILorINT(flag);
+#elif MYSQL_VERSION_ID >= 32115
+    rb_scan_args(argc, argv, "06", &host, &user, &passwd, &port, &sock, &flag);
+    f = NILorINT(flag);
+#else
+    rb_scan_args(argc, argv, "05", &host, &user, &passwd, &port, &sock);
+#endif
+    h = NILorSTRING(host);
+    u = NILorSTRING(user);
+    p = NILorSTRING(passwd);
+    pp = NILorINT(port);
+    s = NILorSTRING(sock);
+
+    obj = Data_Make_Struct(klass, struct mysql, 0, free_mysql, myp);
+#if MYSQL_VERSION_ID >= 32200
+    mysql_init(&myp->handler);
+    if (mysql_real_connect(&myp->handler, h, u, p, d, pp, s, f) == NULL)
+#elif MYSQL_VERSION_ID >= 32115
+    if (mysql_real_connect(&myp->handler, h, u, p, pp, s, f) == NULL)
+#else
+    if (mysql_real_connect(&myp->handler, h, u, p, pp, s) == NULL)
+#endif
+	mysql_raise(&myp->handler);
+
+    myp->connection = Qtrue;
+    myp->query_with_result = Qtrue;
+    rb_obj_call_init(obj, argc, argv);
+
+    return obj;
+}
+
+/*	escape_string(string)	*/
+static VALUE escape_string(VALUE klass, VALUE str)
+{
+    VALUE ret;
+    Check_Type(str, T_STRING);
+    ret = rb_str_new(0, (RSTRING(str)->len)*2+1);
+    RSTRING(ret)->len = mysql_escape_string(RSTRING(ret)->ptr, RSTRING(str)->ptr, RSTRING(str)->len);
+    return ret;
+}
+
+/*	client_info()	*/
+static VALUE client_info(VALUE klass)
+{
+    return rb_tainted_str_new2(mysql_get_client_info());
+}
+
+#if MYSQL_VERSION_ID >= 32332
+/*	my_debug(string)	*/
+static VALUE my_debug(VALUE obj, VALUE str)
+{
+    mysql_debug(STR2CSTR(str));
+    return obj;
+}
+#endif
+
+#if MYSQL_VERSION_ID >= 40000
+/*	client_version()	*/
+static VALUE client_version(VALUE obj)
+{
+    return INT2NUM(mysql_get_client_version());
+}
+#endif
+
+/*-------------------------------
+ * Mysql object method
+ */
+
+#if MYSQL_VERSION_ID >= 32200
+/*	real_connect(host=nil, user=nil, passwd=nil, db=nil, port=nil, sock=nil, flag=nil)	*/
+static VALUE real_connect2(int argc, VALUE* argv, VALUE obj)
+{
+    VALUE host, user, passwd, db, port, sock, flag;
+    char *h, *u, *p, *d, *s;
+    unsigned int pp, f;
+    MYSQL* m = GetHandler(obj);
+    rb_scan_args(argc, argv, "07", &host, &user, &passwd, &db, &port, &sock, &flag);
+    d = NILorSTRING(db);
+    f = NILorINT(flag);
+    h = NILorSTRING(host);
+    u = NILorSTRING(user);
+    p = NILorSTRING(passwd);
+    pp = NILorINT(port);
+    s = NILorSTRING(sock);
+
+    if (mysql_real_connect(m, h, u, p, d, pp, s, f) == NULL)
+	mysql_raise(m);
+
+    return obj;
+}
+
+/*	options(opt, value=nil)	*/
+static VALUE options(int argc, VALUE* argv, VALUE obj)
+{
+    VALUE opt, val;
+    int n;
+    char* v;
+    MYSQL* m = GetHandler(obj);
+
+    rb_scan_args(argc, argv, "11", &opt, &val);
+    switch(NUM2INT(opt)) {
+    case MYSQL_OPT_CONNECT_TIMEOUT:
+	if (val == Qnil)
+	    rb_raise(rb_eArgError, "wrong # of arguments(1 for 2)");
+	n = NUM2INT(val);
+	v = (char*)&n;
+	break;
+    case MYSQL_INIT_COMMAND:
+    case MYSQL_READ_DEFAULT_FILE:
+    case MYSQL_READ_DEFAULT_GROUP:
+	if (val == Qnil)
+	    rb_raise(rb_eArgError, "wrong # of arguments(1 for 2)");
+	v = STR2CSTR(val);
+	break;
+#if MYSQL_VERSION_ID >= 32349
+    case MYSQL_OPT_LOCAL_INFILE:
+	if (val == Qnil || val == Qfalse)
+	    v = NULL;
+	else {
+	    n = 1;
+	    v = (char*)&n;
+	}
+	break;
+#endif
+    default:
+	v = NULL;
+    }
+
+    if (mysql_options(m, NUM2INT(opt), v) != 0)
+	rb_raise(eMysql, "unknown option: %d", NUM2INT(opt));
+    return obj;
+}
+#endif
+
+#if MYSQL_VERSION_ID >= 32332
+/*	real_escape_string(string)	*/
+static VALUE real_escape_string(VALUE obj, VALUE str)
+{
+    MYSQL* m = GetHandler(obj);
+    VALUE ret;
+    Check_Type(str, T_STRING);
+    ret = rb_str_new(0, (RSTRING(str)->len)*2+1);
+    RSTRING(ret)->len = mysql_real_escape_string(m, RSTRING(ret)->ptr, RSTRING(str)->ptr, RSTRING(str)->len);
+    return ret;
+}
+#endif
+
+/*	initialize()	*/
+static VALUE initialize(int argc, VALUE* argv, VALUE obj)
+{
+    return obj;
+}
+
+/*	affected_rows()	*/
+static VALUE affected_rows(VALUE obj)
+{
+    return INT2NUM(mysql_affected_rows(GetHandler(obj)));
+}
+
+#if MYSQL_VERSION_ID >= 32303
+/*	change_user(user=nil, passwd=nil, db=nil)	*/
+static VALUE change_user(int argc, VALUE* argv, VALUE obj)
+{
+    VALUE user, passwd, db;
+    char *u, *p, *d;
+    MYSQL* m = GetHandler(obj);
+    rb_scan_args(argc, argv, "03", &user, &passwd, &db);
+    u = NILorSTRING(user);
+    p = NILorSTRING(passwd);
+    d = NILorSTRING(db);
+    if (mysql_change_user(m, u, p, d) != 0)
+	mysql_raise(m);
+    return obj;
+}
+#endif
+
+#if MYSQL_VERSION_ID >= 32321
+/*	character_set_name()	*/
+static VALUE character_set_name(VALUE obj)
+{
+    return rb_tainted_str_new2(mysql_character_set_name(GetHandler(obj)));
+}
+#endif
+
+/*	close()		*/
+static VALUE my_close(VALUE obj)
+{
+    MYSQL* m = GetHandler(obj);
+    mysql_close(m);
+    if (mysql_errno(m))
+	mysql_raise(m);
+    GetMysqlStruct(obj)->connection = Qfalse;
+    return obj;
+}
+
+#if MYSQL_VERSION_ID < 40000
+/*	create_db(db)	*/
+static VALUE create_db(VALUE obj, VALUE db)
+{
+    MYSQL* m = GetHandler(obj);
+    if (mysql_create_db(m, STR2CSTR(db)) != 0)
+	mysql_raise(m);
+    return obj;
+}
+
+/*	drop_db(db)	*/
+static VALUE drop_db(VALUE obj, VALUE db)
+{
+    MYSQL* m = GetHandler(obj);
+    if (mysql_drop_db(m, STR2CSTR(db)) != 0)
+	mysql_raise(m);
+    return obj;
+}
+#endif
+
+#if MYSQL_VERSION_ID >= 32332
+/*	dump_debug_info()	*/
+static VALUE dump_debug_info(VALUE obj)
+{
+    MYSQL* m = GetHandler(obj);
+    if (mysql_dump_debug_info(m) != 0)
+	mysql_raise(m);
+    return obj;
+}
+#endif
+
+/*	errno()		*/
+static VALUE my_errno(VALUE obj)
+{
+    return INT2NUM(mysql_errno(GetHandler(obj)));
+}
+
+/*	error()		*/
+static VALUE my_error(VALUE obj)
+{
+    return rb_str_new2(mysql_error(GetHandler(obj)));
+}
+
+/*	field_count()	*/
+static VALUE field_count(VALUE obj)
+{
+    return INT2NUM(mysql_field_count(GetHandler(obj)));
+}
+
+/*	host_info()	*/
+static VALUE host_info(VALUE obj)
+{
+    return rb_tainted_str_new2(mysql_get_host_info(GetHandler(obj)));
+}
+
+/*	proto_info()	*/
+static VALUE proto_info(VALUE obj)
+{
+    return INT2NUM(mysql_get_proto_info(GetHandler(obj)));
+}
+
+/*	server_info()	*/
+static VALUE server_info(VALUE obj)
+{
+    return rb_tainted_str_new2(mysql_get_server_info(GetHandler(obj)));
+}
+
+/*	info()		*/
+static VALUE info(VALUE obj)
+{
+    const char* p = mysql_info(GetHandler(obj));
+    return p? rb_tainted_str_new2(p): Qnil;
+}
+
+/*	insert_id()	*/
+static VALUE insert_id(VALUE obj)
+{
+    return INT2NUM(mysql_insert_id(GetHandler(obj)));
+}
+
+/*	kill(pid)	*/
+static VALUE my_kill(VALUE obj, VALUE pid)
+{
+    int p = NUM2INT(pid);
+    MYSQL* m = GetHandler(obj);
+    if (mysql_kill(m, p) != 0)
+	mysql_raise(m);
+    return obj;
+}
+
+/*	list_dbs(db=nil)	*/
+static VALUE list_dbs(int argc, VALUE* argv, VALUE obj)
+{
+    unsigned int i, n;
+    VALUE db, ret;
+    MYSQL* m = GetHandler(obj);
+    MYSQL_RES* res;
+
+    rb_scan_args(argc, argv, "01", &db);
+    res = mysql_list_dbs(m, NILorSTRING(db));
+    if (res == NULL)
+	mysql_raise(m);
+
+    n = mysql_num_rows(res);
+    ret = rb_ary_new2(n);
+    for (i=0; i<n; i++)
+	rb_ary_store(ret, i, rb_tainted_str_new2(mysql_fetch_row(res)[0]));
+    mysql_free_result(res);
+    return ret;
+}
+
+/*	list_fields(table, field=nil)	*/
+static VALUE list_fields(int argc, VALUE* argv, VALUE obj)
+{
+    VALUE table, field;
+    MYSQL* m = GetHandler(obj);
+    MYSQL_RES* res;
+    rb_scan_args(argc, argv, "11", &table, &field);
+    res = mysql_list_fields(m, STR2CSTR(table), NILorSTRING(field));
+    if (res == NULL)
+	mysql_raise(m);
+    return mysqlres2obj(res);
+}
+
+/*	list_processes()	*/
+static VALUE list_processes(VALUE obj)
+{
+    MYSQL* m = GetHandler(obj);
+    MYSQL_RES* res = mysql_list_processes(m);
+    if (res == NULL)
+	mysql_raise(m);
+    return mysqlres2obj(res);
+}
+
+/*	list_tables(table=nil)	*/
+static VALUE list_tables(int argc, VALUE* argv, VALUE obj)
+{
+    VALUE table;
+    MYSQL* m = GetHandler(obj);
+    MYSQL_RES* res;
+    unsigned int i, n;
+    VALUE ret;
+
+    rb_scan_args(argc, argv, "01", &table);
+    res = mysql_list_tables(m, NILorSTRING(table));
+    if (res == NULL)
+	mysql_raise(m);
+
+    n = mysql_num_rows(res);
+    ret = rb_ary_new2(n);
+    for (i=0; i<n; i++)
+	rb_ary_store(ret, i, rb_tainted_str_new2(mysql_fetch_row(res)[0]));
+    mysql_free_result(res);
+    return ret;
+}
+
+/*	ping()		*/
+static VALUE ping(VALUE obj)
+{
+    MYSQL* m = GetHandler(obj);
+    if (mysql_ping(m) != 0)
+	mysql_raise(m);
+    return obj;
+}
+
+/*	refresh(r)	*/
+static VALUE refresh(VALUE obj, VALUE r)
+{
+    MYSQL* m = GetHandler(obj);
+    if (mysql_refresh(m, NUM2INT(r)) != 0)
+	mysql_raise(m);
+    return obj;
+}
+
+/*	reload()	*/
+static VALUE reload(VALUE obj)
+{
+    MYSQL* m = GetHandler(obj);
+    if (mysql_reload(m) != 0)
+	mysql_raise(m);
+    return obj;
+}
+
+/*	select_db(db)	*/
+static VALUE select_db(VALUE obj, VALUE db)
+{
+    MYSQL* m = GetHandler(obj);
+    if (mysql_select_db(m, STR2CSTR(db)) != 0)
+	mysql_raise(m);
+    return obj;
+}
+
+/*	shutdown()	*/
+static VALUE my_shutdown(int argc, VALUE* argv, VALUE obj)
+{
+    MYSQL* m = GetHandler(obj);
+    VALUE level;
+
+    rb_scan_args(argc, argv, "01", &level);
+#if MYSQL_VERSION_ID >= 40103
+    if (mysql_shutdown(m, NIL_P(level) ? SHUTDOWN_DEFAULT : NUM2INT(level)) != 0)
+#else
+    if (mysql_shutdown(m) != 0)
+#endif
+	mysql_raise(m);
+    return obj;
+}
+
+/*	stat()		*/
+static VALUE my_stat(VALUE obj)
+{
+    MYSQL* m = GetHandler(obj);
+    const char* s = mysql_stat(m);
+    if (s == NULL)
+	mysql_raise(m);
+    return rb_tainted_str_new2(s);
+}
+
+/*	store_result()	*/
+static VALUE store_result(VALUE obj)
+{
+    MYSQL* m = GetHandler(obj);
+    MYSQL_RES* res = mysql_store_result(m);
+    if (res == NULL)
+	mysql_raise(m);
+    return mysqlres2obj(res);
+}
+
+/*	thread_id()	*/
+static VALUE thread_id(VALUE obj)
+{
+    return INT2NUM(mysql_thread_id(GetHandler(obj)));
+}
+
+/*	use_result()	*/
+static VALUE use_result(VALUE obj)
+{
+    MYSQL* m = GetHandler(obj);
+    MYSQL_RES* res = mysql_use_result(m);
+    if (res == NULL)
+	mysql_raise(m);
+    return mysqlres2obj(res);
+}
+
+/*	query(sql)	*/
+static VALUE query(VALUE obj, VALUE sql)
+{
+    MYSQL* m = GetHandler(obj);
+    Check_Type(sql, T_STRING);
+    if (mysql_real_query(m, RSTRING(sql)->ptr, RSTRING(sql)->len) != 0)
+	mysql_raise(m);
+    if (GetMysqlStruct(obj)->query_with_result == Qfalse)
+	return obj;
+    if (mysql_field_count(m) == 0)
+	return Qnil;
+    return store_result(obj);
+}
+
+#if MYSQL_VERSION_ID >= 40100
+/*	server_version()	*/
+static VALUE server_version(VALUE obj)
+{
+    return INT2NUM(mysql_get_server_version(GetHandler(obj)));
+}
+
+/*	warning_count()	*/
+static VALUE warning_count(VALUE obj)
+{
+    return INT2NUM(mysql_warning_count(GetHandler(obj)));
+}
+
+/*	commit()	*/
+static VALUE commit(VALUE obj)
+{
+    MYSQL* m = GetHandler(obj);
+    if (mysql_commit(m) != 0)
+        mysql_raise(m);
+    return obj;
+}
+
+/*	rollback()	*/
+static VALUE rollback(VALUE obj)
+{
+    MYSQL* m = GetHandler(obj);
+    if (mysql_rollback(m) != 0)
+        mysql_raise(m);
+    return obj;
+}
+
+/*	autocommit()	*/
+static VALUE autocommit(VALUE obj, VALUE mode)
+{
+    MYSQL* m = GetHandler(obj);
+    int f;
+    f = (mode == Qnil || mode == Qfalse || NUM2INT(mode) == 0) ? 0 : 1;
+    if (mysql_autocommit(m, f) != 0)
+        mysql_raise(m);
+    return obj;
+}
+#endif
+
+#ifdef HAVE_MYSQL_SSL_SET
+/*	ssl_set(key=nil, cert=nil, ca=nil, capath=nil, cipher=nil)	*/
+static VALUE ssl_set(int argc, VALUE* argv, VALUE obj)
+{
+    VALUE key, cert, ca, capath, cipher;
+    char *s_key, *s_cert, *s_ca, *s_capath, *s_cipher;
+    MYSQL* m = GetHandler(obj);
+    rb_scan_args(argc, argv, "05", &key, &cert, &ca, &capath, &cipher);
+    s_key = NILorSTRING(key);
+    s_cert = NILorSTRING(cert);
+    s_ca = NILorSTRING(ca);
+    s_capath = NILorSTRING(capath);
+    s_cipher = NILorSTRING(cipher);
+    mysql_ssl_set(m, s_key, s_cert, s_ca, s_capath, s_cipher);
+    return obj;
+}
+#endif
+
+/*	query_with_result()	*/
+static VALUE query_with_result(VALUE obj)
+{
+    return GetMysqlStruct(obj)->query_with_result? Qtrue: Qfalse;
+}
+
+/*	query_with_result=(flag)	*/
+static VALUE query_with_result_set(VALUE obj, VALUE flag)
+{
+    if (TYPE(flag) != T_TRUE && TYPE(flag) != T_FALSE)
+#if RUBY_VERSION_CODE < 160
+	TypeError("invalid type, required true or false.");
+#else
+        rb_raise(rb_eTypeError, "invalid type, required true or false.");
+#endif
+    GetMysqlStruct(obj)->query_with_result = flag;
+    return flag;
+}
+
+/*-------------------------------
+ * Mysql::Result object method
+ */
+
+/*	check if alread freed	*/
+static void check_free(VALUE obj)
+{
+    struct mysql_res* resp = DATA_PTR(obj);
+    if (resp->freed == Qtrue)
+        rb_raise(eMysql, "Mysql::Result object is already freed");
+}
+
+/*	data_seek(offset)	*/
+static VALUE data_seek(VALUE obj, VALUE offset)
+{
+    check_free(obj);
+    mysql_data_seek(GetMysqlRes(obj), NUM2INT(offset));
+    return obj;
+}
+
+/*	fetch_field()	*/
+static VALUE fetch_field(VALUE obj)
+{
+    check_free(obj);
+    return make_field_obj(mysql_fetch_field(GetMysqlRes(obj)));
+}
+
+/*	fetch_fields()	*/
+static VALUE fetch_fields(VALUE obj)
+{
+    MYSQL_RES* res;
+    MYSQL_FIELD* f;
+    unsigned int n;
+    VALUE ret;
+    unsigned int i;
+    check_free(obj);
+    res = GetMysqlRes(obj);
+    f = mysql_fetch_fields(res);
+    n = mysql_num_fields(res);
+    ret = rb_ary_new2(n);
+    for (i=0; i<n; i++)
+	rb_ary_store(ret, i, make_field_obj(&f[i]));
+    return ret;
+}
+
+/*	fetch_field_direct(nr)	*/
+static VALUE fetch_field_direct(VALUE obj, VALUE nr)
+{
+    MYSQL_RES* res;
+    unsigned int max;
+    unsigned int n;
+    check_free(obj);
+    res = GetMysqlRes(obj);
+    max = mysql_num_fields(res);
+    n = NUM2INT(nr);
+    if (n >= max)
+#if RUBY_VERSION_CODE < 160
+        Raise(eMysql, "%d: out of range (max: %d)", n, max-1);
+#else
+        rb_raise(eMysql, "%d: out of range (max: %d)", n, max-1);
+#endif
+#if MYSQL_VERSION_ID >= 32226
+    return make_field_obj(mysql_fetch_field_direct(res, n));
+#else
+    return make_field_obj(&mysql_fetch_field_direct(res, n));
+#endif
+}
+
+/*	fetch_lengths()		*/
+static VALUE fetch_lengths(VALUE obj)
+{
+    MYSQL_RES* res;
+    unsigned int n;
+    unsigned long* lengths;
+    VALUE ary;
+    unsigned int i;
+    check_free(obj);
+    res = GetMysqlRes(obj);
+    n = mysql_num_fields(res);
+    lengths = mysql_fetch_lengths(res);
+    if (lengths == NULL)
+	return Qnil;
+    ary = rb_ary_new2(n);
+    for (i=0; i<n; i++)
+	rb_ary_store(ary, i, INT2NUM(lengths[i]));
+    return ary;
+}
+
+/*	fetch_row()	*/
+static VALUE fetch_row(VALUE obj)
+{
+    MYSQL_RES* res;
+    unsigned int n;
+    MYSQL_ROW row;
+    unsigned long* lengths;
+    VALUE ary;
+    unsigned int i;
+    check_free(obj);
+    res = GetMysqlRes(obj);
+    n = mysql_num_fields(res);
+    row = mysql_fetch_row(res);
+    lengths = mysql_fetch_lengths(res);
+    if (row == NULL)
+	return Qnil;
+    ary = rb_ary_new2(n);
+    for (i=0; i<n; i++)
+	rb_ary_store(ary, i, row[i]? rb_tainted_str_new(row[i], lengths[i]): Qnil);
+    return ary;
+}
+
+/*	fetch_hash2 (internal)	*/
+static VALUE fetch_hash2(VALUE obj, VALUE with_table)
+{
+    MYSQL_RES* res = GetMysqlRes(obj);
+    unsigned int n = mysql_num_fields(res);
+    MYSQL_ROW row = mysql_fetch_row(res);
+    unsigned long* lengths = mysql_fetch_lengths(res);
+    MYSQL_FIELD* fields = mysql_fetch_fields(res);
+    unsigned int i;
+    VALUE hash;
+    if (row == NULL)
+	return Qnil;
+    hash = rb_hash_new();
+    for (i=0; i<n; i++) {
+	VALUE col;
+	if (row[i] == NULL)
+	    continue;
+	if (with_table == Qnil || with_table == Qfalse)
+	    col = rb_tainted_str_new2(fields[i].name);
+	else {
+	    col = rb_tainted_str_new(fields[i].table, strlen(fields[i].table)+strlen(fields[i].name)+1);
+	    RSTRING(col)->ptr[strlen(fields[i].table)] = '.';
+	    strcpy(RSTRING(col)->ptr+strlen(fields[i].table)+1, fields[i].name);
+	}
+	rb_hash_aset(hash, col, row[i]? rb_tainted_str_new(row[i], lengths[i]): Qnil);
+    }
+    return hash;
+}
+
+/*	fetch_hash(with_table=false)	*/
+static VALUE fetch_hash(int argc, VALUE* argv, VALUE obj)
+{
+    VALUE with_table;
+    check_free(obj);
+    rb_scan_args(argc, argv, "01", &with_table);
+    if (with_table == Qnil)
+	with_table = Qfalse;
+    return fetch_hash2(obj, with_table);
+}
+
+/*	field_seek(offset)	*/
+static VALUE field_seek(VALUE obj, VALUE offset)
+{
+    check_free(obj);
+    return INT2NUM(mysql_field_seek(GetMysqlRes(obj), NUM2INT(offset)));
+}
+
+/*	field_tell()		*/
+static VALUE field_tell(VALUE obj)
+{
+    check_free(obj);
+    return INT2NUM(mysql_field_tell(GetMysqlRes(obj)));
+}
+
+/*	free()			*/
+static VALUE res_free(VALUE obj)
+{
+    struct mysql_res* resp = DATA_PTR(obj);
+    check_free(obj);
+    mysql_free_result(resp->res);
+    resp->freed = Qtrue;
+    store_result_count--;
+    return Qnil;
+}
+
+/*	num_fields()		*/
+static VALUE num_fields(VALUE obj)
+{
+    check_free(obj);
+    return INT2NUM(mysql_num_fields(GetMysqlRes(obj)));
+}
+
+/*	num_rows()	*/
+static VALUE num_rows(VALUE obj)
+{
+    check_free(obj);
+    return INT2NUM(mysql_num_rows(GetMysqlRes(obj)));
+}
+
+/*	row_seek(offset)	*/
+static VALUE row_seek(VALUE obj, VALUE offset)
+{
+    check_free(obj);
+    return INT2NUM((int)mysql_row_seek(GetMysqlRes(obj), (MYSQL_ROWS*)NUM2INT(offset)));
+}
+
+/*	row_tell()	*/
+static VALUE row_tell(VALUE obj)
+{
+    check_free(obj);
+    return INT2NUM((int)mysql_row_tell(GetMysqlRes(obj)));
+}
+
+/*	each {...}	*/
+static VALUE each(VALUE obj)
+{
+    VALUE row;
+    check_free(obj);
+    while ((row = fetch_row(obj)) != Qnil)
+	rb_yield(row);
+    return obj;
+}
+
+/*	each_hash(with_table=false) {...}	*/
+static VALUE each_hash(int argc, VALUE* argv, VALUE obj)
+{
+    VALUE with_table;
+    VALUE hash;
+    check_free(obj);
+    rb_scan_args(argc, argv, "01", &with_table);
+    if (with_table == Qnil)
+	with_table = Qfalse;
+    while ((hash = fetch_hash2(obj, with_table)) != Qnil)
+	rb_yield(hash);
+    return obj;
+}
+
+/*-------------------------------
+ * Mysql::Field object method
+ */
+
+/*	hash	*/
+static VALUE field_hash(VALUE obj)
+{
+    VALUE h = rb_hash_new();
+    rb_hash_aset(h, rb_str_new2("name"), rb_iv_get(obj, "name"));
+    rb_hash_aset(h, rb_str_new2("table"), rb_iv_get(obj, "table"));
+    rb_hash_aset(h, rb_str_new2("def"), rb_iv_get(obj, "def"));
+    rb_hash_aset(h, rb_str_new2("type"), rb_iv_get(obj, "type"));
+    rb_hash_aset(h, rb_str_new2("length"), rb_iv_get(obj, "length"));
+    rb_hash_aset(h, rb_str_new2("max_length"), rb_iv_get(obj, "max_length"));
+    rb_hash_aset(h, rb_str_new2("flags"), rb_iv_get(obj, "flags"));
+    rb_hash_aset(h, rb_str_new2("decimals"), rb_iv_get(obj, "decimals"));
+    return h;
+}
+
+/*	inspect	*/
+static VALUE field_inspect(VALUE obj)
+{
+    VALUE n = rb_iv_get(obj, "name");
+    VALUE s = rb_str_new(0, RSTRING(n)->len + 14);
+    sprintf(RSTRING(s)->ptr, "#<Mysql::Field:%s>", RSTRING(n)->ptr);
+    return s;
+}
+
+#define DefineMysqlFieldMemberMethod(m)\
+static VALUE field_##m(VALUE obj)\
+{return rb_iv_get(obj, #m);}
+
+DefineMysqlFieldMemberMethod(name)
+DefineMysqlFieldMemberMethod(table)
+DefineMysqlFieldMemberMethod(def)
+DefineMysqlFieldMemberMethod(type)
+DefineMysqlFieldMemberMethod(length)
+DefineMysqlFieldMemberMethod(max_length)
+DefineMysqlFieldMemberMethod(flags)
+DefineMysqlFieldMemberMethod(decimals)
+
+#ifdef IS_NUM
+/*	is_num?	*/
+static VALUE field_is_num(VALUE obj)
+{
+    return IS_NUM(NUM2INT(rb_iv_get(obj, "type"))) ? Qtrue : Qfalse;
+}
+#endif
+
+#ifdef IS_NOT_NULL
+/*	is_not_null?	*/
+static VALUE field_is_not_null(VALUE obj)
+{
+    return IS_NOT_NULL(NUM2INT(rb_iv_get(obj, "flags"))) ? Qtrue : Qfalse;
+}
+#endif
+
+#ifdef IS_PRI_KEY
+/*	is_pri_key?	*/
+static VALUE field_is_pri_key(VALUE obj)
+{
+    return IS_PRI_KEY(NUM2INT(rb_iv_get(obj, "flags"))) ? Qtrue : Qfalse;
+}
+#endif
+
+
+/*-------------------------------
+ * Mysql::Error object method
+ */
+
+static VALUE error_error(VALUE obj)
+{
+    return rb_iv_get(obj, "mesg");
+}
+
+static VALUE error_errno(VALUE obj)
+{
+    return rb_iv_get(obj, "errno");
+}
+
+/*-------------------------------
+ *	Initialize
+ */
+
+void Init_mysql(void)
+{
+    cMysql = rb_define_class("Mysql", rb_cObject);
+    cMysqlRes = rb_define_class_under(cMysql, "Result", rb_cObject);
+    cMysqlField = rb_define_class_under(cMysql, "Field", rb_cObject);
+    eMysql = rb_define_class_under(cMysql, "Error", rb_eStandardError);
+
+    rb_define_global_const("MysqlRes", cMysqlRes);
+    rb_define_global_const("MysqlField", cMysqlField);
+    rb_define_global_const("MysqlError", eMysql);
+
+    /* Mysql class method */
+    rb_define_singleton_method(cMysql, "init", init, 0);
+    rb_define_singleton_method(cMysql, "real_connect", real_connect, -1);
+    rb_define_singleton_method(cMysql, "connect", real_connect, -1);
+    rb_define_singleton_method(cMysql, "new", real_connect, -1);
+    rb_define_singleton_method(cMysql, "escape_string", escape_string, 1);
+    rb_define_singleton_method(cMysql, "quote", escape_string, 1);
+    rb_define_singleton_method(cMysql, "client_info", client_info, 0);
+    rb_define_singleton_method(cMysql, "get_client_info", client_info, 0);
+#if MYSQL_VERSION_ID >= 32332
+    rb_define_singleton_method(cMysql, "debug", my_debug, 1);
+#endif
+#if MYSQL_VERSION_ID >= 40000
+    rb_define_singleton_method(cMysql, "get_client_version", client_version, 0);
+    rb_define_singleton_method(cMysql, "client_version", client_version, 0);
+#endif
+
+    /* Mysql object method */
+#if MYSQL_VERSION_ID >= 32200
+    rb_define_method(cMysql, "real_connect", real_connect2, -1);
+    rb_define_method(cMysql, "connect", real_connect2, -1);
+    rb_define_method(cMysql, "options", options, -1);
+#endif
+    rb_define_method(cMysql, "initialize", initialize, -1);
+#if MYSQL_VERSION_ID >= 32332
+    rb_define_method(cMysql, "escape_string", real_escape_string, 1);
+    rb_define_method(cMysql, "quote", real_escape_string, 1);
+#else
+    rb_define_method(cMysql, "escape_string", escape_string, 1);
+    rb_define_method(cMysql, "quote", escape_string, 1);
+#endif
+    rb_define_method(cMysql, "client_info", client_info, 0);
+    rb_define_method(cMysql, "get_client_info", client_info, 0);
+    rb_define_method(cMysql, "affected_rows", affected_rows, 0);
+#if MYSQL_VERSION_ID >= 32303
+    rb_define_method(cMysql, "change_user", change_user, -1);
+#endif
+#if MYSQL_VERSION_ID >= 32321
+    rb_define_method(cMysql, "character_set_name", character_set_name, 0);
+#endif
+    rb_define_method(cMysql, "close", my_close, 0);
+#if MYSQL_VERSION_ID < 40000
+    rb_define_method(cMysql, "create_db", create_db, 1);
+    rb_define_method(cMysql, "drop_db", drop_db, 1);
+#endif
+#if MYSQL_VERSION_ID >= 32332
+    rb_define_method(cMysql, "dump_debug_info", dump_debug_info, 0);
+#endif
+    rb_define_method(cMysql, "errno", my_errno, 0);
+    rb_define_method(cMysql, "error", my_error, 0);
+    rb_define_method(cMysql, "field_count", field_count, 0);
+#if MYSQL_VERSION_ID >= 40000
+    rb_define_method(cMysql, "get_client_version", client_version, 0);
+    rb_define_method(cMysql, "client_version", client_version, 0);
+#endif
+    rb_define_method(cMysql, "get_host_info", host_info, 0);
+    rb_define_method(cMysql, "host_info", host_info, 0);
+    rb_define_method(cMysql, "get_proto_info", proto_info, 0);
+    rb_define_method(cMysql, "proto_info", proto_info, 0);
+    rb_define_method(cMysql, "get_server_info", server_info, 0);
+    rb_define_method(cMysql, "server_info", server_info, 0);
+    rb_define_method(cMysql, "info", info, 0);
+    rb_define_method(cMysql, "insert_id", insert_id, 0);
+    rb_define_method(cMysql, "kill", my_kill, 1);
+    rb_define_method(cMysql, "list_dbs", list_dbs, -1);
+    rb_define_method(cMysql, "list_fields", list_fields, -1);
+    rb_define_method(cMysql, "list_processes", list_processes, 0);
+    rb_define_method(cMysql, "list_tables", list_tables, -1);
+#if MYSQL_VERSION_ID >= 32200
+    rb_define_method(cMysql, "ping", ping, 0);
+#endif
+    rb_define_method(cMysql, "query", query, 1);
+    rb_define_method(cMysql, "refresh", refresh, 1);
+    rb_define_method(cMysql, "reload", reload, 0);
+    rb_define_method(cMysql, "select_db", select_db, 1);
+    rb_define_method(cMysql, "shutdown", my_shutdown, -1);
+    rb_define_method(cMysql, "stat", my_stat, 0);
+    rb_define_method(cMysql, "store_result", store_result, 0);
+    rb_define_method(cMysql, "thread_id", thread_id, 0);
+    rb_define_method(cMysql, "use_result", use_result, 0);
+#if MYSQL_VERSION_ID >= 40100
+    rb_define_method(cMysql, "get_server_version", server_version, 0);
+    rb_define_method(cMysql, "server_version", server_version, 0);
+    rb_define_method(cMysql, "warning_count", warning_count, 0);
+    rb_define_method(cMysql, "commit", commit, 0);
+    rb_define_method(cMysql, "rollback", rollback, 0);
+    rb_define_method(cMysql, "autocommit", autocommit, 1);
+#endif
+#ifdef HAVE_MYSQL_SSL_SET
+    rb_define_method(cMysql, "ssl_set", ssl_set, -1);
+#endif
+    rb_define_method(cMysql, "query_with_result", query_with_result, 0);
+    rb_define_method(cMysql, "query_with_result=", query_with_result_set, 1);
+
+    /* Mysql constant */
+#if MYSQL_VERSION_ID >= 32200
+    rb_define_const(cMysql, "OPT_CONNECT_TIMEOUT", INT2NUM(MYSQL_OPT_CONNECT_TIMEOUT));
+    rb_define_const(cMysql, "OPT_COMPRESS", INT2NUM(MYSQL_OPT_COMPRESS));
+    rb_define_const(cMysql, "OPT_NAMED_PIPE", INT2NUM(MYSQL_OPT_NAMED_PIPE));
+    rb_define_const(cMysql, "INIT_COMMAND", INT2NUM(MYSQL_INIT_COMMAND));
+    rb_define_const(cMysql, "READ_DEFAULT_FILE", INT2NUM(MYSQL_READ_DEFAULT_FILE));
+    rb_define_const(cMysql, "READ_DEFAULT_GROUP", INT2NUM(MYSQL_READ_DEFAULT_GROUP));
+#endif
+#if MYSQL_VERSION_ID >= 32349
+    rb_define_const(cMysql, "OPT_LOCAL_INFILE", INT2NUM(MYSQL_OPT_LOCAL_INFILE));
+#endif
+    rb_define_const(cMysql, "REFRESH_GRANT", INT2NUM(REFRESH_GRANT));
+    rb_define_const(cMysql, "REFRESH_LOG", INT2NUM(REFRESH_LOG));
+    rb_define_const(cMysql, "REFRESH_TABLES", INT2NUM(REFRESH_TABLES));
+#ifdef REFRESH_HOSTS
+    rb_define_const(cMysql, "REFRESH_HOSTS", INT2NUM(REFRESH_HOSTS));
+#endif
+#ifdef REFRESH_STATUS
+    rb_define_const(cMysql, "REFRESH_STATUS", INT2NUM(REFRESH_STATUS));
+#endif
+#ifdef REFRESH_THREADS
+    rb_define_const(cMysql, "REFRESH_THREADS", INT2NUM(REFRESH_THREADS));
+#endif
+#ifdef REFRESH_SLAVE
+    rb_define_const(cMysql, "REFRESH_SLAVE", INT2NUM(REFRESH_SLAVE));
+#endif
+#ifdef REFRESH_MASTER
+    rb_define_const(cMysql, "REFRESH_MASTER", INT2NUM(REFRESH_MASTER));
+#endif
+#ifdef CLIENT_LONG_PASSWORD
+#endif
+#ifdef CLIENT_FOUND_ROWS
+    rb_define_const(cMysql, "CLIENT_FOUND_ROWS", INT2NUM(CLIENT_FOUND_ROWS));
+#endif
+#ifdef CLIENT_LONG_FLAG
+#endif
+#ifdef CLIENT_CONNECT_WITH_DB
+#endif
+#ifdef CLIENT_NO_SCHEMA
+    rb_define_const(cMysql, "CLIENT_NO_SCHEMA", INT2NUM(CLIENT_NO_SCHEMA));
+#endif
+#ifdef CLIENT_COMPRESS
+    rb_define_const(cMysql, "CLIENT_COMPRESS", INT2NUM(CLIENT_COMPRESS));
+#endif
+#ifdef CLIENT_ODBC
+    rb_define_const(cMysql, "CLIENT_ODBC", INT2NUM(CLIENT_ODBC));
+#endif
+#ifdef CLIENT_LOCAL_FILES
+    rb_define_const(cMysql, "CLIENT_LOCAL_FILES", INT2NUM(CLIENT_LOCAL_FILES));
+#endif
+#ifdef CLIENT_IGNORE_SPACE
+    rb_define_const(cMysql, "CLIENT_IGNORE_SPACE", INT2NUM(CLIENT_IGNORE_SPACE));
+#endif
+#ifdef CLIENT_CHANGE_USER
+    rb_define_const(cMysql, "CLIENT_CHANGE_USER", INT2NUM(CLIENT_CHANGE_USER));
+#endif
+#ifdef CLIENT_INTERACTIVE
+    rb_define_const(cMysql, "CLIENT_INTERACTIVE", INT2NUM(CLIENT_INTERACTIVE));
+#endif
+#ifdef CLIENT_SSL
+    rb_define_const(cMysql, "CLIENT_SSL", INT2NUM(CLIENT_SSL));
+#endif
+#ifdef CLIENT_IGNORE_SIGPIPE
+    rb_define_const(cMysql, "CLIENT_IGNORE_SIGPIPE", INT2NUM(CLIENT_IGNORE_SIGPIPE));
+#endif
+#ifdef CLIENT_TRANSACTIONS
+    rb_define_const(cMysql, "CLIENT_TRANSACTIONS", INT2NUM(CLIENT_TRANSACTIONS));
+#endif
+
+    /* Mysql::Result object method */
+    rb_define_method(cMysqlRes, "data_seek", data_seek, 1);
+    rb_define_method(cMysqlRes, "fetch_field", fetch_field, 0);
+    rb_define_method(cMysqlRes, "fetch_fields", fetch_fields, 0);
+    rb_define_method(cMysqlRes, "fetch_field_direct", fetch_field_direct, 1);
+    rb_define_method(cMysqlRes, "fetch_lengths", fetch_lengths, 0);
+    rb_define_method(cMysqlRes, "fetch_row", fetch_row, 0);
+    rb_define_method(cMysqlRes, "fetch_hash", fetch_hash, -1);
+    rb_define_method(cMysqlRes, "field_seek", field_seek, 1);
+    rb_define_method(cMysqlRes, "field_tell", field_tell, 0);
+    rb_define_method(cMysqlRes, "free", res_free, 0);
+    rb_define_method(cMysqlRes, "num_fields", num_fields, 0);
+    rb_define_method(cMysqlRes, "num_rows", num_rows, 0);
+    rb_define_method(cMysqlRes, "row_seek", row_seek, 1);
+    rb_define_method(cMysqlRes, "row_tell", row_tell, 0);
+    rb_define_method(cMysqlRes, "each", each, 0);
+    rb_define_method(cMysqlRes, "each_hash", each_hash, -1);
+
+    /* MysqlField object method */
+    rb_define_method(cMysqlField, "name", field_name, 0);
+    rb_define_method(cMysqlField, "table", field_table, 0);
+    rb_define_method(cMysqlField, "def", field_def, 0);
+    rb_define_method(cMysqlField, "type", field_type, 0);
+    rb_define_method(cMysqlField, "length", field_length, 0);
+    rb_define_method(cMysqlField, "max_length", field_max_length, 0);
+    rb_define_method(cMysqlField, "flags", field_flags, 0);
+    rb_define_method(cMysqlField, "decimals", field_decimals, 0);
+    rb_define_method(cMysqlField, "hash", field_hash, 0);
+    rb_define_method(cMysqlField, "inspect", field_inspect, 0);
+#ifdef IS_NUM
+    rb_define_method(cMysqlField, "is_num?", field_is_num, 0);
+#endif
+#ifdef IS_NOT_NULL
+    rb_define_method(cMysqlField, "is_not_null?", field_is_not_null, 0);
+#endif
+#ifdef IS_PRI_KEY
+    rb_define_method(cMysqlField, "is_pri_key?", field_is_pri_key, 0);
+#endif
+
+    /* Mysql::Field constant: TYPE */
+    rb_define_const(cMysqlField, "TYPE_TINY", INT2NUM(FIELD_TYPE_TINY));
+#if MYSQL_VERSION_ID >= 32115
+    rb_define_const(cMysqlField, "TYPE_ENUM", INT2NUM(FIELD_TYPE_ENUM));
+#endif
+    rb_define_const(cMysqlField, "TYPE_DECIMAL", INT2NUM(FIELD_TYPE_DECIMAL));
+    rb_define_const(cMysqlField, "TYPE_SHORT", INT2NUM(FIELD_TYPE_SHORT));
+    rb_define_const(cMysqlField, "TYPE_LONG", INT2NUM(FIELD_TYPE_LONG));
+    rb_define_const(cMysqlField, "TYPE_FLOAT", INT2NUM(FIELD_TYPE_FLOAT));
+    rb_define_const(cMysqlField, "TYPE_DOUBLE", INT2NUM(FIELD_TYPE_DOUBLE));
+    rb_define_const(cMysqlField, "TYPE_NULL", INT2NUM(FIELD_TYPE_NULL));
+    rb_define_const(cMysqlField, "TYPE_TIMESTAMP", INT2NUM(FIELD_TYPE_TIMESTAMP));
+    rb_define_const(cMysqlField, "TYPE_LONGLONG", INT2NUM(FIELD_TYPE_LONGLONG));
+    rb_define_const(cMysqlField, "TYPE_INT24", INT2NUM(FIELD_TYPE_INT24));
+    rb_define_const(cMysqlField, "TYPE_DATE", INT2NUM(FIELD_TYPE_DATE));
+    rb_define_const(cMysqlField, "TYPE_TIME", INT2NUM(FIELD_TYPE_TIME));
+    rb_define_const(cMysqlField, "TYPE_DATETIME", INT2NUM(FIELD_TYPE_DATETIME));
+#if MYSQL_VERSION_ID >= 32130
+    rb_define_const(cMysqlField, "TYPE_YEAR", INT2NUM(FIELD_TYPE_YEAR));
+#endif
+    rb_define_const(cMysqlField, "TYPE_SET", INT2NUM(FIELD_TYPE_SET));
+    rb_define_const(cMysqlField, "TYPE_BLOB", INT2NUM(FIELD_TYPE_BLOB));
+    rb_define_const(cMysqlField, "TYPE_STRING", INT2NUM(FIELD_TYPE_STRING));
+#if MYSQL_VERSION_ID >= 40000
+    rb_define_const(cMysqlField, "TYPE_VAR_STRING", INT2NUM(FIELD_TYPE_VAR_STRING));
+#endif
+    rb_define_const(cMysqlField, "TYPE_CHAR", INT2NUM(FIELD_TYPE_CHAR));
+
+    /* Mysql::Field constant: FLAG */
+    rb_define_const(cMysqlField, "NOT_NULL_FLAG", INT2NUM(NOT_NULL_FLAG));
+    rb_define_const(cMysqlField, "PRI_KEY_FLAG", INT2NUM(PRI_KEY_FLAG));
+    rb_define_const(cMysqlField, "UNIQUE_KEY_FLAG", INT2NUM(UNIQUE_KEY_FLAG));
+    rb_define_const(cMysqlField, "MULTIPLE_KEY_FLAG", INT2NUM(MULTIPLE_KEY_FLAG));
+    rb_define_const(cMysqlField, "BLOB_FLAG", INT2NUM(BLOB_FLAG));
+    rb_define_const(cMysqlField, "UNSIGNED_FLAG", INT2NUM(UNSIGNED_FLAG));
+    rb_define_const(cMysqlField, "ZEROFILL_FLAG", INT2NUM(ZEROFILL_FLAG));
+    rb_define_const(cMysqlField, "BINARY_FLAG", INT2NUM(BINARY_FLAG));
+#ifdef ENUM_FLAG
+    rb_define_const(cMysqlField, "ENUM_FLAG", INT2NUM(ENUM_FLAG));
+#endif
+#ifdef AUTO_INCREMENT_FLAG
+    rb_define_const(cMysqlField, "AUTO_INCREMENT_FLAG", INT2NUM(AUTO_INCREMENT_FLAG));
+#endif
+#ifdef TIMESTAMP_FLAG
+    rb_define_const(cMysqlField, "TIMESTAMP_FLAG", INT2NUM(TIMESTAMP_FLAG));
+#endif
+#ifdef SET_FLAG
+    rb_define_const(cMysqlField, "SET_FLAG", INT2NUM(SET_FLAG));
+#endif
+#ifdef NUM_FLAG
+    rb_define_const(cMysqlField, "NUM_FLAG", INT2NUM(NUM_FLAG));
+#endif
+
+    /* Mysql::Error object method */
+    rb_define_method(eMysql, "error", error_error, 0);
+    rb_define_method(eMysql, "errno", error_errno, 0);
+
+    /* Mysql::Error constant */
+}